Racine carré

Bonjour ,

Ci-joint dans le fichier , un userform et deux textbox .

Je souhaiterai lorsque je rentre un nombre dans la texbox1 que la texbox2 affiche la racine carré du nombre entré dans la textbox1.

Merci de vos expertises.

Bonjour

Code à placer dans le module de l'userform

Private Sub TextBox1_Change()
  If Trim(Me.TextBox1) <> "" Then
    Me.TextBox2 = Sqr(Val(Replace(Me.TextBox1, ",", ".")))
  Else
    Me.TextBox2 = ""
  End If
End Sub

Cher Banzai,

Bonjour, comment vas-tu ?

J'ai lu ta solution sur la racine carrée, est-il possible de faire la même chose avec la PUISSANCE avec un UF

Ex : =PUISSANCE(5;2)' ' = 5 ². avec u choix pour le nombre et un choix pour la puissance.

Un grand merci d'avance et bon dimanche à tous

Papy Pierrot

56racine-carree.xlsm (19.12 Ko)

Bonjour

chaud

A tester

Rechercher des sujets similaires à "racine carre"