Copie d'une colonne

Bonjour

J'ai un fichier avec plusieurs feuilles

Dans la feuil1 colonne A à partir de A3 j'ai une série de noms.

Je voudrais recopier chaque nom dans la cellule A1 de toutes mes feuilles

Comment procéder j'ai fait des essais mais pas concluant.

Merci pour votre aide

Bonjour,

Avec la macro suivante ça devrait marcher.

Sub Macro1()
'
' Macro1 
'

Sheets("feuil1").Select 'feuille à renommer par le bon nom
    Range("A3:A2000").Select
    Selection.Copy
    Sheets("feuil2").Select 'feuille à renommer par le bon nom
    Range("A1:A2000").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("Feuil3").Select 'feuille à renommer par le bon nom
    Range("A1:A2000").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
End Sub

Bonjour

Merci pour ton aide

J'ai fais un essai ça me recopie la colonne A dans une feuille

Ce que je souhaite c'est:

Le nom qui se trouve en feuille1 cellule A3 aille en feuille A cellule A1

Le nom qui se trouve en feuille1 cellule A4 aille en feuille B cellule A1

Le nom qui se trouve en feuille1 cellule A5 aille en feuille C cellule A1

ainsi de suite sur env 35 feuilles

Je ne sais pas si cela est réalisable

Cordialement

Quels sont les noms de tes feuilles?

J'ai cru comprendre que la première c'est "feuil1" ensuite "feuille A", "feuille B",...?? Et combien de feuilles? 30?

Ci joint un fichier exemple que tu n'as plus qu'à étendre sur tes feuilles. Je l'ai arrêté jusqu'à "feuille D".

Une boucle pourrait être également faite avec une insertion automatique de feuilles. Mais j'imagine que tu veux conserver les tiennes qui contiennent surement des données que tu ne souhaite pas effacer.