En travaillant avec plusieurs fichiers ouverts par ton code, tu dois indiquer de quel classeur s'agit il ici
With ThisWorkbook.Sheets("status_6")
Si cette feuille appartient au classeur d'où la macro est lancée.
Sinon aies l'habitude de travailler avec des objets
exemple
1 2 3 4 5 6 7 8
| Sub distri2()
Dim wbS As Workbook, wbA As Workbook
Dim Lastlig As Long, i As Long
Dim Dest As Range, c As Range
Set wbS = Workbooks.Open("C:\Documents and Settings\PC42\Bureau\Stats_equipes.xlsx")
Set wbA = Workbooks.Open("C:\Documents and Settings\PC42\Bureau\A_4_2_LagerKontrolleGP.xls")
'... |
Tu auras tes 2 classeurs ouverts sans souci duquel est le classeur actif
Partager