L Leskwal XLDnaute Occasionnel 22 Février 2016 #1 Bonjour le forum, une question, malgré mes recherches sur le forum, je n'ai pas trouvé ce que je désirais. En fait, tout est dans le titre J'aimerais, à l'aide d'une macro affectée à un bouton, insérer une colonne à droite d'une cellule sélectionnée. J'ai enregistré une macro de manière manuelle en essayant de remplacer ensuite certains éléments par, par exemple la commande "ActiveCell" ... etc Mais j'ai échoué .. Quelqu'un pourrait-il m'aider ? Un grand MERCI d'avance Pascal
Bonjour le forum, une question, malgré mes recherches sur le forum, je n'ai pas trouvé ce que je désirais. En fait, tout est dans le titre J'aimerais, à l'aide d'une macro affectée à un bouton, insérer une colonne à droite d'une cellule sélectionnée. J'ai enregistré une macro de manière manuelle en essayant de remplacer ensuite certains éléments par, par exemple la commande "ActiveCell" ... etc Mais j'ai échoué .. Quelqu'un pourrait-il m'aider ? Un grand MERCI d'avance Pascal
mutzik XLDnaute Barbatruc 22 Février 2016 #2 Re : Insertion d'une colonne à droite d'une cellule bonjour, et le fichier exemple ou ce que tu as fait et qui ne fonctionne pas ... on progresse aussi en corrigeant et en comprenant ses erreurs Vote positif 0 Vote négatif
Re : Insertion d'une colonne à droite d'une cellule bonjour, et le fichier exemple ou ce que tu as fait et qui ne fonctionne pas ... on progresse aussi en corrigeant et en comprenant ses erreurs
phlaurent55 Nous a quittés en 2020 Repose en paix 22 Février 2016 #3 Re : Insertion d'une colonne à droite d'une cellule Bonjour à tous, Leskwal à dit: J'aimerais, à l'aide d'une macro affectée à un bouton, insérer une colonne à droite d'une cellule sélectionnée. Cliquez pour agrandir... avec ce code: Code: Columns(ActiveCell.Column + 1).Select Selection.Insert Shift:=xlToRight ou Code: Sub Bouton1_Clic() Columns(ActiveCell.Column + 1).Select Selection.Insert Shift:=xlToRight End Sub à+ Philippe Vote positif 0 Vote négatif
Re : Insertion d'une colonne à droite d'une cellule Bonjour à tous, Leskwal à dit: J'aimerais, à l'aide d'une macro affectée à un bouton, insérer une colonne à droite d'une cellule sélectionnée. Cliquez pour agrandir... avec ce code: Code: Columns(ActiveCell.Column + 1).Select Selection.Insert Shift:=xlToRight ou Code: Sub Bouton1_Clic() Columns(ActiveCell.Column + 1).Select Selection.Insert Shift:=xlToRight End Sub à+ Philippe
L Leskwal XLDnaute Occasionnel 22 Février 2016 #4 Re : Insertion d'une colonne à droite d'une cellule Bonsoir Un très grand merci à vous. J'ai tout à fait compris le code Code: Columns(ActiveCell.Column + 1).Select Selection.Insert Shift:= que je vais insérer dans le code de mon bouton. C'est l'expression " Columns(ActiveCell.Column + 1).Select" que je ne trouvais pas. Manque de pratique ... Encore un très grand MERCI. Pascal Vote positif 0 Vote négatif
Re : Insertion d'une colonne à droite d'une cellule Bonsoir Un très grand merci à vous. J'ai tout à fait compris le code Code: Columns(ActiveCell.Column + 1).Select Selection.Insert Shift:= que je vais insérer dans le code de mon bouton. C'est l'expression " Columns(ActiveCell.Column + 1).Select" que je ne trouvais pas. Manque de pratique ... Encore un très grand MERCI. Pascal