Discussion :

[sergio_gr66]

Bonjour a toutes et a tous,

je suis en train de creer une base des données dans Excel 2002, et je veux que chaque fois que je passe la souris sur une petite image cette s'agrandit.
Cette action c'est seulement pour povoir laisser l'image petite dans une cellule quand person l'a besoin.



Dans l'mage c'est possible de regarder une petite image, c'est possible de la faire grandir quand on passe la souris

merci beaucoup.

[vieuxmonsieur]

Bonsoir sergio,
Ce lien peut-il t'aider à avancer ?
http://www.developpez.net/forums/d10...el/zoom-image/
Bonne soirée

Et ceci tiré de mes archives :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Image1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
 
  If X < 5 Or X > Image1.Width - 5 Or Y < 5 Or Y > Image1.Height - 5 Then
    ActiveSheet.Shapes("image2").Visible = False
  Else
    ActiveSheet.Shapes("image2").Visible = True
  End If
End Sub

[sergio_gr66]

Bonjour,

j'ai essayé avec les deux codes mais je n'arrive pas a le faire correctement. Je ne suis pas très habile avec Visual Basic.
Si tu a le temps peux tu voir le fichier?

merci beaucoup