insertion d'une macro

[natorp]

bjr à tous

je souhaite ajouter des lignes après la dernière en passant par une macro reliée à un bouton.
je n'ai pas le bon code dedans car le copier/coller se positionne sur la dernière ligne au lieu de la dernière+1
voir fichier joint
merci de votre attention
Gérard [file name=Classeur2_20060512131618.zip size=8460]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur2_20060512131618.zip[/file]

 

[Dan]

Bonjour,

Modifie ta macro comme suit :

Sub toto()
Dim derlig As Variant
derlig = Sheets('feuil1').Range('A65536').End(xlUp).Row + 1
Range('G5:I6').Copy Destination:=Cells(derlig, 1)
Application.CutCopyMode = False
End Sub

Si pb n'hésite pas

 

[Dan]

Re,

Oups :sick:
Bonjour à jmps ! ...

 

[Dan]

Dommage ! :silly:

 

[natorp]

merci à vous 2
j'ai choisi la sol de jmps car moins de correction ;-)))

Gérard

 

[Dan]

Re,

Pan ! t'es mort Jmps !

 

[Dan]

et oui, Ombré
le temps de la prendre et de la charger au boulot !
et Paf !

:S