Hi Rob,
I am interested in the trapping of a left mouse click, but couldn't understand
it from your posts. Could you please attach a workbook with working code?
Regards - Dave.
> Date: Tue, 8 Feb 2011 05:14:53 -0800
> Subject: $$Excel-Macros$$ Re: GetAsyncKeyState not working window 7 office
> 2010 x64
> From: robert.a.cama...@gmail.com
> To: excel-macros@googlegroups.com
>
> solved it:
> I had to add a bit mask (i think thats what its called).
>
> This returned true when I clicked on a cell:
>
> If CBool(GetAsyncKeyState(1) & 128) Then
> MsgBox ("left click trapped")
> End If
>
> (1) is the constant for left mouse click
>
> On Feb 7, 11:28 am, rcamarda <robert.a.cama...@gmail.com> wrote:
> > Hi,
> > I am trying to trap a left mouse click. I found lots of uses of
> > GetAsyncKeyState, however, even something simple is not working.
> >
> > Private Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal vKey
> > As Long) As Integer
> >
> > Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> >
> > If GetAsyncKeyState(VK_LBUTTON) Then
> > MsgBox ("left click trapped")
> > End If
> >
> > If GetAsyncKeyState(VK_BACK) Then
> > MsgBox ("back space")
> > End If
> >
> > If GetAsyncKeyState(VK_RETURN) Then
> > MsgBox ("enter key")
> > End If
> >
> > End Sub
> >
> > Should I use a different library when using x64 or Office 2010??
> > TIA
> > Rob
>
> --
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
