Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Excel: Grafik in Abhängigkeit eines Zellwertes anzeigen





Frage

Hallo, ich möchte in Abhängigkeit eines Zellinhaltes eine Grafik anzeigen: Beispiel: In A1 steht eine 1, dann soll die Grafik einen Mann darstellen, wenn in A1 eine 2 stehe, dann soll die Grafik eine Frau darstellen. Gruß Michael

Antwort 1 von fürLau

Hallo

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Select Case Cells(1, 1).Value
Case Is = 1
ActiveSheet.Shapes("picture 1").Visible = True
ActiveSheet.Shapes("picture 2").Visible = False

Case Is = 2
ActiveSheet.Shapes("picture 2").Visible = True
ActiveSheet.Shapes("picture 1").Visible = False

Case Else
ActiveSheet.Shapes("picture 1").Visible = False
ActiveSheet.Shapes("picture 2").Visible = False

End Select
End Sub


Die Nummer des Picture(s) ergibt sich aus der Reihenfolge des Grafik einfügens.

Gruß