Esqueceu sua senha? Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Contador e Chamada de variável.

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
juracy_silva
Acabou de chegar
Acabou de chegar
Mensagens: 1
Registrado em: Seg Ago 06, 2018 8:44 pm

Contador e Chamada de variável.

Mensagem por juracy_silva » Seg Ago 06, 2018 9:14 pm

Olá, sou novato no fórum e em programação VBA.

criei um UserForm com umas textBox para o usuário inserir valores;
Declarei essas variáveis como single;

Dei os seguintes nomes para as variáveis: tub1v; tub2v, tub3v ... tub20v.

em um determinado ponto do programa eu pensei em criar um looping usando o próprio nome da variável e é aí que minha duvida surgiu.

como estou engatinhando no VBA, tentei fazer o seguinte:

Dim Valor_L As Single '(usei o nome Valor_L só para teste, p exibir o valor na msgbox);
Dim fra As Variant '(fra seria apenas a formação do nome da variável);
Dim n As Integer '(n seria o contador que iria embutir no centro do nome da variável [tub(n)v];
n = 1

fra = "tub" & (n) & "v" '(aqui até que formou o nome da variável)
Valor_L = (fra) '(pretendia que assumisse a variável formada acima, não apenas o texto do nome)
MsgBox Valor_L '(aqui seria a exibição do valor da suposta variável)
MsgBox tub1 '(essa linha era só para confirmação - comparar com a variável declarada no inicio)

se tudo corresse bem, eu iria criar um looping com if ou when (variando o valor de n --> n= n+1), mas parei por aqui. (pretendia ter os valores tub1v, tub2v, tub3v...)

é possível fazer isso que propus (mesmo sendo uma programação rustica)? {fazer uma alteração numa variável e chamar uma outra?}

Qual o modo elegante e limpo de realizar algo parecido?



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder