opération de calcul dans cellule

[celysi]

Est-il possible de faire avec une macro l' opération suivante :
Cellule A1 :'1' ou '2' ou 'S' ...
Cellule B1 : (32+21)x(15-3)

et que dans la cellule demandée en A1 (ex: si A1 '2'=> alors D1...)
j' ai le résultat : 636 qui s' affiche.

Merci.

 

[Yan L]

Bonjour,

A priori, oui! Mais donnez nous plus de détails, sinon nous aurons du mal à vous guider...
Bonne continuation.

Yan

 

[Hervé]

Bonjour celysi, yann

Si j'ai bien compris, tu peux essayer ceci :

Sub Bouton1_QuandClic()
If Range('a1') = 2 Then
    Range('d1') = Evaluate(Range('b1').Value)
End If
End Sub

ATTENTION : le signe multiplié n'est pas le x mais * . si tu corriges pas ton texte en B la macro va buggué.

salut