Sub Macro2()
With Feuil1
.Range("soir").Copy .Range("b" & Rows.Count).End(xlUp)(2)
.Range("pj").Copy .Range("b" & Rows.Count).End(xlUp)(2)
.Range("psoir").Copy .Range("b" & Rows.Count).End(xlUp)(2)
End With
End Sub
mais "PJ"est déjà sélectionné copier et coller
gymgazelle à dit: j'aimerai pouvoir coller la colonne "soir" dessous "masj" et faire de même pour "pj" et "psoir"