Consulting

Results 1 to 4 of 4

Thread: How to change mouse Icon when move above one of cell?

  1. #1

    How to change mouse Icon when move above one of cell?

    Hello to All!
    I want mouse icon change when user moves it above some cells. The same if it occurs when I move mouse above hyperlink (it changes from arrow to hand).
    How can I do It?

  2. #2
    Moderator VBAX Guru Simon Lloyd's Avatar
    Joined
    Sep 2005
    Location
    UK
    Posts
    3,003
    Location
    You would have to use the Windows MOUSEMOVE properties and check that the co-ordinates of the mouse correspond with your cells....i think that would be a nightmare you could use hyperlinks (to the cells themselves) and make them invisible, or perhaps something like this in the worksheet module:
    [VBA]
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:A10,C5,C12,D1:E3")) Is Nothing Then
    Application.Cursor = xlNorthwestArrow ' or xlWait for hourglass
    Else
    Application.Cursor = xlDefault
    End If
    End Sub

    [/VBA]
    Regards,
    Simon
    Please read this before cross posting!
    In the unlikely event you didn't get your answer here try Microsoft Office Discussion @ The Code Cage
    If I have seen further it is by standing on the shoulders of giants.
    Isaac Newton, Letter to Robert Hooke, February 5, 1675 English mathematician & physicist (1642 - 1727)

  3. #3
    Moderator VBAX Guru Simon Lloyd's Avatar
    Joined
    Sep 2005
    Location
    UK
    Posts
    3,003
    Location
    Cross posted here
    Regards,
    Simon
    Please read this before cross posting!
    In the unlikely event you didn't get your answer here try Microsoft Office Discussion @ The Code Cage
    If I have seen further it is by standing on the shoulders of giants.
    Isaac Newton, Letter to Robert Hooke, February 5, 1675 English mathematician & physicist (1642 - 1727)

  4. #4
    Mac Moderator VBAX Guru mikerickson's Avatar
    Joined
    May 2007
    Location
    Davis CA
    Posts
    2,778
    Select your cells, Insert a hyperlink to that workbook's own file.

    For example, a cell in Workbook1.xls would be linked to
    Macintosh HD:Users:merickson:desktop:Workbook1.xls

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •