Tom Ogilvy - 'Snap to'

T

Tom Ogilvy

Sub Macro2()
Debug.Print _
CommandBars("Drawing").Controls("D&raw") _
.Controls("&Snap").Controls("To &Grid").ID
End Sub

or

Sub Macro2()
MsgBox _
CommandBars("Drawing").Controls("D&raw") _
.Controls("&Snap").Controls("To &Grid").ID
End Sub

But Ron de Bruin also posted a link to some KB articles that list ID numbers
of the controls.
 
J

jngi

Excellent fellows!

Muchos gracias!

J

Tom Ogilvy said:
Sub Macro2()
Debug.Print _
CommandBars("Drawing").Controls("D&raw") _
.Controls("&Snap").Controls("To &Grid").ID
End Sub

or

Sub Macro2()
MsgBox _
CommandBars("Drawing").Controls("D&raw") _
.Controls("&Snap").Controls("To &Grid").ID
End Sub

But Ron de Bruin also posted a link to some KB articles that list ID numbers
of the controls.
 
Top