Macro vba excel: copier une plage de données
Fermé
nath94lp
Messages postés
2
Date d'inscription
lundi 11 mai 2009
Statut
Membre
Dernière intervention
12 mai 2009
-
11 mai 2009 à 18:20
nath94lp Messages postés 2 Date d'inscription lundi 11 mai 2009 Statut Membre Dernière intervention 12 mai 2009 - 12 mai 2009 à 14:07
nath94lp Messages postés 2 Date d'inscription lundi 11 mai 2009 Statut Membre Dernière intervention 12 mai 2009 - 12 mai 2009 à 14:07
Bonjour,
Est-il possible de créer une macro VBA sous Excel qui donne l'instruction de copier une plage de données (avec nombre de lignes et de colonnes variables selon les fichiers)?
Je débute, j'ai trouvé un exemple de macro pour copier avec un nombre de lignes variables mais avec un nombre de colonnes fixes. Merci de votre aide
Est-il possible de créer une macro VBA sous Excel qui donne l'instruction de copier une plage de données (avec nombre de lignes et de colonnes variables selon les fichiers)?
Je débute, j'ai trouvé un exemple de macro pour copier avec un nombre de lignes variables mais avec un nombre de colonnes fixes. Merci de votre aide
A voir également:
- Vba copier une plage de cellule variable
- Comment copier une vidéo youtube - Guide
- Excel compter cellule couleur sans vba - Guide
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Vba range avec variable ✓ - Forum VB / VBA
2 réponses
hich24
Messages postés
1635
Date d'inscription
mardi 2 octobre 2007
Statut
Membre
Dernière intervention
1 février 2025
753
12 mai 2009 à 13:13
12 mai 2009 à 13:13
le button doit etre sur la feuille qui contien les donnée a copyée , sinon pour mettre le button sur une autre feuille il faut ajouter la phrase en gras
sheets("mafeuille").select
Dim derlig As Long
Dim x As Long
derlig = Range("A65536").End(xlUp).Row
x = Range("iv2").End(xlToLeft).Column
Range(Cells(2, 1), Cells(derlig - 1, x)).Copy
sheets("mafeuille").select
Dim derlig As Long
Dim x As Long
derlig = Range("A65536").End(xlUp).Row
x = Range("iv2").End(xlToLeft).Column
Range(Cells(2, 1), Cells(derlig - 1, x)).Copy
12 mai 2009 à 14:07