VBA: Boucle tant que Fermé

Question

Bonjour, 

Je suis sur Excel 97 et je réalise un logiciel avec des userforms. Bref, sur un Userform, j'ai plusieurs Textbox. Ces textbox sont des valeurs à rentrer qui vont se mettre sur une feuille Excel utilisé comme base de donnée. En plus de ces textbox à remplir, j'ai également un bouton annuler et valider. J'aimerais faire un truc à la Do While ou Do untile While, genre tant que tous les textbox ne sont pas remplis, on reste bloqué sur le userform avec un message d'alerte type vbError. J'ai à peu près une idée de l'ensemble en français mais c'est pour le  traduire en langage VBA que je galère. 

MErci:)

f894009 · Answer

Bonjour,

A integrer et adapter dans le code du bouton valider
  Dim Cont As Control
  '-------------------------------------------------------------
    'C'est la routine "Lire" de cette astuce
    For Each Cont In Me.Controls
        If TypeOf Cont Is MSForms.TextBox Then
            If Cont.Object.Text = "" Then
              MsgBox "ATTENTION! Manque une ou plusieurs informations."
              Exit Sub
            End If
        End If
    Next Cont
  '-------------------------------------------------------------


Bonne suite

VBA: Boucle tant que

1 réponse

Discussions similaires