Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1668to1672
1668to1672
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Label einblenden wenn Textbox1 eingeblendet wird

Forumthread: Label einblenden wenn Textbox1 eingeblendet wird

Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 18:21:05
Steffen
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
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 18:37:05
Werner
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
Anzeige
AW: Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 18:55:34
Steffen
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
AW: Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 18:58:33
Werner
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
Anzeige
AW: Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 19:07:40
Steffen
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
AW: Label einblenden wenn Textbox1 eingeblendet wird
23.01.2019 08:39:56
Daniel
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
Anzeige
AW: Label einblenden wenn Textbox1 eingeblendet wird
23.01.2019 16:43:18
Steffen
Hallo Daniel
Danke für deine Antwort und Vorschläge.
Aber mit der ComboBox bin ich besser dran trotzdem danke.
Gruß Steffen
AW: Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 19:39:40
Werner
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
Anzeige
AW: Label einblenden wenn Textbox1 eingeblendet wird
23.01.2019 16:33:34
Steffen
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
Gerne u. Danke für die Rückmeldung. o.w.T.
25.01.2019 11:51:57
Werner
AW: Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 18:37:52
Daniel
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
Anzeige
AW: Label einblenden wenn Textbox1 eingeblendet wird
22.01.2019 18:58:11
Steffen
Hallo Daniel
Danke für die schnell, Antwort funktioniert.
Gruß Steffen
;

Forumthreads zu verwandten Themen

VBA Code: wenn B1 <> blank, dann I in A1 schreiben
maxx_1985

Hi mit'nander
Braeuchte einen kleine Code dafuer:
wenn B1 blank, dann schreibe ein I in A1.
kann mir vielleicht jemand helfen? :-)
vielen vielen dank
denis
18.11.2008 16:27:16
Thread-ID: 1025694
5 Beiträge
Anzeige
Formel wenn dann zellvergleich Text
Karel

Hallo Forum,
wie kann ich Zellwert C mit Zellwert E vergleichen ausgaben in Zelle A
wenn C und D Leer dsnn A auch Leer
Tabelle1

 ABCDE2Ausgabe Textwert Textwert3Offen Bezahlt Offen4Bezahlt Bezahlt Bezahlt5Offen Bezahlt  6Of...
28.11.2008 20:04:52
Thread-ID: 1028782
5 Beiträge
Formelproblem "wenn(text - beinhaltet, dann....)
Andi

Hallo Experten,
Ich steh bei folgender Excelformel an.
=WENN(D13=....folgender text beinhaltet ist (AA).....;"True";"false")
Ich würde gerne überprüfen ob im Feld D13 der Text "AA" vorkommt (z.B. Artikel "AA01"), falls dies zutrifft bitte "True" schreiben, ansonsten "false".
Da...
04.12.2008 11:42:00
Thread-ID: 1030117
3 Beiträge
Wenn ijn Spalte Datum von Jänner dann Werte zählen
Jänner

Hallo!
Ich habe in der Spalte A ab der Zeile 3 Datumwerte aus den Wochenenden und den Feiertagen stehen.
In der spalte G, H, I stehen nun Werte.
Ich möchte nun alle Werte in Abhängigkeit des Datums zusammenzählen.
Ist in der Spalte A das Jänner Datum vorhanden dann sollen die We...
07.01.2009 08:42:00
Thread-ID: 1037440
4 Beiträge
Mehr als sieben Werte bei WENN(Prüfung;Dann_Wert;S
Florian

Hallo zusammen,
WENN(Prüfung;Dann_Wert;Sonst_Wert). Leider kann ich nicht mehr als sieben Werte eingeben.
Gibt es eine Möglichkeit diese Obergrenze zu Umgehen?
Danke schon mal und schönes Wochenende :-)
13.03.2009 14:55:58
Thread-ID: 1059900
4 Beiträge
Wenn feste Zeichenfolge in Textbox, dann...
Lenni

Moin Excellianer!
Im Archiv finde ich leider nichts Vergleichbares und mit der InStr-Funktion setze ich mich auch schon bezüglich meiner Fragestellung auseinander. Komme aber leider zu keinen Ergebnissen.
In einem UserForm1 steht in der Textbox1 ein beliebiger Text von beliebiger Länge....
27.04.2009 22:31:44
Thread-ID: 1071497
3 Beiträge
wenn Änderung Zellinhalt dann Macro
Joachim

Hallo,
ich hab 2 Tabellen (Eintrag und Statistik) und 2 Diagramme (Fehler und TelFax). Bei der Tabelle Statistik habe ich folgenden Code eingetragen:
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("D2:G30")) Is Nothing Then Call DiaFehlerFormat Call...
07.05.2009 14:02:59
Thread-ID: 1073604
12 Beiträge
Wenn "Test" in I19:I23 dann Wert kopieren
Heinz

Guten morgen Leute
Habe ein Problem,deren Lösung ich nicht weiterkomme.
ZB. In Sheet "Zuschauer"A2 =WENN('R1'!$I19:$I23="Test";R1'!$j$19
In Sheet "Zuschauer" geht es bis 'R36' A2 - A3 - A4 usw. es geht um ein Diagramm für Zuschauer bei
HEIMSPIELEN.
Wenn zB. 'R3 "Test" i...
11.07.2009 10:40:54
Thread-ID: 1087834
2 Beiträge
Wenn Dann Funktion mit zählen wenn
Christian

Hallo zusammen,
ich brauche eine Funktion, die es mir ermöglicht, in einem Datenblatt erst nach einem bestimmten Wert zu suchen und dann zum gefundenen Wert einen weiteren Wert zu suchen und diese dann in der Anzahl zusammen zu zählen.
Bisher dachte ich, ich komme so zu meinem Ziel:
...
07.08.2009 10:26:38
Thread-ID: 1094218
3 Beiträge
Stichwort in Zelle B7,dann zusammzählen VBA
Wolfgang

Hallo,
im Tabellenblatt "Start" befinden sich in Zelle B7 bis B23 bestimmte Stichwörter, die auch in Tabelle "Daten", Spalte H vorkommen. Ich würde gerne zu jedem Stichwort zwei Abfragen klären:
Beispiel:
(Abfrage1)
1. Stichwort aus Zelle B7 kommt in Spalte H (Tabelle "Daten") v...
06.10.2009 19:49:07
Thread-ID: 1107632
10 Beiträge
Wenn und wenn dann vom 1.11. DANKE FÜR DIE HILFE
Thomas

Hallo,
es geht um meinen Beitrag "Wenn und wenn dann" vom 1.11.09
Warum auch immer ich es nicht mehr schaffe auf meinen eigenen Beitrag zu antworten, möchte ich mich bedanken für die rasche und zielgenaue Hilfe.
Am Ende nehme ich die Version von Daniel. Danke dafür! Das mit den Null...
03.11.2009 18:47:31
Thread-ID: 1114257
7 Beiträge
Wenn o dann Text in A1 rot
Heinz A. Wankmüller
Hallo Jörg,dafür verwendest am besten die Bedingte Formatierung.
Setze den Cursor in die Zelle A1 und rufe Format/Bedingte Formatierung auf. Wähle anstatt Zellwert ist den Eintrag Formel ist und gib die Formel =$A$12="o" ein. Danach definierst du noch das gewünschte Format mit roter, vielleicht...
16.04.2002 17:25:23
Thread-ID: 113808
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige