Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Label
BildScreenshot zu Label Label-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Label einblenden wenn Textbox1 eingeblendet wird


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


Beiträge aus den Excel-Beispielen zum Thema "Label einblenden wenn Textbox1 eingeblendet wird"