Bonjour le Forum,
j'ai besoin de votre aide pour modifier le code suivant qui, dans le fichier joint, permettra de recopier successivement les valeurs de la colonne "A" dans la colonne "D".
La macro1 est une macro d'essai qui sera remplacée par une autre pour chacune des valeurs présentes dans la colonne "A".
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Sub Macro1() ' ' Macro1 Macro ' ActiveSheet.Unprotect Range("A1").Select Selection.Copy Range("D1").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False ActiveSheet.Protect End Sub
La colonne "A" comprend plus de 200 valeurs.
Je vous remercie pour vos réponses et vous souhaite un bon après-midi.
Cordialement.
Nonno 94.
Partager