Saberexcel - o site das macros
Essa macro do Aplicativo Microsoft Excel VBA, retorna a quantidade de colunas usadas, a próxima coluna em branco, endereço da célula da última coluna usada, e endereço da célula da proxima coluna em branco. Por exemplo, se você quiser repetir o exemplo observe na imagem abaixo as linha(1) usada até a coluna D.
(MSGBOX) - Colunas - quantidade usadas [ 4 ]
(MSGBOX) - Proxima coluna em branco [5 ]
(MSGBOX) - Endereço celula ultima coluna usada [$D$1 ]
(MSGBOX) - Endereço celula da proxima coluna em branco [$E$1]
Sub Colunas_range_usada_e_nao_usadas_Linha1()
'quantidade de coluna em usada
MsgBox "Colunas - quantidade usadas [ " & _
Range("IV1").End(xlToLeft).Column & " ]", vbCritical, "Quantidade de coluna em usada Lin1"
'proxima coluna em branco
MsgBox "Proxima coluna em branco Lin[1] [ " & _
Range("IV1").End(xlToLeft).Column & " ]", vbInformation, "Proxima coluna em branco Lin1"
'endereço da ultima coluna usada
MsgBox "Endereço da ultima coluna usada Lin1 [" & _
Range("IV1").End(xlToLeft).AddressLocal & " ]", vbExclamation, "Endereço da ultima coluna usada Lin1"
'endereço da proxima coluna em branco
MsgBox "Endereço da proxima coluna em branco Lin1 [" & _
Range("IV1").End(xlToLeft).Offset(0, 1).AddressLocal & " ]", vbExclamation, "Endereço da proxima coluna em branco Lin1"
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Baixe o exemplo de planilha da macro acima
Planilhas excel vba colunas proxima branco e usadas quantidade endereco (38.06 kB)