Pourquoi mes "Hyperlink" fichiers "Image"; (gif, jpg., bmp…et c.) ne s'ouvrent pas?

IFFIC

XLDnaute Occasionnel
Je reformule ici une question qui n'a pas eu la chance de rencontrer
une bonne âme ayant un p'tit bout de réponse pour m'aider...

Bonsoir à tous qui passeront par là.
Et merci à ceux qui par leur aide, mon déjà tellement aidé.

Voici mon souci:

Dans un premier temps je crée les liens Hypertextes de la feuille "CHEMIN_COMPLET"

Dans un boucle (i)
Worksheets("CHEMIN_COMPLET").Hyperlinks.Add Anchor:=Cells(i, 1), _
Address:=Worksheets("CHEMIN_COMPLET").Cells(i, 1).Value


Et ensuite, j'ouvre par:


Private Sub ListView1_Click()

Dim FICHIER_A_OUVRIR As Integer

FICHIER_A_OUVRIR = ListView1.SelectedItem.Index

ActiveWorkbook.FollowHyperlink _
Address:=Worksheets("CHEMIN_COMPLET").Cells(FICHIE R_A_OUVRIR + 1, 1), NewWindow:=True

End Sub

La majorité des fichiers s'ouvre bien; sauf les fichiers "Image"; (gif, jpg., bmp…et c.)

J'ai alors droit au Sablier dont je ne peux me sortir que par un "CTRL+ALT+SUP"

(A noter que certains fichiers "xls" s'ouvrent en arrière plan, mais là, avec un "Activate" ou "Sélect", je devrais m'en sortir)

De permettre une ouverture de ces fichiers "Image" est pour moi important pour aller plus loin.

Mais je patine TROP, et je quémande un peu d'aide.

Merci d'avance

IFFIC
 

Statistiques des forums

Discussions
312 559
Messages
2 089 601
Membres
104 223
dernier inscrit
Brilma