Rilton,
Bom Dia!
Veja no arquivo anexo, se é assim lhe atende.
Observe que, da forma que fiz, estou pegando a última linha com dados pela coluna D e armazenando na variável UltimaLinha. Entretanto, isso faz com que a última linha (a de número 15) que não contém nada na coluna D não seja oculta, pois o comando para armazenar a última linha pega pela coluna D e, nesse caso, pega somente até a linha 14. Desse modo, sugiro que você altere o código de maneira que a última linha pegue uma coluna que sempre terá dados. Por exemplo: suypondo que a sua coluna A tenha algo como código e que sempre existirá um código para o produto ou cliente cadastrado, você coloca no código (onde tem o número 4) o número 1).
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel
Postado : 23/08/2013 7:26 am