Bonjour,

J'ai trouvé le code suivant sur le forum, mais j'ai une question sur le code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub Ouverture_explorateur_fichier()
 
 
Dim Fichier As Variant
Dim Wb As Workbook
Dim tbl As Range
 
Fichier = Application.GetOpenFileName("Classeurs Excel (*.xls), *.xls")
If Fichier = False Then Exit Sub
 
Set Wb = Workbooks.Open(Fichier)
 
 
                   Application.DisplayAlerts = False
 
           Wb.Close
            Set Wb = Nothing
        Application.DisplayAlerts = True
 
End Sub
Je souhaiterai ouvrir l'explorateur dans un fichier bien precis par defaut et non pas dans mes documents. Possible?

Par avance merci.