![]() |
Betrifft: IF-Anweisung in eine Zeile packen
von: Markus
Geschrieben am: 24.11.2014 12:26:53
Gibt es eine Möglichkeit eine Anweisung wie die folgende in eine Zeile zu schreiben?
If (.A1 = True) Then
.Shapes("BildA1").Visible = True
End If
Habe es schon probiert mit Doppelpunkten, hat aber nicht funktioniert. Auch folgendes funktioniert nicht (Syntaxfehler?):
iif(.A1, .Shapes("BildA1").Visible=true)
Grüße
markus
![]() ![]() |
Betrifft: AW: IF-Anweisung in eine Zeile packen
von: Rudi Maintaire
Geschrieben am: 24.11.2014 12:30:24
Hallo,
einfach in eine Zeile und dann ohne End If.
If .A1 = True Then .Shapes("BildA1").Visible = True
oder einfach ohne If
.Shapes("BildA1").Visible = .A1
(Was auch immer .A1 sein soll)
Gruß
Rudi
![]() ![]() |
Betrifft: AW: IF-Anweisung in eine Zeile packen
von: Markus
Geschrieben am: 24.11.2014 12:37:42
Danke, so funktioniert's.
![]() |