Problème Textbox USERFORM VBA EXCEL

Résolu
Gornarf Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   -  
Gornarf Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

Je fais encore appel à vous car je rencontre le problème suivant.

J'ai dans un formulaire plusieurs textbox que j'additionne

elles me donnent un résultat.

je soustrait ce résultat à celui d'une autre textbox.

Tout marche nickel par commandbutton_click

J'aimerai néanmoins que ces opérations se fassent toutes seules (si les textbox sont "non vide" sinon on attends qu'elles contiennent une valeur pour exécuter l'action)

Je sèche complètement sur comment procéder

J'ai essayé afterupdate mais sans succès.

Un petit coup de main svp?

Merci d'avance

6 réponses

  1.
    Morgothal Messages postés 1350 Statut Membre 184
     
    Salut,

    Essaye de mettre ta macro qui somme les textbox dans une private sub comme celle ci : 
    Private Sub TextBox1_Change()

End Sub

    Comme ça, la macro s'exécute lorsque que le contenu de la txtbox change.
    0
  2. Gornarf Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   3
     
    Salut,

    ça ne marche pas, j'ai déja essayé. La somme est conditionnelle.

    Si toutes les conditions ne sont pas remplie ça arrête le Sub

    Source du problème?
    0
    1. Gornarf Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   3
       
      J'ai parcourus la toile de long en large en essayant différentes choses avant de venir poster. Cette fonction est une fonction de confort et un autochange évitera de générer des erreur dans le cas ou l''utilisateur oublierai de cliquer sur le bouton ==> on fait sauter les boutons et on automatise... mais comment?... that's the question
      0
  3. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,
    Il existe un super méga hyper génial code VBA pour sommer automatiquement des textbox. Tu le trouveras à cette adresse
    En gros, il utilise deux modules de classe et un userform avec des textbox.
    Si tu as du mal à l'adapter à ton cas, dis le nous essaierons ensemble.
    0
  4. Morgothal Messages postés 1350 Statut Membre 184
     
    Peut etre dans un schéma de ce genre : 

    Private Sub TaDerniereTextbox_Change()   
If userform.txtbox1<>"" and userform.txtbox2<>"" Then   

UserForm.TaDerniereTextbox.Value = UserForm.txtbox1.Value + UserForm.txtbox2.Value   

End If   
End Sub
    0

  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Gornarf Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   3
     
    Je test vos propositions

    merci pour vos interventions ;)
    0
  7. Gornarf Messages postés 120 Date d'inscription   Statut Membre Dernière intervention   3
     
    Voila, en fait je retestai la premiere proposition de morgo.

    j'ai fais des Sub _change dans toutes les TB concernées et maintenant ca marche.

    En gros je rentrai mon Sub_change dans la mauvaise TB

    Encore un grand merci à tous les deux pour vos inspirations!
    0