Que des colonnes

Re,

Savez-vous comment ajouter plusieurs colonnes d'un coup. Faire insertion *30, ça devient long !

Perso , je copie des colonnes vierges à droite et je fait "insérer les cellules copiées" " décalage vers la droite"à l'endrtoit ou je veux insérer mes colonnes... Mais il doit y avoir une solution plus conventionnelle...

Edit : autre solution plus rapide : sélectionnez plusieurs colonnes au lieu d'une a partir de l'endroit ou vous voulez insérer et faites "insérer"-> ca insère le même nbr de colonnes que surligné

Bonjour

Macro à placer dans un module ;

Sub InsertionColonne()
    Dim NbColonne As String

    NbColonne = InputBox("Nombre de colonnes à ajouter ?")
    ActiveCell.Resize(, NbColonne).EntireColumn.Insert Shift:=xlToRight

End Sub

Cela ajoutera x colonnes à gauche de la cellule sélectionnée.

Amicalement

Nad

Bonjour,

Sans macro, on peut aussi sélectionner 30 colonnes, et faire Insertion... une seule fois !

Cordialement,

Edit : Désolée Rrradassse, pas vu ton Edit...