Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1396to1400
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Kreuzworträtsel

Kreuzworträtsel
10.12.2014 09:20:22
Fabian
Hallo,
Wir machen in der Schule gerade ein VBA-Projekt und wir, also ich und meine Gruppe machen _
verschiedene Rätsel. Ich bin für das Kreuzworträtsel zuständig und habe nun folgenden Quelltext _

Private Sub TextBox2_Change()
If TextBox2.Value = "B" Then
TextBox2.BackColor = &HFF00&
Else: TextBox2.BackColor = &HFF&
End If
End Sub

Und meine Lehrerin möchte nun,dass man nichts mehr in das Feld eingeben kann,wenn es sich einmal rotgefärbt hat, man also falsch liegt.
Wäre super, wenn mir jemand helfen kann. :D

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kreuzworträtsel
10.12.2014 09:31:21
yummi
Hallo Fabian,
mal als Tip:
Wenn Du einen Wert ändern willst, musst Du das entsprechende Feld (Textbox, Zelle ganz egal) erstmal selektieren. Du kannst Dir bei selection_change den aktuellen Wert merken. Wenn sich der Wert ändert wird ja das Change Ereignis aufgerufen, da musst Du also prüfen, ob deine Farbe rot ist, wenn ja dann setzt du den Wert einfach auf den gemerkten Eintrag zurück.
So mal als Anregung wie man es machen kann
Gruß
yummi

AW: Kreuzworträtsel
10.12.2014 12:40:15
Rudi
Hallo,
Else: TextBox2.BackColor = &HFF&: TextBox2.Enabled = False
Gruß
Rudi
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige