Bonjour,
Je tente d'avoir dans une feuille excel, un bouton m'ouvrant un document pdf avec un lien relatif.
Le nom du document à ouvrir est "SP07 - Final Report.pdf".
Ce document est situé dans un sous dossier (du nom de "Final Reports") qui est lui-même situé dans le même dossier (du nom de "test") que la feuille excel.
Pour l'instant mon code ne fonctionne pas et ressemble à ça:
Si je met des ' à l'intérieur des "", ce code va bien m'ouvrir Adobe Acrobat Reader, mais visiblement il ne trouve pas le document que je tente de mettre en chemin relatif...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Private Sub CommandButton1_Click() Shell "C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe ActiveWorkbook.Path & "\Final Reports\SP07 - Final Report.pdf"", vbNormalFocus End Sub
Les codes partiels suivants fonctionnent:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Private Sub CommandButton1_Click() Shell "C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe D:\test\Final Reports\SP07 - Final Report.pdf", vbNormalFocus End SubMais
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Private Sub CommandButton1_Click() Workbooks.Open Filename:=ActiveWorkbook.Path & "\Final Reports\test.xls", ReadOnly:=True Worksheets("PROMO").Activate End Sub
- le 1er n'ouvre le pdf qu'en chemin absolu (je souhaiterais ouvrir le pdf avec un chemin relatif (afin de pouvoir librement deplace le dossier test)...)
- le 2ème n'ouvre que les xls en chemin relatif
=> Est-ce que quelqu'un sait quoi faire et pourrait m'aider svp ?
Merci d'avance,
Meilleures salutations
FUN
Partager