Discussion :

[vhjup]

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

[mapeh]

Bonjour,

regarde bien dans ton fichier, il doit y avoir des cellules fusionnées..

Soit A1B1C1 ou toute autre ligne....

Pour éviter ce désagrément, évite les .Select

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Columns("A:A").Insert Shift:=xlToRight