J’ai ce code, qui me permet de sélectionner la plage de cellules A2 à P, jusqu’à la dernière cellule vide de la ligne du fichier Extraction.
Ensuite, cette plage de cellules est copiée dans le fichier BD à la suite des données déjà présentes, donc çà doit être à la ligne 23.
Mais, je ne comprends pas pourquoi cette plage est copié dans le fichier BD dans la cellule R9.
En vous remerciant de votre aide.
Ensuite, cette plage de cellules est copiée dans le fichier BD à la suite des données déjà présentes, donc çà doit être à la ligne 23.
Mais, je ne comprends pas pourquoi cette plage est copié dans le fichier BD dans la cellule R9.
En vous remerciant de votre aide.
VB:
Set W1 = Workbooks("Extraction.xlsx")
Set W2 = Workbooks("BD.xlsx")
DerLig = W1.ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
W1.ActiveSheet.Range("A2:P" & DerLig).Copy
W2.ActiveSheet.Paste