Olá, pessoal. Estou tentando criar um código responsável por ler a quantidade de células preenchidas nas linhas.. Tentei desta forma porém não tive sucesso.
For b = 1 To rMaior
contador = Worksheets("1").Range("b:b").Cells.SpecialCells(xlCellTypeConstants).Count
MsgBox contador
Next b
Obrigado.