macro copier coller a la suite

  • Initiateur de la discussion Initiateur de la discussion chinel
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

chinel

XLDnaute Impliqué
Bonjour tout le monde, je voudrais bien copier les cellules n2 jusque la cellule s2 de ma feuille (range m2:s2) puis coller dans la même feuille en c10 à i10 (range c10: i10) puis après a la suite de l'autre quand je change les données de (rage m2:s2) et mettre en (range c11:i11) etc ... jusque la fin de la feuille C1048576: i1048576

style:
sheets("feuil3").range("m2:s2").copy
range("c10:i10").select
selection.paste
puis refaire la même chose mais
range("c11:i11").select
etc...

Merci d'avance !
 
Dernière édition:
Re : macro copier coller a la suite

Bonjour

Un code qui devrait répondre à la question
Code:
Dim Dl1 As Long ' dernière ligne utilisé
With Sheets("Feuil1")
Dl1 = .Range("C" & .Rows.Count).End(xlUp).Row ' dernière ligne
If Dl1 < 10 Then Dl1 = 10 

.Range("m2:s2").Copy _
Destination:=.Range("c" & Dl1 + 1)
End With

A tester

JP
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
1
Affichages
499
Réponses
5
Affichages
856
Retour