Code VBA pour macro de recopie
Résolu
Bonjour,
J'ai un nombre variable de lignes avec des données sur 4 colonnes (A,B,C,D). La valeur en E1 doit se recopier de E2 à E "dernière ligne du fichier" Je procède en 2 temps :
1- je détermine la dernière cellule active de la colonne E :
Columns("E:E").Select
ActiveCell.SpecialCells(xlLastCell).Select
wlastcell = ActiveCell.Select
2- je copie la valeur de E1 dans la zone de E2 à wlastcell :
Range("E1").Select
Selection.Copy
Range("E2", wlastcell).Select
ActiveSheet.Paste
Application.CutCopyMode = False
Mais le Range ("E2",wlastcell) n'est pas correct et la macro de recopie ne fonctionne pas.
SVP, quelqu'un peut-il m'aider.
Merci
J'ai un nombre variable de lignes avec des données sur 4 colonnes (A,B,C,D). La valeur en E1 doit se recopier de E2 à E "dernière ligne du fichier" Je procède en 2 temps :
1- je détermine la dernière cellule active de la colonne E :
Columns("E:E").Select
ActiveCell.SpecialCells(xlLastCell).Select
wlastcell = ActiveCell.Select
2- je copie la valeur de E1 dans la zone de E2 à wlastcell :
Range("E1").Select
Selection.Copy
Range("E2", wlastcell).Select
ActiveSheet.Paste
Application.CutCopyMode = False
Mais le Range ("E2",wlastcell) n'est pas correct et la macro de recopie ne fonctionne pas.
SVP, quelqu'un peut-il m'aider.
Merci
2 réponses
-
Bonjour,
avec vos instructions excel:
Sub test() wlastcell = Columns("E:E").SpecialCells(xlLastCell).Address Range("E1").Select Selection.Copy Range("E2:" & wlastcell).Select ActiveSheet.Paste Application.CutCopyMode = False End Sub -
J'ai omis de préciser qu'il s'agit d'un fichier et d'une macro Excel.
