Este fórum está sendo desativado

[Angra]

Boa tarde
Rodo um codigo e no final uso um Call pra chamar um outro. Como fazer uma macro acionada por botão, para interromper a execução

[Angra]

Opa, quem se habilita?

[Mally]

Não entendi direito o que você quer. No caso, você quer um comando na macro que interrompa a execução dela ou quer algo como apertar [ESC] no meio da execução da macro, sem aparecer a mensagem de "macro interrompida"?

Se for só para parar a execução, basta usar o comando Exit Sub. Exemplo:

Sub x()

If Range("A1") = "" Then
MsgBox "Célula vazia"
Exit Sub
End If

Call y

End Sub

[Angra]

Macro rodando:

Sub Wakus()
Range("DU1:DY1").Copy
Range("DU2:DY2").PasteSpecial xlPasteValues
Range("A7").Select
Selection.ClearContents
Application.ScreenUpdating = True
Call Wakus
End Sub


''ou quer algo como apertar [ESC] no meio da execução da macro, sem aparecer a mensagem de "macro interrompida"?
Exatamente isso, um botão que faça essa função, clicou parou a execução sem mostrar mais nada