PDA

View Full Version : How to change mouse Icon when move above one of cell?



jiura
01-06-2008, 07:39 AM
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?

Simon Lloyd
01-06-2008, 09:28 AM
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:

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

Simon Lloyd
01-06-2008, 09:46 AM
Cross posted here (http://www.mrexcel.com/forum/showthread.php?p=1454248&posted=1#post1454248)

mikerickson
01-06-2008, 12:05 PM
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