Anzeige
Archiv - Navigation
992to996
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
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellwert prüfen beim Verlassen

Zellwert prüfen beim Verlassen
22.07.2008 17:21:21
Doc
Hallo Excelleute
Gerne würde ich eine Zelle via VBA-Code prüfen. Es sollte nur ein "x" oder ein "X" drinstehen.
Wenn ein anderer Wert eingegeben wurde soll der Benutzer mit einer Msgbox informiert werden.
Weiss jemand wie das gehen könnte?
Danke Euch
Gruss
Doc

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Vorschlag: mit Daten Gültigkeit
22.07.2008 17:33:00
Matthias
Hallo
Daten Gültigkeit
Zulassen: Liste
Quelle: x;X
bei Zellendropdown Häkchen raus.
Gruß Matthias

Kleines Makro
22.07.2008 17:33:00
Backowe
Hi,
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Intersect(Target, [A1]) Is Nothing And Target.Count = 1 Then
  If LCase(Target) <> "x" Then
    MsgBox "Nur ein X ist zugelassen!"
  End If
End If
Application.EnableEvents = True
End Sub
Gruss Jürgen

Anzeige
AW: Kleines Makro
22.07.2008 17:43:56
Doc
Hallo Jürgen
Danke Dir das geht genau in meine Richtung. Bei zusammenhängenden Zellen kann ich ja das [A1] durch den Wert [A1:R40] ersetzen und die Prüfung funktioniert.
Es kommt noch eine Zusatzfrage: wie kann ich es machen wenn ich diese Prüfung z.b auf Zellen machen will die nicht zusammenhängen?
Hier mal die gewünschten zusätzlichen Zellen
[A1:R40] + [W10] + [X25:Y35]
Gruss
Doc

Intersect(Target, [A1:R40,W10,X25:Y35]) oT
22.07.2008 17:57:00
Backowe

AW: Intersect(Target, [A1:R40,W10,X25:Y35]) oT
22.07.2008 18:03:19
Doc
Jürgen
Eigentlich logisch wenn man es weiss.
Danke Dir es funktioniert.
Gruss
Doc

40 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige