Macro copier coller à la 1ere ligne disponible

corate92

XLDnaute Junior
Bonjour le forum,

j'essaie de faire une macro de sorte que (par exemple),
feuille 1: sélection de la plage A1:B9, copier
feuille 2: colle à la première ligne disponible

Désolée mais j'ai du mal avec cela...:(

Cora

(qui a vraiment du mal aujourd'hui)
 

Staple1600

XLDnaute Barbatruc
Re : Macro copier coller à la 1ere ligne disponible

Re


C'est ce que faisait la macro exemple de mon précédent message

En voici une autre plus lisible

Code:
Sub testII()
Dim Source As Range
Dim Destination As Range
'Définition de la plage à copier
Set Source = Sheets(1).Range("A1:B9")
'Détermination de la 1ère cellue vide de la colonne A de la feuille 2
Set Destination = Sheets(2).Range("A" & Sheets(2).[A65536].End(xlUp).Row + 1)
'Recopie de de la Source vers sa Destination
Source.Copy Destination
End Sub
 

Discussions similaires

Réponses
7
Affichages
554

Statistiques des forums

Discussions
312 310
Messages
2 087 127
Membres
103 479
dernier inscrit
Compta