Bonjour
Voila j'e suis en cours de création d'une macro me permettant d'ouvir plusieurs fichiers excel situé dans un dossier :
Sub Macro6()
Dim BA_NRF As String, RelecPmax_NRF As String, RelecPtmb_NRF As String, Bilanqualitée_NRF As String, BA_STR1 As String, RelecPmax_STR1 As String, RelecPtmb_STR1 As String, Bilanqualitée_STR1 As String, RBC_STR1 As String
BA_NRF = Range("G1")
RelecPmax_NRF = Range("G2")
RelecPtmb_NRF = Range("G3")
Bilanqualitée_NRF = Range("G4")
BA_STR1 = Range("G5")
RelecPmax_STR1 = Range("G6")
RelecPtmb_STR1 = Range("G7")
Bilanqualitée_STR1 = Range("G8")
RBC_STR1 = Range("G9")
Workbooks.Open Filename:=BA_NRF
Workbooks.Open Filename:=RelecPmax_NRF
Workbooks.Open Filename:=RelecPtmb_NRF
Workbooks.Open Filename:=Bilanqualitée_NRF
Workbooks.Open Filename:=BA_STR1
Workbooks.Open Filename:=RelecPmax_STR1
Workbooks.Open Filename:=RelecPtmb_STR1
Workbooks.Open Filename:=Bilanqualitée_STR1
Workbooks.Open Filename:=RBC_STR1
End Sub
Le probleme c'st qu'il m'ouvre les quatre premier fichiers, les autres ils ne les trouent pas...
alors qu'ils sont bien présent..
Des solutions ?