Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie blenden Sie Spalten auf mehreren Blättern in einer Arbeitsmappe aus?

In Excel können wir schnell Spalten in einem Arbeitsblatt ausblenden, aber haben Sie jemals versucht, Spalten auf mehrere Blätter gleichzeitig zu verbergen? Normalerweise können Sie versuchen, alle Blätter auszuwählen und die Ausblenden-Funktion anzuwenden, aber es wird nicht erfolgreich funktionieren. In diesem Artikel werde ich über das schnelle Ausblenden von Spalten in mehreren Arbeitsblättern sprechen.

Ausblenden von Spalten in mehreren Arbeitsblättern in einer Arbeitsmappe mit VBA-Code

Registerkarte "Office" Aktivieren Sie das Bearbeiten und Durchsuchen von Registerkarten in Office und vereinfachen Sie Ihre Arbeit erheblich ...
Kutools for Excel löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80%
  • Alles wiederverwenden: Fügen Sie die am häufigsten verwendeten oder komplexesten Formeln, Diagramme und andere Elemente zu Ihren Favoriten hinzu und verwenden Sie sie in Zukunft schnell wieder.
  • Mehr als 20-Textfunktionen: Extrahieren Sie die Nummer aus der Textzeichenfolge. Teile von Texten extrahieren oder entfernen; Zahlen und Währungen in englische Wörter umrechnen ...
  • Tools zusammenführen: Mehrere Arbeitsmappen und Blätter in einer; Mehrere Zellen / Zeilen / Spalten zusammenführen, ohne Daten zu verlieren; Doppelte Zeilen und Summe zusammenführen ...
  • Geteilte Werkzeuge: Aufteilen von Daten in mehrere Blätter basierend auf dem Wert; Eine Arbeitsmappe in mehrere Excel-, PDF- oder CSV-Dateien; Eine Spalte zu mehreren Spalten ...
  • Einfügen überspringen Versteckte / Gefilterte Zeilen; Zählung und Summe nach Hintergrundfarbe; Mailingliste erstellen und Senden Sie E-Mails nach dem Wert von Cell...
  • Super Filter: Erstellen Sie erweiterte Filterschemata und wenden Sie diese auf alle Blätter an. Art nach Woche, Tag, Häufigkeit und mehr; Filtern durch Fettdruck, Formeln, Kommentar ...
  • Mehr als 300 leistungsstarke Funktionen; Funktioniert mit Office 2007-2019 und 365; Unterstützt alle Sprachen; Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation.

Pfeil blaue rechte Blase Ausblenden von Spalten in mehreren Arbeitsblättern in einer Arbeitsmappe mit VBA-Code

Der folgende Code kann Ihnen helfen, bestimmte Spalten sofort in allen Arbeitsblättern zu verbergen. Bitte tun Sie dies wie folgt:

1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. Klicken Sie Einsatz > Modul, und fügen Sie den folgenden Code in die Modul Fenster.

VBA-Code: Spalten auf mehreren Blättern gleichzeitig ausblenden:

 Sub Hide_Columns()
'Updateby Extendoffice 20160913
    Dim iWs As Integer
    Dim sCol As String
    On Error Resume Next
    sCol = Application.InputBox("Input entire column,Eg A:A OR A:B", _
                                "Kutools for Excel", , , , , , 2)
    If sCol = "" Then
        MsgBox "Empty columns", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    For iWs = 1 To ThisWorkbook.Worksheets.Count
        ThisWorkbook.Sheets(iWs).Columns(sCol).Hidden = True
    Next iWs
    On Error GoTo 0
End Sub

3. Dann drücken F5 Schlüssel, um diesen Code auszuführen, und eine Eingabeaufforderung wird ausgegeben, um Sie daran zu erinnern, die Spalten einzugeben, die Sie in allen Arbeitsblättern ausblenden möchten, siehe Screenshot:

doc Verstecke alle Blätter 1

4. Und dann klick OK Wenn Sie auf die Schaltfläche klicken, werden die angegebenen Spalten in allen Arbeitsblättern gleichzeitig ausgeblendet.


Kutools for Excel löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einlegen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formula Bar (Bearbeiten Sie mühelos mehrere Textzeilen und Formeln); Layout lesen (Leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt der Zellen teilen; Kombinieren Sie doppelte Zeilen / Spalten... Doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie "Duplizieren" oder "Eindeutig" Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufallsauswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen auf mehrere Blätter; Bullets einfügen, Kontrollkästchen und mehr ...
  • Extract Text, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen; Erstellen und Drucken von Paging-Zwischensummen; Zwischen Zelleninhalt und Kommentaren konvertieren...
  • Superfilter (Speichere und wende Filterschemata auf andere Blätter an); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Arbeitsmappen und Arbeitsblätter kombinieren; Zusammenführen von Tabellen basierend auf Schlüsselspalten; Daten in mehrere Blätter aufteilen; Stapelkonvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2019 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. Kostenlose 30-Testversion für alle Funktionen.
Registerkarte Tab 201905

Registerkarte "Office" Bringt die Benutzeroberfläche mit Registerkarten in Office und vereinfacht Ihre Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50% und reduziert täglich Hunderte von Mausklicks für Sie!
officetab unten
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Treb · 6 months ago
    And the VBA for unhiding the multiple columns as well.

    Thank you in advance and God bless
    • To post as a guest, your comment is unpublished.
      skyyang · 5 months ago
      Hi, Treb,
      To show all the hidden columns from the whole workbook, please apply the below VBA code:
      Sub ShowHiddenColumns()
      Dim iWs As Integer
      Dim sCol As String
      On Error Resume Next
      For iWs = 1 To ThisWorkbook.Worksheets.Count
      ThisWorkbook.Sheets(iWs).Columns.Hidden = False
      Next iWs
      On Error GoTo 0
      End Sub

      Please try, hope it can help you!
  • To post as a guest, your comment is unpublished.
    Treb · 6 months ago
    I try to use this VBA code that you made to hide multiple columns in a multiple worksheets.. But How can I use it with out a message Box...

    Please kindly help me to make a VBA that will hide the multiple columns in all worksheets at once with out having a lot of message box?..


    I badly needed such a code.


    Please help
    • To post as a guest, your comment is unpublished.
      skyyang · 5 months ago
      Hello, Treb,
      The popped out message box can help you to enter the hidden columns you need conveniently and dynamically.