Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1716to1720
1716to1720
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ausblenden von Spalten mit leeren Zellen

Forumthread: Ausblenden von Spalten mit leeren Zellen

Ausblenden von Spalten mit leeren Zellen
24.10.2019 12:55:31
Spalten
Hallo!
Ich habe eine kleine Matrix, bei der ich nach Filtern der Bezeichnung in Spalte A, z.B. Baum, alle übrigen Spalten ausblenden möchte, die kein "x" enthalten.
Userbild
Die Anwendung ist für eine extrem umfangreiche Matrix gedacht, um wieder eine gute Lesbarkeit zu gewährleisten.
Im Forum habe ich dazu noch keine passende Formel oder ein Macro gefunden. Darum hoffe ich jemand kann mir weiterhelfen.
Vielen Dank und schönen Gruß
Simone
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ausblenden von Spalten mit leeren Zellen
24.10.2019 13:13:02
Spalten
Hallo Simone,
per Makro so: 

Sub SpaltenAusblenden()
Const firstCol As Long = 2
Const lastCol As Long = 5
Const firstRow As Long = 2
Dim lastRow As Long
Dim i As Long
For i = firstCol To lastCol
With ActiveSheet
lastRow = .Cells(.Rows.Count, 1).End(xlUp).Row 'letzter Eintrag in Spalte A
If Application.Subtotal(103, .Range(.Cells(2, i), .Cells(lastRow, i))) = 0 Then .Cells(2, i) _
.EntireColumn.Hidden = True
End With
Next i
End Sub
LG,
Klaus M.
Anzeige
AW: Ausblenden von Spalten mit leeren Zellen
24.10.2019 14:11:28
Spalten
Hallo Klaus,
super funktioniert einwandfrei! Vielen Dank! Was muss ich jetzt anpassen, wenn ich mehr Zeilen und Spalten habe?
Im Detail geht die große Tabelle von F6-DK112.
Kann ich über ein Macro das Ausblenden wieder rückgängig machen - zurücksetzen?
LG Simone
AW: Ausblenden von Spalten mit leeren Zellen
24.10.2019 14:24:54
Spalten
Hallo Simone,
die Zeilen und Spalten habe ich extra variabel gehalten.
Const firstCol As Long = 2
Const lastCol As Long = 5
Const firstRow As Long = 2
firstCol, also die erste Spalte, ist 2, also B
lastCol, also die letzte Spalte, ist 5, also E
firstRow (die erste Zeile) ist 2, in Zeile 1 stehen überschriften. Diese Werte kannst du nach belieben anpassen.
Die letzte Zeile wird hier ermittelt
lastRow = .Cells(.Rows.Count, 1).End(xlUp).Row 'letzter Eintrag in Spalte A
das , 1) steht dabei für Spalte 1, also A. Brauchst du den letzten Wert aus Spalte C, änderst du das entsprechend in , 3) um.
Reicht dir ein Makro, um alle Spalten einzublenden? Dann so: 
Sub SpaltenEinblenden()
ActiveSheet.Cells.EntireColumn.Hidden = False
End Sub
Oder willst du, nach einer erneuten Filterung vielleicht, die Spalten ein/ausblenden je nach Ergebnis? Dann so (schon an deinen Bereich angepasst):
Sub SpaltenAusblenden()
Const firstCol As Long = 6  '6 = F
Const lastCol As Long = 115 '115 = DK
Const firstRow As Long = 7  'In Zeile 6 stehen Überschriften, richtig?
Const lastRow As Long = 112 'Du schreibst es geht bis DK 112, also kein Grund LastRow zu  _
ermitteln
Dim i As Long
For i = firstCol To lastCol
With ActiveSheet
.Cells(2, i).EntireColumn.Hidden = (Application.Subtotal(103, .Range(.Cells(2, i), .Cells( _
lastRow, i))) = 0)
End With
Next i
End Sub
LG,
Klaus M.
Anzeige

Forumthreads zu verwandten Themen

Pivot-Tab: Leere ausblenden?
Florian

Hallo liebes Forum,
hätte eine Frage zu Pivottabelle (VBA-Code!):
Gibt es einen Befehl, um die Summen der "leeren" Zellen auszublenden/nicht anzuzeigen? Benutzer soll nicht durc¨h unwichtige Daten überlastet werden (siehe Bsp gelbe Zellen).
Besten Dank, Florian
https://www.herb...
19.11.2008 14:45:00
Thread-ID: 1026052
6 Beiträge
Anzeige
Pivot Bericht nur Leer - Felder anzeigen
Karsten

Hallo Liebe Excel Freunde,
Ich möchte gern nach Aktualisierung einer Pivotabelle in einer bestimmen Spalte nur die Leerfelder anzeigen.
Mit dem Macro- Recorder funktioniert das nicht richtig, wenn man dies per Hand durchführt, muss man sich nach der Aktualisierung erst alle Felder anze...
13.01.2009 14:49:00
Thread-ID: 1039261
7 Beiträge
Pivot-Tabelle Datumsfilter in Spalte
MBorn

Hallo,
in meiner Pivot-Tabelle gibt es in Spalte A Datumswerte.
Weiß jemand, wie es gelingt, Datumswerte von/bis (zwischen zwei Grenzdaten) zu filtern?
Soweit ich sehe bietet der Filter nur eine Variation, entweder größer als oder
kleiner als....
Noch schöner wäre es wenn ic...
08.05.2009 16:57:27
Thread-ID: 1073949
2 Beiträge
Pivottabelle Spalten berechnen
karsten

Hallo Zusammen,
ich habe folg.Frage.:
Ich habe eine Tabelle mit 2 Spalten.
1.Spalte: DATUM
2.Spalte: CODE
DATUM CODE
01.01.2009 A
08.02.2009 M
23.02.2009 C
09.08.2009 F
Wie kann ich in einer Pivottabelle die Datumsangaben bereits in Monaten eingeteilt dar...
23.09.2009 11:15:14
Thread-ID: 1104846
10 Beiträge
Leere Zeilen bzw. Spalten ausblenden
Dietmar

Guten Abend zusammen,
habe folgenden Code von Sepp hier im Forum gefunden.
Wie lässt der Code sich ändern, dass Zeilen/Spalten ausgeblendet werden, wenn keine Werte (!) enthalten sind.
Vorliegender Code blendet die Zeilen/Spalten auch aus , wenn Formeln enthalten sind, obwohl keine...
12.11.2009 22:19:00
Thread-ID: 1116689
9 Beiträge
Pivot Tabelle in Tabelle mit Spalten umwandeln??
okgi

Hallo liebe Excel Gemeinde!!
Meine Frage ist: wie kann ich eine Pivot Tabelle in eine Tabelle mit Spalten automatisiert überführen?
Zum Beispiel:
Pivot Tabelle
________KST_____________
Konto_.......1...........2...........3..
__A___.100,00................31,99
__B___...
15.12.2009 17:35:51
Thread-ID: 1124143
3 Beiträge
Anzeige
Pivot Tabelle mit Daten neue Spalte erstellen
Carsten

Ich brauche mal Eure Hilfe.
Ich habe eine Pivot Tabelle die immerwieder aktualisiert und durch Selektionen geändert wird.
Nun ist es erforderlich eine Spalte anzufügen die die erhaltenen Daten dividiert und sich nach einer anderen Selektion automatich den neuen Daten anpasst.
Ich br...
29.12.2009 12:21:11
Thread-ID: 1126181
7 Beiträge
Anzeige
Pivottabelle bei mehreren Spalten
RolandE

Hallo,
ich möchte eine Pivottabelle aus 3 Spalten erstellen. Zahl1 und Zahl2 sollen je nach ID zusammengezählt werden.
Leider schreibt Excel die Summen von Zahl1 und Zahl2 untereinander. Ich möchte sie jedoch nebeneinaner haben, wie auf dem Blatt "Ziel" angedeutet.
https://www.herbe...
23.01.2010 13:58:57
Thread-ID: 1132305
5 Beiträge
Pivottabelle Zeilen gruppieren
honeybee

Hallo zusammen,
ich habe folgendes Problem. Ich muss aus SAP monatliche Auswertungen machen. Ich habe in meinen RowFields die "Betriebsbereiche" aufgeführt, die als 3-stelliger Buchstabencode aufgeführt sind. Allerdings werden nicht immer alle Betriebsbereiche angezeigt, dass heißt die Anza...
18.02.2010 18:55:55
Thread-ID: 1138559
3 Beiträge
PivotTabelle - Durchschnittsspalte
Jonathan

Hallo zusammen!
Ich habe eine umfangreiche Pivot Tabelle erstellt. 12 Spalten (Monate), Zeilen mit Kategorien und Werte jeweils die Ausgaben.
Ist es irgendwie möglich, am Ende eine zusätzliche Spalte einzufügen, in welcher der Durchschnittswert der jeweiligen Zeile steht?
Danke Euch...
01.06.2010 00:00:43
Thread-ID: 1159708
6 Beiträge
Anzeige
Pivot Tabelle Gesamtergebnis nicht anzeigen
Annette

Hallo,
Ich möchte das Gesamtergebnis der Pivot Tabelle nicht anzeigen lassen.
Wie geht das?
Grüße
Annette
12.06.2011 14:39:40
Thread-ID: 1218212
3 Beiträge
Pivot-Tabelle über mehr als 1.048.576 Zeilen
Peter

Hallo zusammen,
ich habe Datensätze über mehr als 1.048.576 Zeilen; diese habe ich auf 2 Tabellenblätter aufgeteilt. Ist es möglich, über beide Tabellenblätter eine einzige Pivot-Tabelle zu ziehen? Wenn ja, wie? Gerne auch per VBA. Bin für Tipps dankbar!
Beste Grüße,
Peter
PS: H...
30.06.2011 15:50:51
Thread-ID: 1220359
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige