Microsoft Excel-ben ezt meg lehetséges csinálni?

Az ActiveX vezérlők közül beszúrsz egy képet, ha az az első valószínű Image1 lesz a neve. Az Image1 MouseMove eseménye pedig:

Private Sub Image1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

If (X < 280) And (Y < 40) And (X > 20) And (Y > 10) Then

Image1.Height = 50 ' Nagyított méret

Image1.Width = 300

End

Else

Image1.Height = 25 ' Eredeti méret

Image1.Width = 150

End If

End Sub

Amíg egy adott területen belül mozog az egér - körbe-körbe 10 pixelt hagytam el - addig a nagyított kép látszik. Ha elhagyod akkor az eredeti.