Notifications
Clear all

Fazer um textbox mudar um valor na sub

3 Posts
2 Usuários
0 Reactions
990 Visualizações
(@eliponto)
Posts: 0
New 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)
Posts: 0
New 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
 
Postado : 09/03/2018 9:38 am
(@eliponto)
Posts: 0
New Member
Topic starter
 

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

 
Postado : 09/03/2018 9:46 am