Office: (Office 2003) Select Case mit mehreren Bedingungen?

Hallo,

ich versuche grad mit select case meine If..then..else Verschachtelungen zu reduzieren.

Geht Select Case überhaupt mit mehreren Kriterien?
Die Switch oder Choose Funktion habe ich noch gefunden, scheinen aber
nicht für meinen Fall zu funktionieren?

Ich versuche das grad so:
Code:

Bekomme aber "Typen unverträglich" zurück.
Bin mir allerdings nicht sicher, ob wirklich die Typen unverträglich sind,
oder ob das mit der 'nicht mit 2 Bedingungen funktionierenden select' funktion zu tun hat.

Grüsse, Simon

:)

 

Das ist doch logisch gar nicht zu bewältigen. Du mußt jedes Dings für sich auf irgendwelche Bedingungen prüfen und dann kannst du die Prüfungsergebnisse der beiden Dingse kombinieren.

 

Das ist eine Nullnummer, weil man mit Null (Nichts) nicht vergleichen kann. Man kann bestenfalls prüfen, ob etwas Null ist (IsNull).

Und richtig erkannt: Select Case prüft nur einen Ausdruck, vgl. VBA-Hilfe.

 

Hallo
Syntax für SELECT CASE: (Deutsch Fall auswahl)
Eine andere Form der Abfrage ist ein „Select Case“
Der Testausdruck kann numerisch oder ein String sein.
Ausdruckslisten z.B. (abhängig von Typ des Testausdrucks)

Code:

Case 1 ' Zahl 1
Case 5 To 8 ' Zahlen von 5 bis 8
Case 4, 6, 8, 9 ' Zahlen 4, 6, 8 und 9 (nicht 5 und 7)

Case “A“ ' String ”A”
Case “A“, ”B” ' String ”A” oder ”B”
Case “Abfahrt“ ' String “Abfahrt”


Muster mit Platzhalter (Like):
Code:

 

Man könnte Case etwas ungewöhnlich nutzen. *wink.gif*

Code:

 

Man könnte auch, wenn es die weiteren Zustände zulassen (die es vielleicht nicht gibt), nur den ersten Zustand testen ...
Code:

und ansonsten generell auf Null setzen.

 

Hallo Simon,

wenn ich mir Deinen Code ansehe, komme ich zu dem Schluss, dass die erste Bedingung konstant ist während die zweite Bedingung variiert. Mein Vorschlage für Deinen Code sieht daher so aus:

Code:

IMHO ist jetzt besser erkennbar, auf was es ankommt:
Nur wenn in "dteTestFertig" ein Wert steht, wird "Testing" ausgewertet.

CU

 

Super jetzt funktioniert's.
Ich danke euch vielmals für die Hilfe.
Hab dann zusätzlich noch ein .undo reingemacht, damit dann auch
das Feld auf den vorhergehenden Wert zurückgesetzt wird, und nicht nur das Datum gelöscht. bzw. überschrieben.