Vídeo recomendado
https://youtu.be/diWPPPhW-9E

VBA - loop -continuar até a condição dar erro

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
FASBJUNIOR
Acabou de chegar
Acabou de chegar
Mensagens: 1
Registrado em: Seg Jul 30, 2018 10:14 am

VBA - loop -continuar até a condição dar erro

Mensagem por FASBJUNIOR »

Bom dia!
Gostaria que me ajudassem, por favor, em um loop como faço para ele sair quando a condição não existe?
Sou novo e começando a programar agora...
Por exemplo, as condições que poderiam ser testadas seriam infinitas (i>0), no entanto, quando a condição testada não existir ou der erro ela deve sair do laço. Ou seja, o caso tem 5 condições (de 1 a 5), quando ele for testar a i=6, ele verificar que não existe essa condição e então sair do laço.
Espero que tenha ficado claro.
Agradeço a ajuda!


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.


daavmendonca
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Sex Abr 12, 2019 4:08 pm

Re: VBA - loop -continuar até a condição dar erro

Mensagem por daavmendonca »

Boa tarde FASBJUNIOR,

Se eu entendi o seu cenário, talvez um "On Error Goto" resolve seu caso,
No exemplo abaixo se a macro nao encontrar a Sheet "Planilha1" ela vai para para o "Rotulo1:"

Código: Selecionar todos

Sub Teste
On error Goto Rotulo1

Sheets("Planilha1").select

Rotulo1:
'Restante do código

End sub
Basta adaptar no seu código, Boa sorte...


Responder