Suppression provisoire d'une TextBox

Bonjour.

Papy débutant avec Excel 2003, j'ai créé un fichier Excel 2003 dans le quel j'effectue des saisies via un UserForm comportant 5 TextBox.

Lorsque la saisie est terminée, le clic sur un CommandButton "Valider" ajoute une nouvelle ligne avec les infos saisies.

La première TextBox ne me sert en fait que lors de la première saisie.

Est-il possible, grâce à une macro de supprimer cette TextBox afin de ne pas toucher à la 1ère saisie effectuée avec cette TextBox?

De plus, un CommandButton sert à réinitialiser les saisies. Est-il possible, suite à cette réinitialisation de retrouver la TextBox dans l'UserForm?

Merci à tous ceux qui pourront m'aider.

Bonjour,

tu pourrais caché le TextBox au lieu de le supprimer,

Me.TextBox1.Visible = False
MsgBox Me.TextBox1.Value

Bonjour i20100 et merci te pencher sur mon fichier.

Tu as raison, je peux cacher la TextBox au lieu de la supprimer... C'est d'ailleurs exactement ce que je pensais faire et tu m'as très bien compris.

Néanmoins, dans ma ComboBox, j'ai inséré des contrôles afin de vérifier que les TextBox soient bien renseignés et ton code génère un message d'erreur comme tu peux le constater dans la copie en pièce jointe.

J'apprends "sur le tas" à utiliser Excel 2003 et un peu de VBA et j'avoue ne pas savoir comment éviter ce message.

Aurais-tu une idée?

Cordialement.

10copie-exemple.zip (67.54 Ko)

Bonjour à tous,

Au début du code du bouton "Valider" du "Userform1" ...

Modif ...

Private Sub CommandButton1_Click()
    Dim i As Integer, der_ligne As Long, flag&

        '0 Contrôles des saisies
    flag = 0
    For i = 2 To 5  ' << était 1 To 5, ainsi, l'on ne contrôle plus le TextBox1 ni le Labbel1, lesquels seront masqués.
        Controls("Label" & i).ForeColor = &H80000012
        If Controls("TextBox" & i).Value = "" Then
            Controls("Label" & i).ForeColor = &HFF&
            flag = 1
        End If
    Next i
    If flag = 1 Then
        MsgBox "Saisies incomplètes.", 16
        Exit Sub
    End If

ric

Bien sur!!! Merci Ric...

Erreur de débutant, sans doute!

Bonne journée.

Bonjour,

Ne dit-on pas ... "L'expérience est la somme de nos erreurs!"

ric

Ben je devrai avoir de l'expérience, alors ! ! !

Rechercher des sujets similaires à "suppression provisoire textbox"