Notifications
Clear all

Incrementando referência de linha em VBA

3 Posts
2 Usuários
0 Reactions
989 Visualizações
(@evilmaax)
Posts: 82
Trusted Member
Topic starter
 

Olá amigos

Meu problema é o seguinte:
Tenho uma macro que recebe o valor de uma variável X informada pelo usuário (de 1 a 10) e então printa o valor de uma determinada célula de acordo com o valor da variável.

A linha padrão do meu código é:

UserForm1.TextBox1 = Sheets("Cadastro").Range("A3").Text

e se minha variável X foi "1" gostaria que fosse printado "B3", se a variável X fosse "4" fosse printado "E3"

Já tentei da seguinte maneira mas dá erro de tipos

UserForm1.TextBox1 = Sheets("Cadastro").Range("A3") + x.Text

Entendo o porquê do erro, mas ainda não consegui encontrar a solução.
Ficaria grato se alguém pudesse me ajudar.

 
Postado : 21/08/2017 2:49 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 


Não sei se entendi direito, mas veja se é isso:

UserForm1.TextBox1 = Sheets("Cadastro").Cells(3, x +1)

Ou seja, mantida a linha 3 e variando a coluna de acordo com x.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 21/08/2017 3:01 pm
(@evilmaax)
Posts: 82
Trusted Member
Topic starter
 

Isso mesmo, Edson.
Muito obrigado
Abraços

 
Postado : 21/08/2017 3:19 pm