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

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

A voir également:

2 réponses

Réponse 1 / 2

hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023 752
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

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

super Merci beaucoup

Réponse 2 / 2

hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023 752
11 mai 2009 à 18:38

il suffit de mettre les nom en variable dans dux cellule que tu renseigne

nath94lp
12 mai 2009 à 09:19

Merci mais je ne vois pas trop comment faire. Aujourd'hui, ma macro est:
Dim derlig As Long

derlig = Range("A65536").End(xlUp).Row
Range(Cells(1 + 1, 1), Cells(derlig - 1, 10)).Copy

pour un tableau de 10 colonnes (je commence à la deuxième ligne et je ne veux pas prendre la dernière qui est une ligne de total).
Merci d'avance

hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023 752 > nath94lp
12 mai 2009 à 09:55

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

nath94lp > hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023
12 mai 2009 à 10:15

Super, merci beaucoup.
Je vais abuser mais j'ai encore une question. J'ai affecté cette macro à un bouton mais est-ce que je peux l'utiliser dans d'autres feuilles de calcul?.

hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023 752 > nath94lp
12 mai 2009 à 11:10

1-- si mes message en peut vous etre utiles alors voter pour aider simplifier la recherche ( le petit carrée vert )
2- oui c'est possible a une condition d'ajouter une instruction

sheets("nom de lafeuille ").select , nom de lka feuille est celui de la feuille ou se trouve le tableau

nath94lp > hich24 Messages postés 1619 Date d'inscription mardi 2 octobre 2007 Statut Membre Dernière intervention 11 avril 2023
12 mai 2009 à 12:38

quand je lance la macro par le bouton sur un autre ficher, cela me dit: erreur d'éxécution '9' l'indice n'appartient pas à la sélection. Si je fais fin, par contre, cela marche parfaitement.

Ma macro est:
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("macro").Select

"macro" est le nom de la feuille.

Discussions similaires

VBA : Sélectionner une plage de cellules

[VBA/Excel] Tri croissant dans une colonne

comment colorer une plage de cellule (VBA)

VBA Excel : sélection d'une plage variable

VBA Selection jusqu'a derniere cellule pleine

[VBA] Trier un tableau excel avec vba

Discussions similaires

Newsletters