Bonjour à tous,

Tout d'abord j'espère qu'aucun fil n'ayant le même sujet n'a été créer, je n'ai rien trouvé.

Bien, je vous explique la situation, j'aimerai savoir si il est possible d'ouvrir un raccourci de fichier avec VBA, j'ai réussis à ouvrir des fichiers, des dossiers, mais des raccourcis, j'ai beau essayé, j'ai beau cherché, je ne trouve pas grand chose à ce sujet.. (Peut être un soucis de mot clé).

Codes testé :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub Achats()
 
    Workbooks.Open Filename:= _
        "P:\090-QUALITE & SECURITE\080-REVUES DE DIRECTION\Processus indicateurs\Achats.xlsm" _
        , UpdateLinks:=0
 
End Sub
Second code testé :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub Test()
Dim Fichier As String
Fichier = "P:\090-QUALITE & SECURITE\080-REVUES DE DIRECTION\Processus indicateurs\" & "Achats.xlsm"
Fichier = "cmd /c " & """" & Fichier & """"
Call Shell(Fichier, vbHide)
Workbooks.Open Fichier
 End Sub
Ce dernier à été trouvé sur internet, mais je débute et j'ai pas réussis à le faire s'adapter à mon problème … Si l'un d'entre vous pourrais m'aiguiller sur les erreurs que j'ai pu effectuer sur ces codes, ou si carrément je prend le mauvais chemin ou si c'est carrément pas possible peut être..

Merci d'avance du temps que vous allez passer à me repondre,

Cordialement,

Axel.