mehrere Anweisungen in eine Zeile schreiben
11.07.2003 15:30:17
Matthias H.
ich habe eine If-Schleife, die eine Reihe von Variablen setzten soll. Bei einer Variablen kann ich ja alles in eine Zeile schreiben, und erspare mir End If:
If Left(Cells(2, 1), 1) = "K" Then SF = "Konrad"
If Left(Cells(2, 1), 1) = "N" Then SF = "Nordpol"
...
Wenn ich aber mehrere Variablen habe, muß ich jede in eine neue Zeile schreiben (mehr Platzbedarf):
If Left(Cells(2, 1), 1) = "Z" Then
SF = "Zeppelin"
r1 = 7
r2 = 20
r3 = 32
r4 = 38
...
End If
Gibt es eine andere Syntax um alles auf eine Zeile zu bringen? (Komma, Semikolon usw. als Trennung hat nicht geholfen)
Gruß
Matthias