Bonjour à tous,

Après avoir sélectionné un fichier en passant par filedialog (voir code ci dessous),

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Set SelectFichier = Application.FileDialog(msoFileDialogFilePicker)
With SelectFichier
    .AllowMultiSelect = False
    .InitialFileName = RepertoireBASE & "\DOCUMENTAIRE"
    .Title = nomDOSSIERencours & " - État des documents transmis et stockés"
    .ButtonName = "Ouverture FICHIER"
End With

J'aimerai pouvoir ouvrir ce fichier sélectionné, quelque soit son format (xlsx, docx, pdf, …) à partir d'un click du bouton via une commande simple. J'ai fait quelques tentatives infructueuses avec '.execute' (exemples si dessous).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
    If SelectFichier.Show = -1 Then
    adresseDOCUMENTsource = SelectFichier.SelectedItems(1) 'Adresse du document
 
    'SelectFichier.Execute
    'SelectFichier.SelectedItems(1).Execute
 
    End If


Merci d'avance pour votre assistance.
J'ai confiance car je sais que quelque part, quelqu'un sait …
Unlucky Luke