Bounce a note when you press a macro button

%3CLINGO-SUB%20id%3D%22lingo-sub-2096619%22%20slang%3D%22en-US%22%3EBounce%20a%20note%20when%20you%20press%20a%20macro%20button%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-2096619%22%20slang%3D%22en-US%22%3E%3CP%3EHi%2C%3C%2FP%3E%3CP%3EI%20created%20a%20macro%20button%20that%20works%20fine%2C%20but%20since%20after%20running%20a%20macro%20there%20is%20no%20possibility%20to%20use%20CTRL%2BZ%2C%20I'm%20looking%20for%20an%20option%20to%20bounce%20a%20note%20when%20the%20macro%20button%20is%20pressed%2C%20just%20before%20the%20macro%20goes%26nbsp%3B%3CSPAN%3Einto%20action.%3C%2FSPAN%3E%3C%2FP%3E%3C%2FLINGO-BODY%3E%3CLINGO-LABS%20id%3D%22lingo-labs-2096619%22%20slang%3D%22en-US%22%3E%3CLINGO-LABEL%3EExcel%3C%2FLINGO-LABEL%3E%3CLINGO-LABEL%3EMacros%20and%20VBA%3C%2FLINGO-LABEL%3E%3C%2FLINGO-LABS%3E%3CLINGO-SUB%20id%3D%22lingo-sub-2096824%22%20slang%3D%22en-US%22%3ERe%3A%20Bounce%20a%20note%20when%20you%20press%20a%20macro%20button%3C%2FLINGO-SUB%3E%3CLINGO-BODY%20id%3D%22lingo-body-2096824%22%20slang%3D%22en-US%22%3E%3CP%3E%3CA%20href%3D%22https%3A%2F%2Ftechcommunity.microsoft.com%2Ft5%2Fuser%2Fviewprofilepage%2Fuser-id%2F942593%22%20target%3D%22_blank%22%3E%40Netali_T%3C%2FA%3E%26nbsp%3B%3C%2FP%3E%3CP%3E%26nbsp%3B%3C%2FP%3E%3CP%3EI%20take%20it%20you%20want%20a%20popup%20confirmation%20message%3F%3C%2FP%3E%3CP%3E%26nbsp%3B%3C%2FP%3E%3CPRE%20class%3D%22lia-code-sample%20language-applescript%22%3E%3CCODE%3ESub%20temp()%0A%20%20%20%20%20Const%20msgWarning%20%3D%20%22Actions%20performed%20by%20macro%20cannot%20be%20undone.%20Continue%3F%22%0A%20%20%20%20%20%0A%20%20%20%20%20If%20MsgBox(msgWarning%2C%20vbYesNo%20%2B%20vbExclamation)%20%3D%20vbNo%20Then%0A%20%20%20%20%20%20%20%20%20%20Exit%20Sub%0A%20%20%20%20%20End%20If%0A%20%20%20%20%20%0AEnd%20Sub%3C%2FCODE%3E%3C%2FPRE%3E%3C%2FLINGO-BODY%3E
New Contributor

Hi,

I created a macro button that works fine, but since after running a macro there is no possibility to use CTRL+Z, I'm looking for an option to bounce a note when the macro button is pressed, just before the macro goes into action.

3 Replies

@Netali_T 

 

I take it you want a popup confirmation message?

 

Sub temp()
     Const msgWarning = "Actions performed by macro cannot be undone. Continue?"
     
     If MsgBox(msgWarning, vbYesNo + vbExclamation) = vbNo Then
          Exit Sub
     End If
     
End Sub

@JMB17 

 

Yes thank you!

Works great

You are welcome.