Wie aktiviere ich ein blatt mit vba?
Nehmen wir an, Sie arbeiten mit mehreren Arbeitsblättern und es fällt Ihnen schwer, mithilfe einer Registerkarte zu einem Blatt zu navigieren. In dieser Situation können Sie VBA-Code verwenden, um ein beliebiges Arbeitsblatt zu aktivieren.
Und um dafür VBA-Code zu schreiben, müssen Sie die Worksheet.Activate-Methode verwenden. In diesem Artikel möchte ich Ihnen eine einfache Möglichkeit vorstellen, diesen Code zu schreiben, um ein Arbeitsblatt zu aktivieren oder auszuwählen. Bevor Sie diesen Code schreiben, müssen Sie diese Methode verstehen.
Worksheet.Activate-Methode
Bei dieser Methode können Sie den Namen oder die Nummer des Arbeitsblatts angeben, das Sie aktivieren möchten. Nehmen wir an, Sie müssen Blatt 1 aktivieren, dann lautet der Code:
Worksheets("Sheet1").Activate
Oder Sie können auch Blattnummern verwenden.
Worksheets("1").Activate
Der endgültige Code lautet also:
Sub ActivateSheet1() Worksheets("Sheet1").Activate End Sub
Beispiele: Aktivieren Sie eine Tabellenkalkulation mit VBA
Im wirklichen Leben können Sie diese Methode auf unterschiedliche Weise anwenden. Hier sind ein paar.
1. Aktivieren Sie beim Öffnen eine Tabellenkalkulation
Wenn Sie bei jedem Öffnen der Arbeitsmappe ein bestimmtes Arbeitsblatt aktivieren möchten, nennen Sie diesen VBA-Code auto_open.
Sub auto_open() Worksheets("Sheet1").Activate End Su
2. Aktivieren Sie ein Arbeitsblatt und blenden Sie alle anderen aus
Vielleicht möchten Sie zu einem Arbeitsblatt gehen und alle anderen Arbeitsblätter in der Arbeitsmappe ausblenden. Sie können dies mit dem folgenden Code tun.
Sub HideWorksheet() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets If ws.Name <> "Sheet1" Then ws.Visible = xlSheetHidden End If Next ws End Sub
Ändern Sie den Blattnamen aus dem obigen Code, um ihn nützlicher zu machen.