AIDE POUR MACRO VBA
gilbert71
Messages postés
1
Statut
Membre
-
funbreizhou Messages postés 89 Statut Membre -
funbreizhou Messages postés 89 Statut Membre -
Je veux copier les données de plusieurs feuilles excel (nb de lignes et de feuilles variables) dans la feuille "récapitulatif".
Pouvez vous m'aider ? Je débute et j'en ai besoin urgent. Merci à tous.
Pouvez vous m'aider ? Je débute et j'en ai besoin urgent. Merci à tous.
A voir également:
- AIDE POUR MACRO VBA
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Excel compter cellule couleur sans vba - Guide
- Dépassement de capacité vba ✓ - Forum Excel
1 réponse
Bonjour,
Voilà ce que ca donne :
Sub copie()
' Copier le contenu des cellules A1 à C20 de la feuille 1 dans les cellules A1 à C20 de la feuille 3
Sheets("Feuil1").Select
Range("A1:C20").Select
Selection.Copy
Sheets("Feuil3").Select
Range("A1:C20").Select
ActiveSheet.Paste
' Copier le contenu des cellules D1 à E25 de la feuille 2 dans les cellules D1 à E25 de la feuille 3
Sheets("Feuil2").Select
Range("D1:E25").Select
Selection.Copy
Sheets("Feuil3").Select
Range("D1:E25").Select
ActiveSheet.Paste
End Sub
Et ainsi de suite, à adapter ... !
Voilà ce que ca donne :
Sub copie()
' Copier le contenu des cellules A1 à C20 de la feuille 1 dans les cellules A1 à C20 de la feuille 3
Sheets("Feuil1").Select
Range("A1:C20").Select
Selection.Copy
Sheets("Feuil3").Select
Range("A1:C20").Select
ActiveSheet.Paste
' Copier le contenu des cellules D1 à E25 de la feuille 2 dans les cellules D1 à E25 de la feuille 3
Sheets("Feuil2").Select
Range("D1:E25").Select
Selection.Copy
Sheets("Feuil3").Select
Range("D1:E25").Select
ActiveSheet.Paste
End Sub
Et ainsi de suite, à adapter ... !
