Insérer colonne automatiquement

[Flohb]

Bonjour,

Je souhaiterai construire une macro qui me permettrai d'inserer (indéfiniment) automatiquement une collone toutes les deux colonnes. Je pense que je dois passer par une boucle mais jai un peu de mal.

Merci

 

[Flohb]

Re : Insérer colonne automatiquement

c pas possible en incrémentant une boucle?

 

[pierrejean]

Re : Insérer colonne automatiquement

bonjour Flohb
Salut carcharodon-carcharias

A tester:

Sub insere()

For n = 3 To 256 Step 2
Columns(256).ClearContents
Columns(n).Insert Shift:=xlToRight
n = n + 1
Next n
End Sub

 

[Flohb]

Re : Insérer colonne automatiquement

c exactement ce quil me fallait merci bcp Pierrejean