Macro pour faire appraitre un txt box

[Féfé]

Bonjour le forum, à vous tous passionné et professionel d'Excel

Mon souci est que je n'arruve pas à mettre en place un ti bout de code qui associé à un CommandButton me fasse apparaître un disparaître des textbox.


En fait j'ai un text box ou dedans j'ai mit des formes automatiques pour constituer une pièce graphique, j'aimerai que lorsque j'appui sue mon CommandButton, cet ensemble soit visible ou non, mais je n'arrive pas à créer cette macro.

J'ai éssayé de lui donné des noms, divers code mais sans aucuns succés, si quelqu'un pouvai m'aider à résoudre ce petit problème j'en serai reconnaîssant et redevable.

Comptant sur vos réponses, je vous souhaite à tous une excellente journée.

@ + Féfé

 

[GClaire]

Féfé, le forum

Si j'ai bien compris, essaye cela :

Avec 1 Bouton, et 1 TextBox

Private Sub CommandButton1_Click()
If CommandButton1.Caption = "TextBox visible" Then
TextBox1.Visible = True
CommandButton1.Caption = "TextBox invisible"
Else
TextBox1.Visible = False
CommandButton1.Caption = "TextBox visible"
End If

End Sub

Private Sub UserForm_Initialize()
TextBox1.Visible = False
CommandButton1.Caption = "TextBox visible"
End Sub

Salut, G'Claire

 

[Féfé]

Bonjour G'Clair, le forum

Désolé de répondre aussi tardivement, mais je n'étais pas sur mon poste, tu as fait exactement ce que je souhaitais et donc je te remercie grandement c'est le code que voulais créer.

En fait je ne y arrivais pas car j'insérais une Zone de Texte et non Textbox.

Merci encore, c'est grâce à vous qu'on en apprend tous les jours.

Je te souhaite une bonne journée ainsi qu'à tous le forums

@ + Féfé