Macro Excel

Pyros971 Messages postés 2 Date d'inscription mercredi 20 février 2008 Statut Membre Dernière intervention 21 février 2008 - 20 févr. 2008 à 17:13
Pyros971 Messages postés 2 Date d'inscription mercredi 20 février 2008 Statut Membre Dernière intervention 21 février 2008 - 21 févr. 2008 à 12:04
Bonjour,

J'ai un soucis, j'ai utilisé la macro suivante:
Sub CopieZoneCourante()


Range("A1").CurrentRegion.Copy
Sheets("Feuil1").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("GLOBAL PLANNING").Select
Application.CutCopyMode = False


End Sub
 
Celle-ci permet de copier une plage de donnée variable d'une feuille 1 vers une feuille 2.

Je voudrais savoir comment je peux copier une plage de donnée variable sur plusieurs feuilles du classeur.

Exemple:

données Feuille 1:
-RER A
-RER B
-RER C
-RER D....

je voudrais copier
RER A dans feuille 2
RER B dans feuille 3
RER C dans feuille 4 etc.

Merci à tous!!!




Pyros

2 réponses

bigfish_le vrai Messages postés 1835 Date d'inscription vendredi 13 mai 2005 Statut Membre Dernière intervention 20 novembre 2013 15
20 févr. 2008 à 18:53
Salut,

C'est un bon debut mais il y a plusieurs choses a corriger :

1) Tu n'es pas dans le bon Theme ! Tu aurais du poster ici : [infomsg.aspx Thèmes] / [infomsgf_VISUAL-BASIC_1.aspx Visual Basic 6] / [infomsgt_LANGAGES-DERIVES_287.aspx Langages dérivés] / [infomsgt_VBA_244.aspx VBA] /

2) pas besoin de faire des select et copy pour transferer des données entre 2 feuilles ou autre.

la macro suivant suppose que la plage selectionné ce trouve en feuille1

Sub Macro1()
    Dim maplage As Range
    Set maplage = Selection
    Sheets("Feuil2").Range(maplage.Address).Value = maplage.Value
End Sub

A+
0
Pyros971 Messages postés 2 Date d'inscription mercredi 20 février 2008 Statut Membre Dernière intervention 21 février 2008
21 févr. 2008 à 12:04
Pyros
0
Rejoignez-nous