/VBA/Get all column names from excel vba

Get all column names from excel vba

Excel vba get column name from number

'For column number 256...

ColName = Split(Cells(, 256).Address, "$")(1)

Get all column names from excel vba

Sub datacollect()
Dim heading() As String
Dim i As Integer
i = -1
For Each x In Rows(1).Cells
    If x.Value = "" Then Exit For
    i = i + 1
    ReDim Preserve heading(i) As String
    heading(i) = x.Value
Next x
End Sub

Source: mrexcel.com

Similar codes

5 votes270 views1 answer
Excel vba low word from Long Integer
VBA
0 vote290 views1 answer
Excel vba delete columns in range
VBA
1 vote235 views1 answer
Highlight selected cell in excel vba
VBA
0 vote217 views1 answer
Excel vba arrondir
VBA
4 votes247 views2 answers
Vba create folder if not exist
VBA
0 vote227 views1 answer
Vba declare 64-bit ptrsafe
VBA
0 vote259 views1 answer
Create links in msgbox in vb
VBA
5 votes259 views2 answers
Excel vba write to the windows registry
VBA
0 vote223 views1 answer
Vba apostrophe chr
VBA
0 vote242 views1 answer
Limit combobox to list vba
VBA