View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bernie Deitrick[_2_] Bernie Deitrick[_2_] is offline
external usenet poster
 
Posts: 176
Default Capturing pointer locations

Paul,

Mousedown certainly works for me.

Where are you putting your code? Since it is a userform event, the code for it must go into the userform's codemodule and not a
standard module. All but the Msgbox lines should autogenerate when you select the userform's codemodule's MouseDown event.

Private Sub UserForm_MouseDown(ByVal Button As Integer, _
ByVal Shift As Integer, _
ByVal X As Single, _
ByVal Y As Single)
MsgBox "X of the click: " & X
MsgBox "Y of the click: " & Y
End Sub

HTH,
Bernie
Excel MVP


"Paul" wrote in message ...
Has anyone had any success capturing pointer locations
within Excel? According to "MouseDown, MouseUp Events"
within Help, when you click on "Applies To", both events
should apply to a UserForm, so the following should allow
you to capture the pointer location of a UserForm:

Private Sub UserForm_MouseDown(Button, Shift, X, Y)
MsgBox X
MsgBox Y
End Sub

However, this does not work, and when you read Help
for "MouseDown" alone, it supposedly only applies to a
chart object.

I would like to capture the mouse location on a
spreadsheet and also a UserForm, so has anyone been able
to do this?

Regards
Paul