if-schachtelung mit drei abfragen

• if-schachtelung mit drei abfragen von basti vom 10.10.2003 07:59:13
  • Crossposting Hinweis - von t am 10.10.2003 09:21:29
  • AW: frag' die Hilfe nach SELECT CASE.. - von Galenzo am 10.10.2003 10:40:19

Betrifft: if-schachtelung mit drei abfragen
von: basti
Geschrieben am: 10.10.2003 07:59:13
hi,

hab folgende if bedingung bisher:

Do Until j = count2 + 1
If Cells(j, 3) > 10000 Then
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[1],Tabelle2!C[-1]:C,2,FALSE)"
Else
ActiveCell.Value = 0
End If

j = j + 1
Range("B" & j & "").Select

Loop

ich möchte diese nun so umstricken, dass er die formel macht, wenn bedingung > 10000; er eine null reinschreibt, wenn der Zellwert zwischen 1 und 9999 und er nichts macht bzw. aus der schleife und function springt, wenn nicht (also wirklich nichts) in der zelle steht.

wie würde das aussehen?

danke und grüße,
basti

Betrifft: Crossposting Hinweis
von: t
Geschrieben am: 10.10.2003 09:21:29

Betrifft: AW: frag' die Hilfe nach SELECT CASE..
von: Galenzo
Geschrieben am: 10.10.2003 10:40:19
Hallo,
zu Mehrfachverzweigungen gibt es ausführliche Erläuterungen in der von Microsfot mitgelieferten Hilfe, die du z.B. mit der Taste "F1" aufrufen kannst.
Suche dort nach der select case... -Anweisung.

Viel Erfolg!

Excel-Beispiele zum Thema " if-schachtelung mit drei abfragen"
Unterdrückung von Sicherheitsabfragen	Name der aufrufenden Schaltfläche abfragen
Anzahl der einzufügenden Zeilen abfragen	Start- und Enddatum abfragen und markieren
Passwort vergeben und bei CheckBox-Aktivität abfragen	Werte von CheckBoxes in einer UserForm abfragen
Mit InputBoxes Zeilennummern abfragen und Summe bilden	Suchbegriff über InputBox abfragen und Fundzeile löschen
Druckstart- und endzeilen über InputBox abfragen	Beim Öffnen der Arbeitsmappe Passwort abfragen