Codigo em VBA que ponha o numero da linhas em uma celula

Question

Boa tarde pessoal.

Estou com  uma dificuldade que nao estou sabendo resolver.

Meu codigo em vba esta mais ou menos assim.

Dim Linha as Variant

Logo no inicio do código defino que:

Linha = 2

No decorrer da aplicação, a linha aumenta com:

X= linha + 1

Next

_____________

Qual a dificuldade. PRECISO que o valor de X vá para a celula A1 por exemplo. Pq depois vou fazer uma chamada, assim que terminar o codigo, vai fazer uma chamada do tipo "CALL 31" e a linha de inicio será o valor de x.

Alguem sabe me orientar como resolver essa situação?

Answer 1

ALGUEM ME AJUDA POR FAVOR!!!!

Answer 2

Bom dia Douglas,

Acredito que já tenha resolvido seu problema, porém para os que não sabem e que ainda podem vir a ter tal dúvida segue proposta...

A solução é simples, mas acredito que ajudará.

Depois de incrementar o valor de linha direcione a aplicação para realizar o preenchimento de A1.

linha = 2

quantidade = 10 
'Você quem define quantas vezes o loop será feito, ou busque o valor da variável conforme sua necessidade.

For i = linha to quantidade

	Rotina
	Rotina
	Rotina

X = linha + 1

Range("A1") = X

Next i 

Espero que assim possa ajudar aos que venham a ter dúvidas sobre algo similar.
Abraços

Douglas Godoy

---

Douglas Godoy [e-mail]