Coller un tableau sur une nouvelle feuille
Résolu
NLAH
Messages postés
135
Statut
Membre
-
NLAH Messages postés 135 Statut Membre -
NLAH Messages postés 135 Statut Membre -
Bonjour,
je suis débutante en vba, je voudrais créer une macro qui:
colle un tableau sur une nouvelle feuille.
cordialement,
je suis débutante en vba, je voudrais créer une macro qui:
colle un tableau sur une nouvelle feuille.
cordialement,
1 réponse
-
Bonjour nihadlahit,
Tu ne donnes pas assez d'informations !
1) Pour la source (ton tableau à copier) :
a) Nom de la feuille sur laquelle il se trouve : Feuil1 ? autre ?
b) Plage de cellules de ton tableau (y compris une éventuelle
ligne d'en-têtes ; y compris une éventuelle ligne de totaux) ;
exemple : "B4:G200"
2) Pour la destination :
a) La feuille est-elle déjà présente, et de quel nom ? exemple :
Feuil2 ? autre ? Si la feuille destination n'est pas déjà présente,
il faut donc l'ajouter ; ce sera par exemple Feuil2, mais peut-
être préfères-tu lui donner un autre nom ? Si oui, lequel ?
b) Imagine que ton tableau est déjà copié ; quelle est la cellule
du coin haut gauche ? Car c'est à partir de celle-ci que se fera
la copie (vers le bas pour les lignes et vers la droite pour les
colonnes).
À te lire, cordialement. 😊
-
-
-
-
Voici le code VBA :
Option Explicit Sub Essai() ' Au départ, ton classeur a une seule feuille, nommée "Feuil1", ' donc tu es forcément dessus quand tu lances cette macro ; ' dernière ligne de ton tableau, selon la 1ère colonne H Dim dlig As Long: dlig = Range("H" & Rows.Count).End(xlUp).Row ' Ajout d'une nouvelle feuille à droite de la 1ère du classeur ' (donc Feuil1), qui sera nommée automatiquement Feuil2 Worksheets.Add , Worksheets(1) ' Tu as oublié d'indiquer quelle est la destination sur Feuil2 ! ' Je vais supposer par exemple que c'est à partir de B2 ; à toi ' de changer si nécessaire. Worksheets("Feuil1").Range("H2:L" & dlig).Copy [B2] End Sub
N'hésite pas à me demander plus d'infos si besoin.
Cordialement. 😊 -
-