Copier des données sur plusieurs feuilles

Résolu
NLAH Messages postés 135 Statut Membre -  
 Utilisateur anonyme -
Bonjour,

Je souhaite créer une macro qui copier une plage de cellule(A1:A2) depuis ma première feuille nommée "1" sur toutes les autres feuilles de mon classeur nommées "2",....."8".la plage de destination est:(C1:C2)
comment je peux faire?
cordialement
A voir également:

1 réponse

Utilisateur anonyme
 
 
Bonjour nihadlahit,

Voici le code VBA :

 
Option Explicit

Sub Essai()
  Dim n As Byte: Application.ScreenUpdating = False
  Worksheets(1).Range("A1:A2").Copy
  For n = 2 To 8
    ActiveSheet.Paste Worksheets(n).[C1]
  Next n
  Application.CutCopyMode = False
End Sub


Si ton problème est réglé, merci d'aller en haut de page
pour cliquer sur « Marquer comme résolu ».

Cordialement.  😊
 
0
NLAH Messages postés 135 Statut Membre 2
 
Merci,j'ai encore un petit souci si par exemple les feuilles de destination sont nommées :
"Nom","Adresse","Lieu".Qu'est ce que je dois faire?
cordialement,
0
Utilisateur anonyme > NLAH Messages postés 135 Statut Membre
 
Tu peux utiliser mon code VBA tel que, car pour la destination,
ça utilise non pas le nom des feuilles mais leur index (c'est-à-
dire le de feuille dans le classeur) : Worksheets(n)
0