Wie kann ich die Registerkarte "Aktives Blatt" in Excel markieren?
In einer sich öffnenden Arbeitsmappe unterscheidet sich die Registerkarte "Aktives Blatt" von anderen, indem die Registerkarte aufgehellt und der Text standardmäßig fett gedruckt wird. Wenn Sie die Registerkarte "Aktives Arbeitsblatt" in Ihrer Arbeitsmappe hervorheben möchten, kann Ihnen eine Methode in diesem Artikel helfen.
Markieren Sie die aktive Arbeitsblattregisterkarte mit VBA-Code
Markieren Sie die aktive Arbeitsblattregisterkarte mit VBA-Code
Gehen Sie wie folgt vor, um die Registerkarte "Aktives Blatt" in einer sich öffnenden Excel-Arbeitsmappe hervorzuheben.
1. Wenn Sie in der Arbeitsmappe die Registerkarte "Aktives Blatt" markieren möchten, drücken Sie die Taste Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. In dem Microsoft Visual Basic für Applikationen Fenster, bitte doppelklicken Sie auf das DiesesWorkbook im linken Bereich, und kopieren Sie dann den VBA-Code und fügen Sie ihn in den ein DiesesArbeitsbuch (Code) Fenster. Siehe Screenshot:
VBA-Code: Markieren Sie die aktive Arbeitsblattregisterkarte in einer sich öffnenden Arbeitsmappe
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim xSheet As Worksheet
Application.ScreenUpdating = False
For Each xSheet In ThisWorkbook.Worksheets
If xSheet.Name = ActiveSheet.Name Then
xSheet.Tab.ColorIndex = 6
Else
xSheet.Tab.ColorIndex = 2
End If
Next
Application.ScreenUpdating = True
End Sub
3. Drücken Sie die Taste Andere + Q Tasten zum Schließen der Microsoft Visual Basic für Applikationen Fenster.
Wenn Sie nun ein Blatt aktivieren, wird die Blattregisterkarte automatisch gelb hervorgehoben, wie im folgenden Screenshot gezeigt:
Weitere Artikel:
- Wie verweise ich auf den Registerkartennamen in einer Zelle in Excel?
- Wie kann der Name der Blattregisterkarte in Excel dem Zellenwert entsprechen?
- Wie kann ich den Zellenwert mit dem Namen der Blattregisterkarte abgleichen oder umgekehrt in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die 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 jeden Tag Hunderte von Mausklicks für Sie!