Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
18.04.2024 17:45:21
Shellkommando ausführen, stderr auslesen
18.04.2024 17:41:41
Summe: Bestimmter Bereich mit sverweis
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1844to1848
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1844to1848
1844to1848
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Leere Spalten ausblenden nach filtern

Leere Spalten ausblenden nach filtern
06.09.2021 17:47:59
Basti
Hallo Excel-perten,
bin bei meiner Suche bisher nicht fündig geworden und würde euch gerne um Hilfe bitten.
Zum besseren Verständnis habe ich eine Beispieldatei angehangen.
https://www.herber.de/bbs/user/147925.xlsx
Problem: Wenn in Spalte A1 nach einem gefiltert wurden, dann sollen alle leeren Spalten ausgeblendet werden.
Bsp.: Wenn ich nach "Name1" filtere, dann soll die Spalte B ausgeblendet werden.
Meine Erklärung ist hoffentlich verständlich und ihr könnt mir bei meinem Problem helfen.
Best Grüße
Basti

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Leere Spalten ausblenden nach filtern
06.09.2021 18:02:25
Daniel
Hi
beispielsweise mit diesem Makro im Modul des Tabellenblatts:

Private Sub Worksheet_Calculate()
Dim Col As Range
With Range("Tabelle1")
For Each Col In .Columns
Col.EntireColumn.Hidden = WorksheetFunction.Subtotal(3, Col) = 0
Next
End With
End Sub
Gruß Daniel
AW: Leere Spalten ausblenden nach filtern
06.09.2021 20:31:19
Luschi
Hallo Daniel,
Dein Vba-Code funktioniert in Excel 2019 nur, wenn es Formeln zur Neuberechnung in den Zeilen gibt, die durch den Filter aus- bzw. eingeblendet werden, ansonsten passiert nix und das Calculate-Ereignis hält die Füße still.
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Leere Spalten ausblenden nach filtern
06.09.2021 21:05:28
Daniel
Weiß ich nicht, kann ich nicht beurteilen, ich hab kein Excel 2019.
In 2016 gehts so.
Ich kennen jetzt auch kein anderes Event, dass durch den Filter getriggert wird.
Kennst du eines?
Ansonsten reicht da uch eine einfache volatile Formel in einer Zelle oder was mit Teilergebnisse, um beim Filtern ein Caluculate auszulösen. (Da hättest du jetzt aber auch selber drauf kommen können)
Gruß Daniel
Tschuldigung, hättest du ja geschrieben.
06.09.2021 21:07:51
Daniel
Aber wie gesagt, bei für funktioniert der Code mit der Beispieldatei beim Filtern automatisch.
AW: Tschuldigung, hättest du ja geschrieben.
06.09.2021 22:10:57
Basti
Servus Daniel, Servus Luschi,
bei mir (EXCEL 365) funktioniert der Code nur, wenn ich eine Berechnung in der Ergebniszeile durchführe. Das passt aber, da ich in meiner Originaldatei Teilergebnisse berechnen lasse.
Vielen Dank für die schnelle Hilfe. Ist echt ein klasse Forum!
Beste Grüße
Basti
Anzeige
AW: Leere Spalten ausblenden nach filtern
06.09.2021 19:54:15
Günther
Moin Basti,
hast du dich schon einmal mit Power Query beschäftigt? Damit ist das ohne VBA und ohne Formeln möglich.
 
Gruß
Günther  |  mein Excel-Blog
AW: Leere Spalten ausblenden nach filtern
06.09.2021 22:13:45
Basti
Hi Günther,
Daran habe ich noch gar nicht gedacht. Hab Grundkenntnisse in Power Query, aber wüsste nicht, wie ich das damit umsetzen kann. Würdest Du mir evtl. deinen Ansatz erklären?
Beste Grüße
Basti.
AW: Leere Spalten ausblenden nach filtern
07.09.2021 10:29:19
Günther
Moin Basti,
ich habe es mit diesen Schritten geschafft:
  • In den PQ-Editor importieren
  • Nach Name filtern
  • Name markieren und Andere Spalten entpivotieren
  • Spalte Attribut pivotieren, als Wertespalte Wert verwenden

    • Gruß
    Günther  |  mein Excel-Blog
    Anzeige
    AW: Leere Spalten ausblenden nach filtern
    08.09.2021 08:18:26
    Basti
    Hi Günther,
    coole Sache! Danke für deine Rückmeldung. Ich muss PQ definitiv öfter in meine Arbeit integrieren.
    Beste Grüße
    Basti

    313 Forumthreads zu ähnlichen Themen

    Zeilenhöhe nach Zelleninhalt
    Tom

    Hallo,
    Ich möchte gern je nach Zelleninhalt in der Spalte "D" die Zeilenhöhe abhängig machen.
    Steht in "D" Hauptprojekt, so soll die Zeilenhöhe 27 betragen
    steht in "D" Teilprojekt, so soll die Zeilenhöhe 20 sein
    und ist "D" leer, dann soll die Zeilenhöhe 15 betragen
    Die For...
    01.09.2008 13:53:00
    Thread-ID: 1006431
    2 Beiträge
    Anzeige
    Daten ab bestimmter Anzahl Zeile abschneiden
    Joachim

    Hi,
    ich kopiere auf mein Sheet Daten in eine Textbox und wenn die Informationen zu lange sind, schneide ich sie:
    If Len(TextBox7.Value) GRÖSSER 300 Then TextBox7.Value = Left(TextBox7.Value, 300) & "... (mehr Informationen finden Sie online !)"
    Nun meine Frage: geht so was auch...
    02.09.2008 13:37:00
    Thread-ID: 1006769
    6 Beiträge
    Spalten statt Zeilen filtern
    Steffen

    Hallo Forum,
    den Autofilter kenne ich, aber ich brauche einen Filter der Spalten anstatt der Zeilen und von VBA habe ich leider keine Ahnung.
    ich habe eine Tabelle mit Namen in A2:A10. Im Bereich B2:X10 steht in verschiedenen Zellen entweder ein "x" oder die Zellen sind leer.
    Nun hä...
    29.10.2008 16:41:00
    Thread-ID: 1020355
    13 Beiträge
    Anzeige
    Code soll erst ab bestimmter Zeile funktionieren
    Joachim

    Hi,
    wie kann ich denn erreichen, dass der nachfolgende Code erst ab der 10. Zeile überprüft.
    Zeilen 1-9 sollen unbeachtet bleiben:
    Sub Kopieren() Dim lngRow As Long lngRow = Cells(Rows.Count, "B").End(xlUp).Row MsgBox lngRow End Sub
    Danke mal
    Joachim
    04.12.2008 11:54:00
    Thread-ID: 1030126
    3 Beiträge
    SelectFilter erst ab Zeile4
    Josef

    Guten Morgen!
    Wenn ich bei der nachstehenden Musterdatei zuerst das Makro "Filter_setzen" und danach das Makro "Select_Filter-Terst" starte, so erfolgt in der Tabelle1 die Markeirung erst ab der Zeile 4 und nicht wie gwünscht ab der Zeile 3. Wo und wie müßte ich bitte hier den Code veränder...
    13.01.2009 07:52:48
    Thread-ID: 1039077
    6 Beiträge
    Zeilennr. in gefilterten und markierten Bereich
    Kasimir

    Hallo Leute,
    ich stehe auf dem Schlauch und weiß ehrlich auch nicht so ganz, ob das was ich realisieren möchte überhaupt geht?
    Also, ich filtere über den Autofilter Daten. Bei diesen gefilterten Daten möchte ich danach einen Bereich, also mehrere zusammenhängende Zellen in einer Spalte...
    04.04.2009 08:21:59
    Thread-ID: 1066813
    7 Beiträge
    erste Zeile des Autofilters per VBA erkennen
    Ptonka

    Hallo zusammen,
    ich stehe vor folgendem Problem:
    Ich filtere per VBA per Autofilter eine umfangreiche Liste.
    Je nach dem, welches Filterkriterium ich mitgebe, ist die erste angezeigte Zeile
    eine andere Zeilennummer - logisch.
    Nun möchte ich diese erste angezeigte Zeilennumme...
    07.05.2009 13:31:01
    Thread-ID: 1073590
    5 Beiträge
    Spaltenbreite nach Filtern anpassen
    urs

    Guten Abend
    Über Filter werden die gesuchten Werte einer grossen Tabelle eingegrenzt.
    Wie kann ich nun die Spaltenbreite automatisch der benötigten Breite der SICHTBAREN Zeilen anpassen.
    Lässt sich diese benötigte Breite ermitteln? Makro gesucht!
    Vielen Dank für Eure Hilfe
    G...
    26.01.2010 15:51:16
    Thread-ID: 1133117
    6 Beiträge
    Anzeige

    Beliebteste Forumthreads (12 Monate)

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

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige
    Archiv - Verwandte Themen
    Forumthread
    Beiträge
    1
    7
    5
    12
    6
    2
    5
    6
    4
    5
    4
    1
    2
    2
    1
    2
    6
    10
    7
    2
    7
    3
    8
    2
    6