“Obtenha todos os nomes de colunas do Excel VBA” Respostas de código

Excel VBA Obtenha o nome da coluna do número

'For column number 256...

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

Obtenha todos os nomes de colunas do 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
Misty Markhor

Respostas semelhantes a “Obtenha todos os nomes de colunas do Excel VBA”

Perguntas semelhantes a “Obtenha todos os nomes de colunas do Excel VBA”

Procure respostas de código populares por idioma

Procurar outros idiomas de código