copier texte formule

Denis132 · 5 Février 2012

Bonjour à tous,

J'aimerais avoir une macro qui me copie la formule de la cellule sur laquelle je suis dans la cellule de la colonne suivante.

exemple: je suis sur la cellule f5 qui contient la formule =somme(f1:f4), je voudrais que la cellule g5 contienne le texte =somme(f1:f4). Ainsi dès que je me place sur une cellule quelconque et que j'exécute ma macro, j'ai le texte dans la colonne suivante.

Merci

Denis

JCGL · 5 Février 2012

Re : copier texte formule

Bonjour à tous,

Sans exemple de l'attendu :

Sub Test()
ActiveCell.Copy ActiveCell.Offset(0, 1)
Application.CutCopyMode = False
End Sub

A + à tous

Denis132 · 5 Février 2012

Re : copier texte formule

Bonjour,

Merci jcgl, mais ce n'est pas ce que je voulais(ma question n'était pas très claire) alors voici un fichier exemple.

Merci

Victor21 · 5 Février 2012

Re : copier texte formule

Bonjour, Re, JC

Essayez :

Sub test()
ActiveCell.Offset(0, 1).Value = "'" & ActiveCell.FormulaLocal
End Sub

Denis132 · 5 Février 2012

Re : copier texte formule

Bonjour,

Merci Patrick, c'est exactement ce que je voulais.

Denis

copier texte formule

Denis132

XLDnaute Impliqué

JCGL

XLDnaute Barbatruc

Denis132

XLDnaute Impliqué

Pièces jointes

Victor21

XLDnaute Barbatruc

Denis132

XLDnaute Impliqué

Discussions similaires

copier texte formule

Denis132

XLDnaute Impliqué

JCGL

XLDnaute Barbatruc

Denis132

XLDnaute Impliqué

Pièces jointes

Victor21

XLDnaute Barbatruc

Denis132

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency