Ich habe ein Macro geschrieben, dass nach der Eingabe von Werten aktiviert Zeilen ein-, und unbeschriftete ausblenden soll.
Alle direkt beschrifteten Zellen funktionieren gut.
Der Befehl die Zeile mit der Gruppenüberschrift ausgeblendet werden soll wenn in keiner der Zellen was steht funktioniert nicht so ganz.
Folgend mein Befehl
If IsEmpty(Range("B20,G20,L20,Q20")) Then
Rows("170").Hidden = True
End If
If Not IsEmpty(Range("B20,G20,L20,Q20")) Then
Rows("170").Hidden = False
End If
Wenn B20 beschriftet ist wird die Zeile eingeblendet, so auch die anderen die beschriftet sind.
ist B20 unbeschriftet aber in den anderen was drin wird die Gruppenüberschift ausgeblendet
Ziel ist, dass sobald eine der Zellen beschriftet ist soll die Reihe eingeblendet werden und wenn alle leer sind ausgeblendet werden.
Danke im Voraus für eure Hilfe
Andre111