Sub Escape()
SendKeys "{ESC}"
End Sub

Alternative..........

Sub Ant_Killer()
Application.CutCopyMode = False
End Sub


Gord Dibben MS Excel MVP

On Thu, 15 Jan 2009 13:59:18 -0500, Riccol wrote:

How did you do that? I can see the benefit of killing them with the
mouse rather than having to reach for the Escape key.

T. Valko wrote:

You're not the only one!

I know I can just hit the Escape key but I use the mouse extensively so I
went so far as to create a button on one of my toolbars that kills the
marching ants! It's a lot faster for me just to use the mouse.