formule VB/excel Résolu/Fermé

Question

Bonjour, 

je souhaite créer un programme de calcul pour des couvertures.

J'ai déjà créer l'interface avec Visualbasic, cependant, j'ai 2 texbox qui correspondent a la largeur et longueur de la couverture, j'aimerais, en rentrant les tailles dans ces textbox, voir apparaître dans la 3eme textbox la superficie en m2.
Afin de pouvoir calculé a partir de cette 3eme textbox, le prix total de la couverture..


J'espère avoir été assez clair.

Merci pour vos futures réponses

pilas31 · Answer

Bonjour,

Voila un exemple de code très simple associé à l'userform ou se trouvent les trois textbox  
Private Sub TextBox2_Change()
    Call Calcul
End Sub
Private Sub TextBox1_Change()
    Call Calcul
End Sub
Sub Calcul()
    If IsNumeric(TextBox1.Value) And IsNumeric(TextBox2.Value) Then
        TextBox3.Value = TextBox1.Value * TextBox2.Value
    End If
End Sub

Juste une remarque : S'il s'agit de TextBox directement insérés dans une feuille alors mettre ce code dans le code vba associé à la feuille.

Dernière remarque : S'il s'agit toujours de TextBox directement insérés (sous forme de contrôles AxtiveX) et que le VBA c'est pas votre truc (ce qui est respectable), alors il faut se mettre en mode création des contrôles et faire clic bouton droit sur les textbox pour renseigner la propriété "LinkedCel" et indiquer l'adresse d'une cellule de la feuille (par exemple respectivement A1, A2 et A3) Ainsi il est possible de mettre dans la cellule A3 la formule =A1+A2 et ainsi nous aurons le même comportement qu'avec le VBA.
 
Cordialement,

slaii17 · Answer

bonjour,

merci pour la réponse rapide, seulement je suis sous visual basic 2010 et la reference "value" n'est pas reconnue :

Erreur 1	'Value' n'est pas un membre de 'System.Windows.Forms.TextBox'.

slaii17 · Answer

Ca fonctionne ! Merci beaucoup !
Et effectivement, l'utilisation est plus aisée sur VBA !
Merci du conseil

Formule VB/excel

3 réponses

Discussions similaires