mehrere Bilder gleichzeitig einblenden VBA
03.02.2007 10:55:03
Susanne
Range("c1").Select
If ActiveCell = "Wahr" Then
Range("K14").Select
ActiveSheet.Shapes.Range("Bild 9").Visible = True
Range("c1").Select
End If
If ActiveCell = "Falsch" Then
ActiveSheet.Shapes.Range("Bild 9").Visible = False
Range("c1").Select
End If
Anzeige