03.08.2018, 08:05
Hallo mal wieder!
Ich habe einen Code bei dem ich mir nicht sicher bin ob ich alles richtig gemacht habe. Wenn in Sheet 1 in der Zelle D21 ein x steht und der Wert in Sheet 2 in Zelle I3 > 300000 ist soll die Grafik "Chart 1" eingeblendet werden, ansonsten ausgeblendet werden.
Leider passiert bei mir nicht viel, bekomme aber auch keine Fehlermeldung.
Habe ich einen Fehler gemacht?
Danke & Gruß
Ich habe einen Code bei dem ich mir nicht sicher bin ob ich alles richtig gemacht habe. Wenn in Sheet 1 in der Zelle D21 ein x steht und der Wert in Sheet 2 in Zelle I3 > 300000 ist soll die Grafik "Chart 1" eingeblendet werden, ansonsten ausgeblendet werden.
Leider passiert bei mir nicht viel, bekomme aber auch keine Fehlermeldung.
Code:
Sub TEST()
If Worksheets("Sheet 1").Range("D21").Value = "x" And Worksheets("Sheet 2").Range("I3").Value > "300000" = True Then
Worksheets("Sheet 2").Shapes("Chart 1").Visible = True
Else
Worksheets("Sheet 2").Shapes("Chart 1").Visible = False
End If
End SubHabe ich einen Fehler gemacht?
Danke & Gruß