Discussion :

[thomasdu40]

Bonjour,

J'ai un Userform qui apparaît lorsque je vais sur un onglet d'un fichier. Dans cet userform j'ai un lien qui me permet d'ouvrir un autre fichier qui n'est autre qu'un guide pour aider à compléter l'onglet en question.

Or il ne veut pas m'ouvrir cet autre fichier. Il me marque "Impossible d'ouvrir le fichier...." alors que le chemin d'accès dans le code est correct.

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub Label1_Click()
Dim Link As String
Link = "F:\Bureau\Macro\Guide plan audit"
On Error GoTo NePeutPas
ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
Exit Sub
NePeutPas:
MsgBox "Impossible d'ouvrir " & Link
End Sub

Si vous avez une réponse. Merci.

[pijaku]

Bonjour,

Peut être manque t'il l'extension du fichier?
Guide plan audit.???

Sinon, si ce fichier est un classeur Excel, je te recommande cette méthode d'ouverture :

Code :

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

Workbooks.Open Filename:="F:\Bureau\Macro\Guide plan audit.xls"

tu dis...

[thomasdu40]

Bonjour,

J'ai modifié le code et intégré ta proposition avec l'extension. Toujours impossible d'ouvrir le fichier.

[pijaku]

vérifies bien l'orthographe du chemin, du nom de fichier.

Quel est l'extension de ton fichier? Il s'ouvre, par défaut, avec quel logiciel?

[thomasdu40]

C'est un fichier .xls qui a été créé avec Excel 2010. Ce fichier n'a pas de macro à l'intérieur car ce n'est que du texte.

[pijaku]

Quel est donc le message d'erreur complet : "Impossible d'ouvrir le fichier...."