Sujet Précédent Sujet Suivant

Copier des données sur plusieurs feuilles

Résolu/Fermé
NLAH Messages postés 125 Date d'inscription lundi 9 septembre 2013 Statut Membre Dernière intervention 13 juin 2017 - 10 août 2016 à 15:50
 Utilisateur anonyme - 10 août 2016 à 16:57
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

Réponse 1 / 1
Utilisateur anonyme
Modifié par albkan le 10/08/2016 à 16:28
 
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 125 Date d'inscription lundi 9 septembre 2013 Statut Membre Dernière intervention 13 juin 2017 2
10 août 2016 à 16:45
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 125 Date d'inscription lundi 9 septembre 2013 Statut Membre Dernière intervention 13 juin 2017
10 août 2016 à 16:57
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 n° de feuille dans le classeur) : Worksheets(n)
0

Discussions similaires

Dessiner avec son clavier et avec des lettres
JSS -
Polodu33 -

78 réponses
Reporter valeur sur autre feuille avec critere
Otk168 -
via55 -

4 réponses
Reporter des données d'une feuille dans une autre feuille
55ExcelPro -
PHILOU10120 -

1 réponse