Bonjour le forum,

Je sèche sur une manip' toute bête, qui consiste à insérer une colonne préalablement coupée.
Je suis passéé par l'enregistreur de macro et ai ensuite adapté le code.

Seulement ça ne marche pas, et je ne vois pas pourquoi...

voilà mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
With Sheets("Initial Data")
 
        .Columns("E:E").Cut .Columns("D:D").Insert Shift:=xlToRight
 
End With
C'est sûrement très bête mais ça me dépasse...

Quelqu'un pourrait-il corriger mon erreur SVP ?)

Merci d'avance et bon après-midi à toutes et tous.