Microsoft Excel ist eine der beliebtesten Tabellenkalkulationsanwendungen. Eine der nützlichsten Funktionen von Excel ist die Möglichkeit, Spalten und Zeilen auszublenden, um die Tabelle kompakter und lesbarer zu machen. Manchmal ist es jedoch notwendig, alle ausgeblendeten Spalten und Zeilen in einer Tabelle anzuzeigen. In diesem Artikel werden wir uns ansehen, wie Sie dies mit der Programmiersprache VBA tun können.
VBA (Visual Basic for Applications) ist eine Programmiersprache, die zum Automatisieren von Aufgaben in Excel verwendet wird. Sie können damit Makros erstellen, mit denen Sie komplexe Operationen an Daten in Tabellen ausführen können. Um alle versteckten Spalten und Zeilen anzuzeigen, können wir ein entsprechendes Makro schreiben.
VBA-Code, mit dem Sie alle ausgeblendeten Spalten anzeigen können:
Sub ShowHiddenColumns()
Columns.Hidden = False
End Sub
Um dieses Makro auszuführen, müssen wir den VBA–Editor öffnen, Dieses Projekt auswählen - Das Modul einfügen, den obigen Code kopieren und einfügen und auf die Schaltfläche Ausführen klicken. Danach werden alle ausgeblendeten Spalten in der Tabelle angezeigt.
Wenn wir alle versteckten Zeilen anzeigen möchten, können wir auch den folgenden VBA-Code verwenden:
VBA-Code, mit dem Sie alle ausgeblendeten Zeilen anzeigen können:
Sub ShowHiddenRows()
Rows.Hidden = False
End Sub
Dieses Makro muss auch im VBA-Editor ausgeführt werden. Sobald es ausgeführt wird, werden alle ausgeblendeten Zeilen angezeigt. Auf diese Weise können wir mit der Programmiersprache VBA alle versteckten Spalten und Zeilen in einer Excel-Tabelle leicht anzeigen.
VBA Excel: Ausgeblendete Spalten anzeigen
In Visual Basic für Applikationen (VBA) für Excel können Sie Code verwenden, um ausgeblendete Spalten anzuzeigen. Ausgeblendete Spalten sind im Arbeitsblatt nicht sichtbar, sie sind jedoch weiterhin in der Datentabelle vorhanden und können in Formeln oder Makros verwendet werden.
Um versteckte Spalten in Excel mit VBA anzuzeigen, können Sie die Methode "EntireColumn" in Kombination mit der Eigenschaft "Hidden" verwenden. Hier ist ein Codebeispiel, mit dem Sie alle ausgeblendeten Spalten anzeigen können:
Unter ausgeblendete Spalten anzeigen() Dim c As Range For Each c In ActiveSheet.UsedRange.Columns c.Hidden = False Next c End Sub
Bevor Sie diesen Code ausführen, stellen Sie sicher, dass Sie alle ausgeblendeten Spalten im aktuell aktiven Arbeitsblatt anzeigen müssen. Dieser Code durchläuft alle verwendeten Spalten im Arbeitsblatt und setzt die Eigenschaft "Hidden" für jede Spalte auf "False", wodurch sie sichtbar werden.
Sie können diesen Code mit der Tastenkombination "Alt + F11" ausführen, um den VBA-Editor zu öffnen, wählen Sie dann ein Modul aus und drücken Sie "F5", um den Code auszuführen. Danach werden alle ausgeblendeten Spalten im Arbeitsblatt sichtbar.
Wenn Sie VBA kennen, können Sie viele Aufgaben in Excel automatisieren, einschließlich der Anzeige ausgeblendeter Spalten. Dies ist besonders nützlich, wenn Sie mit großen Datentabellen arbeiten, wenn Sie möglicherweise alle Spalten sehen und verwenden möchten.
Wie zeige ich ausgeblendete Spalten in VBA Excel an?
In Excel VBA müssen manchmal ausgeblendete Spalten angezeigt werden, die standardmäßig nicht sichtbar sind. Dazu gibt es mehrere Möglichkeiten, die Sie in Ihren Makros verwenden können:
Methode 1: Verwenden der EntireColumn-Methode.Hidden"
Der folgende Code verwendet die EntireColumn-Methode.Hidden", um jede Spalte zu überprüfen und ausgeblendete Spalten anzuzeigen:
Sub ShowHiddenColumns()Dim col As RangeFor Each col In ActiveSheet.UsedRange.ColumnsIf col.EntireColumn.Hidden = True Thencol.EntireColumn.Hidden = FalseEnd IfNext colEnd Sub
Methode 2: Verwenden von "Columns.Hidden" Eigenschaften
Der folgende Code verwendet die Columns-Eigenschaft.Hidden", mit dem Sie alle ausgeblendeten Spalten im aktiven Arbeitsblatt anzeigen können:
Sub ShowHiddenColumns()ActiveSheet.Columns.Hidden = FalseEnd Sub
Beide Methoden können verwendet werden, um ausgeblendete Spalten in Excel-VBA anzuzeigen. Wählen Sie je nach den spezifischen Anforderungen Ihres Projekts eine geeignete Option aus.
Methoden zum Anzeigen ausgeblendeter Spalten in Excel VBA
Es gibt mehrere Methoden in VBA Excel, mit denen Sie ausgeblendete Spalten anzeigen können. Betrachten wir einige von ihnen:
-
Verwenden der Eigenschaft .EntireColumn.Hidden Mit dieser Eigenschaft können Sie überprüfen, ob eine Spalte ausgeblendet ist, und ihren Status ändern. Hier ist ein Beispielcode:
Sub ShowHiddenColumns()Dim column As RangeFor Each column In ColumnsIf column.EntireColumn.Hidden = True Thencolumn.EntireColumn.Hidden = FalseEnd IfNext columnEnd Sub
Sub SelectHiddenColumns()Columns("A:B").SelectSelection.EntireColumn.Hidden = FalseEnd Sub
Sub ShowHiddenColumns()Columns("A:B").ShowEnd Sub
Diese Methoden können verwendet werden, um den Prozess der Anzeige ausgeblendeter Spalten in Excel mithilfe von VBA zu automatisieren. Sie können abhängig von der jeweiligen Aufgabe die für Sie geeignete Methode auswählen.
Alle ausgeblendeten Spalten in VBA Excel anzeigen
In VBA (Visual Basic for Applications) in Excel können Sie Spalten in einer Tabelle ausblenden und anzeigen. Ausgeblendete Spalten sind sehr praktisch, wenn Sie Daten in einem Arbeitsblatt speichern möchten, aber nicht möchten, dass sie für Benutzer sichtbar sind. Manchmal müssen Sie jedoch möglicherweise alle ausgeblendeten Spalten anzeigen. In diesem Fall müssen Sie VBA-Code verwenden.
Um alle versteckten Spalten in Excel VBA anzuzeigen, können Sie den folgenden Code verwenden:
Sub ShowAllHiddenColumns()Dim ws As WorksheetDim rng As RangeSet ws = ThisWorkbook.Sheets("Лист1") ' Измените "Лист1" на имя вашего листа' Перебираем все столбцы на листеFor Each rng In ws.UsedRange.Columns' Проверяем, скрыт ли столбецIf rng.EntireColumn.Hidden = True Thenrng.EntireColumn.Hidden = False ' Показываем столбецEnd IfNext rngEnd Sub
Der obige Code durchläuft alle Spalten im ausgewählten Arbeitsblatt und prüft, ob jede Spalte ausgeblendet ist. Wenn die Spalte ausgeblendet ist, wird sie mit der Eigenschaft Hidden sichtbar gemacht. Sie können die Namen von Blättern und Spalten an Ihre Anforderungen anpassen.
Nachdem Sie diesen Code ausgeführt haben, werden alle ausgeblendeten Spalten im ausgewählten Arbeitsblatt dem Benutzer angezeigt. Dies ist nützlich, wenn Sie Daten in ausgeblendeten Spalten schnell anzeigen oder bearbeiten möchten.