Heber,
Sua mensagem está muito genérica e sem anexar aqui o arquivo fica muito complicado entender o que você realmente quer.
De qualquer forma, aqui vai uma resposta igualmente genérica que talvez possa lhe ajudar:
Se a quantidade de linhas onde você busca os dados é variável, então você deve buscar a última linha com dados, por alguma coluna e armazenar em uma variável. Desse modo, você terá como saber quantas linhas tem sua planilha (que está na variável e aí é só atribuir à propriedade Mas da barra de rolagem.
Desse modo, se você fosse pegar a última linha com dados da coluna A, da aba chamada Plan1, você utilizaria esse comando:
Dim UltimaLinha as Long
UltimaLinha = Sheets ("Plan1").Cells(Cells.Rows.Count,1).End(XlUp).Row
Postado : 26/04/2014 5:57 pm