MACRO TRANSFERT DES LIGNES DE LA FEUILLE 1 VERS FEUILLES 2, 3 et 4

  • Initiateur de la discussion Initiateur de la discussion urbanito1
  • 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 !

urbanito1

XLDnaute Occasionnel
Bonjour le forum

j'ai un fichier excel 2007 avec feuille 1 171803 lignes

je cherche une macro pour transférer vers les feuilles 2 , 3 et 4

à mon niveau je suis incapble de le réaliser

merci pour le coup de mains,

fichier en annexe

urbanito1
 

Pièces jointes

Re : MACRO TRANSFERT DES LIGNES DE LA FEUILLE 1 VERS FEUILLES 2, 3 et 4

Sub tranfert()

Sheets(1).Select
'finCol = Sheets(1).Range("A65536").End(xlUp).Row
NbLignes = Sheets(1).UsedRange.Rows.Count
Sheets(1).Range("A1:A65000").Copy (Sheets(2).Range("A1"))
Sheets(1).Range("A65001:A130000").Copy (Sheets(3).Range("A1"))
Sheets(1).Range("A130000:A" & NbLignes).Copy (Sheets(4).Range("A1"))


End Sub

OKmerci bien yassoux
je pense avoir compris globalement l'écriture
bonne après-midi
urbanito1
 
- 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

Retour