Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1920to1924
1920to1924
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text in Textbox bei negativen Wert

Forumthread: Text in Textbox bei negativen Wert

Text in Textbox bei negativen Wert
17.02.2023 15:20:09
Tom
Hallo Forum,
ich habe in meinem VB Projekt mehrere Comboboxen und Testboxen in denen auch Berechnungen erfolgen.
Ich möchte jetzt in den Textboxen in denen ein Wert kleiner als Null eingetragen ist die Schriftfarbe auf Rot setzen anders Rum bei positiven Werten auf grün.
Meine Frage ist , wie kann ich das verwirklichen? Mit einer IF Abfrage? Aber wo setze ich die Anweisung hin? In der Textbox bei den Ergebnissen?
Danke euch!
Gruß Tom
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text in Textbox bei negativen Wert
17.02.2023 16:02:25
Yal
Hallo Tom,
Versuche:
Private Sub TextBox1_Change()
    
    If IsNumeric(TextBox1.Text) Then
        If CDbl(TextBox1.Text) >= 0 Then
            TextBox1.Font.Color = RGB(0, 255, 0) 'grün
        Else
            TextBox1.Font.Color = RGB(255, 0, 0) 'rot
        End If
    Else
        TextBox1.Font.Color = 0 'Schwarz
    End If
End Sub
Dein TextBox muss, falls direkt im Blatt, vom Typ AktiveX sein. Beim Formularelement-Textbox funktioniert es anders.
VG
Yal
Anzeige
AW: Text in Textbox bei negativen Wert
17.02.2023 16:04:21
Mullit
Hallo,
nimm eine ActiveX-Textbox, dann doppelklick darauf, in das Tabellen-Modul dann folgender Eventcode:
Option Explicit
Private Sub TextBox1_Change()
With TextBox1
    If IsNumeric(.Value) Then
       If CDbl(.Value)  0 Then
         .ForeColor = vbRed
       Else
         .ForeColor = vbGreen
       End If
    End If
End With
End Sub
Gruß, Mullit
Anzeige
AW: Text in Textbox bei negativen Wert
17.02.2023 19:57:31
Tom
Hat super geklappt, danke für die Hilfe!
;

Forumthreads zu verwandten Themen

Suchfunktion - TextBox kein Text sondern Datum
Frank

Hallo Liebe Excelgemeinde!!!
In einer UserForm befindet sich folgender Code um bestimmte Einträge zu suchen. Da in der TextBox1 aber kein Text sondern ein Datum steht funktioniert dies nicht, da kommt die Meldung " Suchbegriff wurde nicht gefunden".
Was muss ich ändern, damit auch nach...
21.08.2008 15:35:00
Thread-ID: 1003541
4 Beiträge
Fokus in Textbox und Curser hinter Text
Reinhard

Hallo Wissende,
Autofilter "vergißt" einige Zeilen wenn mehr als 1000 unterschiedliche Listeneinträge da sind.
Deshalb bastelte ich mir folgenden Code. man hat im Blatt eine TextBox und eine Listbox. Je nach Eingabe in die Textbox erscheinen in der Listbox nur die Einträge die anfangs s...
12.09.2008 12:14:38
Thread-ID: 1009326
6 Beiträge
In Textfile bestimmte Zeile suchen
Pascal

In einem Textfile soll nach einer bestimmten Zeile (immer der gleiche Text) gesucht werden.
Wird dieser Text gefunden, so soll alles vom Beginn weg des Textfiles bis und mit dieser Zeile (plus zusätzlich noch die nächste Zeile) gelöscht werden.
Geht das irgendwie ?
Wenn ja, wie ?
24.09.2008 16:14:00
Thread-ID: 1012111
8 Beiträge
Text in Zelle suchen und markieren
Heiko

Hi, Excelianer,
kenne mich mit der Suche nach Strings nicht gut aus...
Ich habe mit Excel einen Kalender (händisch) erstellt mit dem Datum jeweils eines Monats in Spalte A (Text in Zelle: "01.10.2008", durch Formatierung angezeigt: "Mittwoch, 01. Oktober 2008"). Die Tabellenblätter heiß...
30.10.2008 08:21:00
Thread-ID: 1020459
5 Beiträge
Anzeige
Text in Textbox an Cursorposition einfügen
Peter

Hallo zusammen,
ein Problem mit einer Textbox beschäftigt mich nun schon eine ganze Zeit. Vielleicht habt Ihr ja eine Idee zur Lösung ...
Ich schreibe eine Anwendung mit einer Userform. Auf der Userform ist eine Listbox und eine Textbox. Per Doppelklick auf einen Eintrag in der Listbox...
26.11.2008 15:45:07
Thread-ID: 1028071
3 Beiträge
Von Textbox 27 Werte in Textbox 29
Heinz

Guten morgen Leute
Im unteren Code kann ich in Textbox27 eine 5 stellige Zahl eingeben,der mir dann im Worksheets("Artikeln") in Spalte A den übereinstimmenden Wert sucht.
Nun möchte ich aber das mir der Wert von Spalte B in Textbox29 anzeigt.
Z.B. Gebe in Textbox27 12345 ein, und...
09.01.2009 07:31:11
Thread-ID: 1038086
3 Beiträge
Text in Textbox kurze Zeit zeigen, dann lpöschen
Ramon

Hallo zusammen,
ich habe eine Datei, in der man sich per AutoFilter und Buttons (blenden Spalten ein und aus)
einen Bericht "stricken kann" und diesen dann per Knopfdruck in eine neue Datei kopieren kann.
Also nur die sichtbaren Zellen!
Damit der Benutzer eine Rückmeldung bekomm...
27.01.2009 12:55:00
Thread-ID: 1044191
4 Beiträge
Textphrasen in Textblöcken zählen
Richard

Hallo miteinander
Ich habe folgende Frage: Mit welcher Formel (oder VBA) kann ich herausfinden, wie häufig ein bestimmtes Wort in einem Feld vorkommt.
Bsp: Dies ist ein Hund, deshalb kommt dieser Hund in diesem Text und auch noch ein anderer Hund darin vor.
Anzahl Hund = 3
Mit d...
07.05.2009 12:52:30
Thread-ID: 1073570
4 Beiträge
Pfad mit Dialog suchen und in Textfeld schreiben
Beni

Hallo zusammen
Ich habe in einem Userform einen Button, der einen Dialog öffnen soll, in dem der User eine Datei auswählen kann.
z.B. Application.Dialogs(xlDialogOpen).Show "R:\FA\030 FAD"
Hat er eine Datei ausgewählt, soll diese NICHT geöffnet, sondern nur der Pfad des Ablageortes...
26.06.2009 16:11:27
Thread-ID: 1084646
6 Beiträge
Texte in Textfeldet per Makro umformatieren
Michael

Guten Tag,
ich bekomme von vielen diversen Personen Kommentare in Form von Textfeldern (ca. 90 pro Monat) zugesandt, die ich dann in mein Layout umformatieren muss (Bitten an die Sender mein benötigtes Format zu nehmen, finden leider selten Gehör:-(().
Jetzt habe ich mir die Frage geste...
02.07.2009 12:41:55
Thread-ID: 1085928
3 Beiträge
Anzeige
Text in einem Excel-Textfeld verändern
Sibylle

Guten Abend,
ein mehrzeiliger Text der in einem Excel-Textfeld steht, soll "verfremdet" , verschlüsselt werden, indem der Zeichencode verändert wird und in einem 2. Textfeld gespeichert wird.
Ich stehe mit VBA so ziemlich am Anfang und hoffe auf Vorschläge oder auf eine Lösung.
We...
08.11.2009 19:36:34
Thread-ID: 1115422
6 Beiträge
Text in Worddocument suchen
Thomas

Hallo,
ich suche nach einer Möglichkeit eine Textstelle in einem geöffneten Worddocument aus Excel heraus zu suchen. Der gesuchte Text steht beisp. weise in Zelle A1 und soll in dem Worddocument gefunden werden.
Danke für Euere Hilfe
20.11.2009 11:38:54
Thread-ID: 1118835
7 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige