Guru do Excel e Power BI

Boa Noite, como faço para contar as linhas preenchidas da coluna D6 em diante, nela contem o campo código, e quando eu abrir o formulário queria que ele me amostrasse a quantidade de linhas preenchidas, ou o ultimo valor preenchido.

tentei esse codigo, mas nao consegui jogar para comessar a contar da coluna D6.

lblContador.Caption = Plan9.Cells(Rows.Count, 1).End(xlUp).Row

Se você quer contar células não vazias da coluna D, a partir de D6, experimente:

não funcionou amigo, deu mensagem: método do range worksheet falhou

Desculpe, amigo faltou .Row:

lblContador.Caption = Application.CountA(Plan1.Range("D6:D" & Plan1.Cells(Rows.Count, 4).End(xlUp).Row))

funcionou amigo, muito obrigado.