Excel VBA: how to programmatically remove the marching ants after range.copy

Question

I don't want to resort to SendKeys "{ESC}"

Answer 1

application.cutcopymode = false

Answer 2

Try this code as an example. The key line is 'Application.CutCopyMode = False'

Sub Test()
    Range("A1").Copy
    MsgBox "View Marching Ants"
    Range("A2").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
End Sub