Notifications
Clear all

Fazer um textbox mudar um valor na sub

3 Posts
2 Usuários
0 Reactions
995 Visualizações
(@eliponto)
Posts: 12
Active Member
Topic starter
 

Galera, preciso de um help, mas acho que é bem simples.

Tenho uma macro que lê uma lista toda e dispara um e-mail agrupando vários códigos, exemplo:

Nesse aqui ele mandará e-mail para os responsáveis dos códigos 412, 413 e 411.

Pergunta: é possível criar um botão de textbox para executar a macro alterando os valores desse "for rolagem"? A ideia seria executar a macro para um código só quando for preciso.

Obrigado!

 
Postado : 09/03/2018 9:21 am
xlarruda
(@xlarruda)
Posts: 732
Honorable Member
 

Tente algo assim:

Sub definir()
Dim ini, fim As Long
ini = Application.InputBox("Digite o número inicial")
fim = Application.InputBox("Digite o número Final")

For rolagem = ini To fim
"seu código aqui"...
Next 
End Sub

___________________________________________________________________________________________
Se a resposta atendeu sua dúvida, por favor, clique no Gostei e marque o Tópico como [Resolvido].

Att.

André Arruda

 
Postado : 09/03/2018 9:38 am
(@eliponto)
Posts: 12
Active Member
Topic starter
 

Nossa, rsrsrs, como não pensei nisso?
Muito obrigado, está perfeito!

 
Postado : 09/03/2018 9:46 am