Erhalten Noten Namen
Wie bekomme ich Blattnamen mit VBA in Microsoft Excel
Falls Sie einen Weg finden möchten, mit dem Sie alle Namen des Blattes erhalten, die sichtbar, d. H. Nicht versteckt sind.
In diesem Artikel erfahren Sie, wie Sie die Namen der sichtbaren Blätter nur mithilfe von VBA-Code abrufen.
Frage): Ich habe mehrere Blätter in einer Datei und ich habe die Blätter versteckt, die andere nicht sehen sollen. Ich möchte einen Code, der mir den Namen aller sichtbaren Blätter gibt.
Nehmen wir an, wir haben 5 Blätter und verstecken absichtlich ein bestimmtes Blatt.
Um den Namen der sichtbaren Blätter zu erhalten, müssen wir die folgenden Schritte ausführen:
Klicken Sie auf die Registerkarte Entwickler. Wählen Sie in der Gruppe Code die Option Visual Basic
aus Kopieren Sie den folgenden Code in das Standardmodul
Sub VisibleSheets ()
Dim i As Integer, j As Integer: j = 1
Zellen (1, 1) .CurrentRegion.Cells.Clear
Für i = 1 To Sheets.Count
Wenn Blätter (i) .Visible = -1 Dann
Zellen (j, 1) = Blätter (i) .Name
j = j + 1
End If
Weiter
End Sub
===
-
Wenn Sie den Code zum ersten Mal ausführen, erhalten Sie die Namen aller Blätter im aktuellen Blatt in Spalte A
-
Wenn wir das Jan-Blatt ausblenden, haben wir die folgende Liste der Blattnamen
Auf diese Weise können wir den Namen aller sichtbaren Blätter mithilfe von VBA-Code abrufen.