Registriert seit: 10.04.2014
Version(en): 97-2019 (32) + 365 (64)
Hallöchen,
wenn Du Dich inzwischen mit den nicht getrennt ausblendbaren Zeilen abgefunden hast hier mal ein Formelansatz. Die Teilschritte schreibst Du an andere Stelle - kann auch ein anderes Blatt sein - und holst sie Dir je nach Auswahl "anzeigen" oder "nicht anzeigen" per Formel unter die Vorgänge.
Arbeitsblatt mit dem Namen 'Tabelle1' |
| A | B | C | D | E |
1 | Teil1 | Teil2 | | Vorgang1 | Vorgang2 |
2 | Oh | Nein | | anzeigen | nicht anzeigen |
3 | Ah | ja | | Oh | |
4 | | | | Ah | |
5 | | | | 0 | |
Zelle | Formel |
D3 | =WENN(D$2="anzeigen";A2;"") |
E3 | =WENN(E$2="anzeigen";B2;"") |
D4 | =WENN(D$2="anzeigen";A3;"") |
E4 | =WENN(E$2="anzeigen";B3;"") |
D5 | =WENN(D$2="anzeigen";A4;"") |
E5 | =WENN(E$2="anzeigen";B4;"") |
Zelle | Gültigkeitstyp | Operator | Wert1 | Wert2 |
D2 | Liste | | anzeigen;nicht anzeigen | |
E2 | Liste | | anzeigen;nicht anzeigen | |
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016 |
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg |
Mit der bedingten Formatierung, wie schon vorgeschlagen, würde so aussehen:
Arbeitsblatt mit dem Namen 'Tabelle1' |
| D | E |
1 | Vorgang1 | Vorgang2 |
2 | anzeigen | nicht anzeigen |
3 | Oh | Nein |
4 | Ah | ja |
5 | | |
Zelle | bedingte Formatierung... | Format |
D3 | 1: D$2="nicht anzeigen" | abc |
E3 | 1: E$2="nicht anzeigen" | abc |
D4 | 1: D$2="nicht anzeigen" | abc |
E4 | 1: E$2="nicht anzeigen" | abc |
D5 | 1: D$2="nicht anzeigen" | abc |
E5 | 1: E$2="nicht anzeigen" | abc |
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016 |
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg |
In E3 und E4 steht Nein und Ja ...
. \\\|/// Hoffe, geholfen zu haben.
( ô ô ) Grüße, André aus G in T
ooO-(_)-Ooo (Excel 97-2019+365)
Registriert seit: 27.04.2014
Version(en): Privat: Office Home & Business 2019 / Arbeit: MS365
Guten Morgen,
oder so:
Code:
Sub Ausblenden()
Range("B3:B8").NumberFormat = ";;;"
End Sub
Sub Einblenden()
Range("B3:B8").NumberFormat = "General"
End Sub
LG
Alexandra