Bonjour à tous,
J'ai une petit problème de sélection dans ma macro, je suis censé sélectionner toutes mes lignes écrites pour les copier à la suite d'une autre feuille mais il me sélectionne pas toutes les lignes. Je ne comprend pas pourquoi auriez vous une idée.
Merci d'avance.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Sub ColleràlaSuite() ' Dernière ligne vide dans la feuille de destination lgLigFinH = Worksheets("Destination").Range("A" & Cells.Rows.Count).End(xlUp).Row + 1 ' Dernière ligne dans la feuille copie lgLigFinM = Worksheets("copie").Range("A" & Cells.Rows.Count).End(xlUp).Row ' Copier les données de la feuille "copie" dans la première ligne vide de la feuille destination Worksheets("copie").Range("A4:I4" & lgLigFinM).Copy Destination:=Sheets("destination").Range("A" & lgLigFinH) End Sub
Partager