Coller dernière ligne excel [Résolu/Fermé]

Signaler
-
 mickysor -
Bonjour,
je précise je n'y comprends pas grand chose au langage macro.
j'ai une macro comme ceci:

Sub fd()
'
' fd Macro
' Macro enregistr?e le 18/02/2011 par mick
'

'
Range("B20:G55").Select
Range("F54").Activate
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Sheets:=1
Sheets("STATS-FD").Select
Range("A5").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Range("B1").Select
End Sub

je souhaiterais qu'il me copie la séléction pas sur "a5" mais sur la dernière ligne vide sans texte!
merci d'avance!

2 réponses

Messages postés
23806
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
17 janvier 2021
6 571
Bonjour,

Remplace :
Range("A5").Select
par :
Range("A65536").end(xlup).offset(1,0).Select

eric
ce topic est résolu merci!

Je ne sais pas comment l'afficher en résolu désolé.