Bonjour,

Dans une feuille Excel, j'essaye d'utiliser l'instruction Insert Shift:=xlToRight pour ajouter une colonne blanche, mais la macro me donne des résultats différents et insère un nombre de colonnes que je n'arrive pas à contrôler.

J'ai simplifié au maximum le code qui pose problème et ça donne :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Sub Test()
Columns("A:A").Select
Selection.Insert Shift:=xlToRight
End Sub
Quand je fais tourner une première fois la macro
---> 3 colonnes ajoutées, la colonne A devient la colonne D

Quand je fais tourner une deuxième fois la même macro
---> 1 seule colonne ajoutée, la colonne A devient la colonne B

Si quelqu'un a une idée d'où peut venir le problème, je suis preneur, parce que là ça me dépasse un peu... Il y a certainement d'autres moyens pour arriver à ce que je veux faire, mais j'aimerais surtout comprendre pourquoi ce code peut donner des résultats différents.

Merci pour votre aide