Como achar a ultima coluna do excel usando Macro em VBA

Exibe o número da última coluna preenchida em uma planilha excel.

MsgBox Range("A1", Selection.End(xlToRight)).Count  'numero de colunas

Exibe o número de linhas preenchidas em uma planilha excel.

MsgBox Range("a1", Selection.End(xlDown)).Count  'numero de linhas

Com isso é fácil vc iterar por todos os elementos, somente colunas ou somente linhas.