Label einblenden wenn Textbox1 eingeblendet wird

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Label TextBox


Betrifft: Label einblenden wenn Textbox1 eingeblendet wird
von: Steffen A
Geschrieben am: 22.01.2019 18:21:05

Hallo zusammen.
Textbox1 wird durch Auswahl der Comobox eingeblendet.
Nun möchte ich , wenn Textbox1 eingeblendet wird auch Label1 eingeblendet wird.
Wie macht man das am besten?
Kann jemand helfen?
Gruß Steffen

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Werner
Geschrieben am: 22.01.2019 18:37:05
Hallo Steffen,
trotz VBA bescheiden könnte man da durchaus auch selbst drauf kommen.

Private Sub ComboBox1_Change()
 Dim x As Long
 x = CLng(ComboBox1.Value)
 TextBox1.Visible = x >= 1
 Label1.Visible = x >= 1
 TextBox2.Visible = x >= 2
 Label2.Visible = x >= 2
 TextBox3.Visible = x >= 3
 Label3.Visible = x >= 3
 End Sub
Gruß Werner

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Steffen A
Geschrieben am: 22.01.2019 18:55:34
Hallo Werner
Danke für die schelle Antwort.
Aber jetzt noch eine Frage kann Mann das auch mit den Change() Ereignis machen?
Wenn ja wie?
Gruß Steffen

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Werner
Geschrieben am: 22.01.2019 18:58:33
Hallo Steffen,
von welchem Change-Ereignis sprichst du denn bitte? Hast du es denn ausprobiert. Der Code ist doch im Change deiner Combobox mit drin. Sprich: Bei Auswahl eines entsprechenden Eintrages der Combobox wird die entsprechende Textbox und das entsprechende Label eingeblendet.
Wenn es nicht das ist was du willst, dann solltest du mal näher darauf eingehen, was wann, warum passieren soll.
Gruß Werner

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Steffen A
Geschrieben am: 22.01.2019 19:07:40
Hallo Werner.
Habe dein Code für die Comobox ausprobiert funktioniert prima .
Was ich meinte, ob man das auch mit einen Textbox Change() Ereignis machen kann?
Wenn ja wie?
Gruß Steffen

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Daniel
Geschrieben am: 23.01.2019 08:39:56
Hi
probiere es doch einfach selber aus und schreibe in das Change-Makro der TextBox folgende Codezeile:

Label1.Visible = Textbox1.Visible

bzw. falls das zu flackernden des Bildschirm führt auch so:
If Label1.Visible <> Textbox1.Visible then Label1.Visible = Textbox1.Visible

allerdings wird das dann auch dann jedesmal ausgeführt, wenn du neues Zeichen in die TextBox eingibst.
ist halt die Frage, ob das sinnvoll ist.
kann man machen, wenn du sowieso noch für andere Zwecke das Change-Event der TextBox verendest.
ansonsten erzeugst du damit nur zusätzliche Makros und es ist einfacher, wenn du das Einblenden des Labels dort durchführst, wo du auch die TextBox ein und ausblendest.
Gruß Daniel

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Steffen A
Geschrieben am: 23.01.2019 16:43:18
Hallo Daniel
Danke für deine Antwort und Vorschläge.
Aber mit der ComboBox bin ich besser dran trotzdem danke.
Gruß Steffen

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Werner
Geschrieben am: 22.01.2019 19:39:40
Hallo Steffen,
Versuch das mal im Change-Event von Textbox1.

Me.Label1.Visible = Len(Me.Textbox1) > 0

Für die anderen Textboxen dann analog.
Gruß Werner

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Steffen A
Geschrieben am: 23.01.2019 16:33:34
Hallo Werner
Danke für die schnelle Antwort.
Ist aber nicht was ich mir vorgestellt habe mit der Comobox ist es besser aber trotzdem danke.
Gruß Steffen

Betrifft: Gerne u. Danke für die Rückmeldung. o.w.T.
von: Werner
Geschrieben am: 25.01.2019 11:51:57


Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Daniel
Geschrieben am: 22.01.2019 18:37:52
Hi
Das Label kannst du genau so einblenden wie die Textbox.
Du kannst die Codezeile kopieren und den Textboxnamen durch den Labelnamen ersetzen.
Gruß Daniel

Betrifft: AW: Label einblenden wenn Textbox1 eingeblendet wird
von: Steffen A
Geschrieben am: 22.01.2019 18:58:11
Hallo Daniel
Danke für die schnell, Antwort funktioniert.
Gruß Steffen

Excel-Beispiele zum Thema "Label einblenden wenn Textbox1 eingeblendet wird"