VBA IF OR Problem
Hallo Zusammen,
wenn ich in Zelle F3, einen anderen Wert als Kuehllager 1, 2 oder 3 eintrage soll er in die Message Box springen. Das macht er auch!
Leider aber auch wenn ich eben kuehllager 1, 2 oder 3 eintrage!?!?!
wenn ich in Zelle F3, einen anderen Wert als Kuehllager 1, 2 oder 3 eintrage soll er in die Message Box springen. Das macht er auch!
Leider aber auch wenn ich eben kuehllager 1, 2 oder 3 eintrage!?!?!
Sub Einlagern()
Dim k1 As String
Dim k2 As String
Dim k3 As String
k1 = "kuehllager1"
k2 = "kuehllager2"
k3 = "kuehllager3"
'Kühllager prüfen prüfen
With Sheets("Eingabe")
If .Range("F3") <> k1 Or .Range("F3") <> k2 Or .Range("F3") <> k3 Then
MsgBox "Kühllager prüfen", vbCritical
Exit Sub
End If
End With
end sub
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 558985
Url: https://administrator.de/forum/vba-if-or-problem-558985.html
Ausgedruckt am: 23.12.2024 um 16:12 Uhr
2 Kommentare
Neuester Kommentar
Naja ist doch logisch, weil du mit <> arbeitest musst du alle Bedingungen mit UND verknüpfen, nicht mit OR.
Ergo
Und sowas in nem Admin Forum, tststs peinlich ...
Ergo
If .Range("F3") <> k1 AND .Range("F3") <> k2 AND .Range("F3") <> k3 Then