Macro ouverture document image

[barbot]

Bonjour,

Je souhaite réaliser une macro pour ouvrir des images .tiff mais je ne sais pas comment faire, j'arrive à ouvrir une image avec ce code :

Sub Bouton1_QuandClic()
ThisWorkbook.FollowHyperlink "C:\Documents and Settings\BUREAU_E\Bureau\test1.tiff", , True
End Sub

Mais mon problème est que j'ai plusieurs images et donc le chemin change en fonction de l'image que je souhaite ouvrir et je ne sais pas comment intérgrer ça à la macro. (on retrouve le chemin dans une cellule excel)

Y a-t-il une solution ?

Merci d'avance 🙂

 

[MJ13]

Re : Macro ouverture document image

Bonjour barbot

Tu dois utilser des varaibles:

Ex soit ton chemin (du type Rep="C:\MonChemin" ou rep=cells(1,1).value contennat le nom du chemin avec la lettre du lecteur)
Et ton fichier (du type Fich="MonFichier.Tiff" ou Fich=cells(1,2).value contenant le nom avec l'extension)

Cel donnerait:

Sub Bouton1_QuandClic()
ThisWorkbook.FollowHyperlink Rep & "\" & Fich, , True
End Sub

 

[barbot]

Re : Macro ouverture document image

C'est bon ça fonctionne merci 🙂