Code VBA pour macro de recopie Résolu

Question

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


Configuration: Windows XP / Internet Explorer 6.0

Fafa m · Answer

J'ai omis de préciser qu'il s'agit d'un fichier et d'une macro Excel.

f894009 · Answer

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

Code VBA pour macro de recopie

2 réponses

Discussions similaires

Newsletters