MouseOver cell that makes apear and disappear an image

Hi mates.

I need the same thing that has been posted on this thread, but updated to Excel 2010:
http://excel.bigresource.com/Track/excel-a6YFd1sx/

The original code was:

Please Login or Register  to view this content.

Wich stopped working on Excel 2003 because Application.FileSearch isnt used anymore.

This link http://excel2007tips.blogspot.com/20...h-in-2007.html has been posted in the same topic as a solution, but i couldnt get it implemented.

Please, can you help me ?

Best regards

Try...

Please Login or Register  to view this content.

Hi Domenic, thank you very much for your feedback.

The code worked perfecly but only on CEL A1, can it search for images at the whole Column G (Sorry for the missing info).

In time, is there a way to always show the comment at the center of the screen ? Some of the images shown are big and if they appear right next to the cell the user will need to scroll down.

I found this code wich, if i click on the comment cel, it moves the Comment Shape a little left/right, but i need it on the absolut center.

Best regards

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim targetCom As Comment
If Target.Cells.Count = 1 Then
On Error Resume Next
Set targetCom = Target.Comment
On Error GoTo 0
If Not targetCom Is Nothing Then
If ActiveCell.Column > 31 Then
With targetCom
.Shape.Top = .Parent.Offset(2, 0).Top
.Shape.Left = .Parent.Offset(2, -10).Left
End With
Else
With targetCom
.Shape.Top = .Parent.Offset(2, 0).Top
End With
End If
End If
End If

The code worked perfecly but only on CEL A1, can it search for images at the whole Column G (Sorry for the missing info).

Can you please clarify?