Excel Downloads Forums - Afficher un message

vekmort · 11/04/2006, 12h37

Bonjour,

Sub ArchiverAuDessousDuReste()
Selection.Copy
Sheets('Archive').Range('A65536').end(xlup).offset (1,0).PasteSpecial
Application.CutCopyMode = False
End Sub

Bonne journée,

vekmort sans soif

11/04/2006, 12h37	#3 (permalink)
vekmort XLDnaute Occasionel Date d'inscription: mars 2006 Messages: 109	Re:Copie colle a la suite d'un tableau Bonjour, Sub ArchiverAuDessousDuReste() Selection.Copy Sheets('Archive').Range('A65536').end(xlup).offset (1,0).PasteSpecial Application.CutCopyMode = False End Sub Bonne journée, vekmort sans soif