calculs sur du texte

[joel]

Bonjour à toutes et tous,

j'aimerai que des "formules" saisies sous forme de texte restent dans la cellule d'origine sous forme de texte et soient calculées automatiquement dans une autre cellule.

Par exemple saisir en A1 : (20.10*12.30), conserver cette présentation en A1 et obtenir le résultat du calcul soit (247.23) en B1.

Qui pourrait me tuyauter ?

A+, merci

 

[Moa]

Salut Joel !

Vite fait en passant :

C'est simple, tu mets un espace devant ta formule en A1, puis tu fais une macro qui te recopie ta cellule A1 en B1 en enlevant l'espace devant.

Voilà une macro qui fonctionne :

Sub FormuleA1()
Range("b1") = LTrim(Cells(1, 1).Value)
End Sub

Si tu changes souvent de formule, tu peux rendre ta macro évènementielle.

@ +

Bonne journée à tous !

Moa

 

[Rai]

Bonjour à vous 2,

Avec une macro, tu peux écrire ceci :
[B1].Formula = "=" & [A1]

ce qui présente l'avantage de ne pas avoir à saisr d'espace,
et de gérer automatiquement la présence (ou non) d'espaces ou d'apostrophes en début d'expression.

Le mieux serait de produire une fonction perso pour gérer tout ça,
mais pour l'instant je seche ... 8-(

A bientôt

Rai