Este fórum está sendo desativado

[valcir]

Ola tenho o codigo abaixo rodando dentro de 01 botao .
Private Sub btExecuta2_Click()
For cont = 1 To 1000
ActiveCell.Value = cont
ActiveCell.Offset(1, 0).Select
End Sub
Next
Como faço para colocar um codigo em OUTRO BOTAO para interromper o loop se novo botao for clicado.
Ou seja se durante a execuçao do (for) se o outro botao for acionado, sair da rotina. O Outro Botao esta em um formulario.

[DJunqueira]

Testa uma variável pública se ela for verdadeira EXIT SUB...

[valcir]

Ola estou tentado aprender VBA, pelos videos do youtube, nao sei todos os conceitos ainda. poderia detalhar como seria este processo.
obrigado

[DJunqueira]

Declara a variável fora da sub-rotina, bem no início.

Public Botão_Sim_Não As Boolean

Depois monta um IF THEN ELSE

IF Botão_Sim_Não = True Then Botão_Sim_Não = False Else Botão_Sim_Não = True

E depois checa a variável em alguma parte da sua sub-rotina.

[valcir]

Ola obrigado pela resposta, mais nao consegui. estou enviando a planilha anexo caso alguem posso incluir este codigo agradeço, estou estudando todos os dias mais e complexo.
E assim ( Na Plan5 clicar no Botao Iniciar processamento- Em seguida vai aparecer um formulario com um botao de nome(Abortar processamento agora). Preciso que ao clicar neste botao pare a Rotina (For)e saia da Sub.
Obrigado.

[DJunqueira]

Resposta no código.

[valcir]

Ola, DJunqueira, primeiro obrigado pelo retorno. Porem o Botao (Abortar processamento agora nao funcionou) a Opçao Control+break em uma emergencia funciona, mas o ideal e a instrução no botao que esta no formulario. se puder rever agradeço.