Eine Möglichkeit, die Farbe einer Arbeitsblattverknüpfung in Excel zu ändern, besteht darin, die Programmiersprache VBA (Visual Basic for Applications) zu verwenden. Mit VBA können Sie verschiedene Aufgaben in Excel automatisieren, einschließlich der Änderung des Aussehens einer Arbeitsmappe. In diesem Artikel werden wir uns ansehen, wie Sie mit VBA die Farbe eines Arbeitsblattes ändern.
Öffnen Sie zunächst den integrierten VBA-Editor, den Sie in Excel finden können, indem Sie in der oberen Symbolleiste "Entwickeln" und dann "VBA-Editor" auswählen. Nachdem Sie den Editor geöffnet haben, können Sie mit dem Schreiben von Code beginnen.
Sie müssen die Tab-Eigenschaft verwenden, um die Farbe einer Blattbeschriftung zu ändern.Color" des Arbeitsblattobjekts. Mit dieser Eigenschaft können Sie die Beschriftungsfarbe festlegen, die am unteren Rand der Arbeitsmappe angezeigt wird. Sie können eine Variable erstellen, die einen Verweis auf die Arbeitsmappe und das Arbeitsblatt enthält, zu dem Sie die Farbe der Beschriftung ändern möchten, um die Arbeit zu erleichtern.
Sub ChangeTabColor()
Dim wb As Workbook
Dim ws As Worksheet
Set wb = ThisWorkbook
Set ws = wb.Sheets("Лист1")
ws.Tab.Color = RGB(255, 0, 0) ' задаем цвет ярлыка в формате RGB
End Sub
In diesem Beispiel erstellen wir die Variablen "wb" und "ws", die jeweils auf die Arbeitsmappe und das Arbeitsblatt "Tabelle1" verweisen. Dann verwenden wir die Eigenschaft "Tab.Color", um die Farbe der Blattbeschriftung in Rot zu ändern (im RGB-Format angegeben). Nachdem Sie den Code geschrieben haben, können Sie ihn ausführen, indem Sie im VBA-Editor auf die Schaltfläche "Ausführen" klicken.
Auf diese Weise können Sie mit VBA die Farbe einer Arbeitsblattverknüpfung in Excel leicht ändern. Dies kann beispielsweise nützlich sein, um Daten nach Farben zu organisieren und zu kategorisieren. Das Öffnen von VBA-Funktionen ermöglicht es dem Benutzer, Aufgaben zu automatisieren und die Benutzerfreundlichkeit in Excel zu verbessern.
Wie kann ich die Farbe einer Arbeitsblattverknüpfung in Excel über VBA anpassen
In Microsoft Excel können Sie jedem Arbeitsblatt eine Beschriftung oder Beschriftung anhängen, um die Orientierung und Verwaltung in einer Arbeitsmappe mit mehreren Arbeitsblättern zu erleichtern. Die Blattbezeichnung wird unter der Registerkarte dieses Arbeitsblatts angezeigt und kann manuell oder mithilfe von VBA-Code geändert werden.
Wenn Sie die Farbe einer Arbeitsblattbeschriftung auf einem Ihrer Arbeitsblätter anpassen möchten, können Sie VBA verwenden, um diese Aufgabe auszuführen. Hier ist, wie man es macht:
| Schritt | VBA-Code |
|---|---|
| 1 | Wählen Sie das Blatt aus, dessen Beschriftung Sie ändern möchten. Suchen Sie nach seinem Index oder verwenden Sie seinen Namen. |
| 2 | Verwenden Sie die Worksheets() -Methode oder das ActiveWorkbook-Objekt.Sheets(), um einen Verweis auf das Arbeitsblatt zu erhalten. |
| 3 | Verwenden Sie die Tab-Eigenschaft eines Arbeitsblatts, um auf seine Verknüpfung zuzugreifen. |
| 4 | Verwenden Sie die Color-Eigenschaft der Beschriftung, um eine neue Farbe festzulegen. |
Hier ist ein Beispiel für VBA-Code, der die Farbe eines Arbeitsblattetiketts in Rot ändert:
Sub ChangeTabColor()Dim ws As WorksheetSet ws = ThisWorkbook.Sheets("Лист1") ' замените "Лист1" на имя вашего листаws.Tab.Color = RGB(255, 0, 0) ' устанавливает цвет ярлыка на красныйEnd Sub
Nach dem Ausführen dieses Codes ändert sich die Beschriftung des ausgewählten Arbeitsblatts in Rot. Sie können die Werte in der RGB() -Funktion ändern, um die Farbe Ihrer Wahl festzulegen.
Jetzt wissen Sie, wie Sie die Farbe einer Arbeitsblattverknüpfung in Excel mit VBA anpassen. Diese Funktion kann nützlich sein, wenn Sie eine große Anzahl von Arbeitsblättern in Ihrer Arbeitsmappe haben und sie leicht zwischen ihnen unterscheiden möchten.
Öffnen Sie den integrierten Visual Basic-Editor
Um die Farbe einer Arbeitsblattverknüpfung in Excel mit VBA zu ändern, müssen Sie den integrierten Visual Basic-Editor öffnen.
1. Starten Sie Microsoft Excel, und öffnen Sie die gewünschte Arbeitsmappe.
2. Wählen Sie im Menü "Entwickler" (wenn die Registerkarte "Entwickler" nicht vorhanden ist, aktivieren Sie sie in den Excel-Einstellungen).
3. Klicken Sie in der Gruppe Code auf die Schaltfläche Visual Basic.
4. Das Fenster "Visual Basic for Applications" wird geöffnet. Hier arbeiten Sie mit VBA-Code.
5. Suchen Sie im linken Fensterbereich nach dem Projekt mit dem Namen Ihrer Arbeitsmappe und erweitern Sie es (klicken Sie auf das +).
6. Doppelklicken Sie auf "ThisWorkbook".
7. Im rechten Fensterbereich wird eine leere Prozedur mit dem Namen "Workbook_Open()" angezeigt.
8. Schreiben Sie innerhalb des Verfahrens Code, um die Farbe des Blattetiketts zu ändern. Zum Beispiel:
Private Sub Workbook_Open()Sheets("Лист1").Tab.Color = RGB(255, 0, 0) ' Изменение цвета ярлыка "Лист1" на красныйEnd Sub
9. Speichern Sie die Änderungen, und schließen Sie den Visual Basic-Editor. Wenn Sie nun die Arbeitsmappe öffnen, wird die Arbeitsmappe "Arbeitsmappe 1" rot angezeigt.
Beachten Sie, dass jedes Arbeitsblatt in Excel eine eigene Beschriftung hat. Um die Beschriftungsfarbe eines anderen Arbeitsblatts zu ändern, geben Sie daher seinen Namen im VBA-Code ein.
Jetzt wissen Sie, wie Sie den integrierten Visual Basic-Editor in Excel öffnen und mit VBA die Farbe einer Arbeitsblattverknüpfung ändern können.
Suchen Sie das gewünschte Blatt im Projektfenster
Um die Farbe einer Arbeitsblattverknüpfung in Excel mit VBA zu ändern, müssen Sie zuerst das gewünschte Arbeitsblatt im Projektfenster suchen. Das Projektfenster listet alle Arbeitsblätter in der Excel-Arbeitsmappe auf und Sie können damit das gewünschte Arbeitsblatt definieren, in dem Sie die Farbe der Beschriftung ändern möchten.
So finden Sie das gewünschte Blatt im Projektfenster:
- Öffnen Sie den Visual Basic-Editor, indem Sie Alt + F11 drücken.
- Beachten Sie die linke Seite des Fensters, wo Sie das Projektfenster sehen.
- Suchen Sie im Projektfenster nach dem Abschnitt "VBAProject (Name der Arbeitsmappe)", und erweitern Sie ihn.
- Unter dem Abschnitt "VBAProject (Name der Arbeitsmappe)" sehen Sie eine Liste aller Arbeitsblätter in der Excel-Arbeitsmappe.
- Blättern Sie durch die Liste, um das gewünschte Blatt zu finden.
Wenn Sie das gewünschte Arbeitsblatt finden, können Sie im Projektfenster darauf doppelklicken, um den VBA-Code für dieses Arbeitsblatt zu öffnen. Hier können Sie Änderungen am Code vornehmen, um die Farbe der Blattbeschriftung zu ändern.
Suchen Sie im Projektfenster nach dem gewünschten Arbeitsblatt und lesen Sie weiter, um zu erfahren, wie Sie die Farbe der Arbeitsblattverknüpfung mit VBA in Excel ändern können.
Ändern Sie die Farbe der Arbeitsblattverknüpfung mithilfe von VBA-Code
Um die Farbe einer Arbeitsblattbeschriftung zu ändern, müssen Sie das Tab-Objekt und seine Color-Eigenschaft verwenden. Die Color-Eigenschaft legt die Farbe des Etikettenblatts fest. Excel verwendet Farben aus der Programmpalette, die eine begrenzte Anzahl von Farben bietet.
Hier ist ein Beispiel für VBA-Code, der die Farbe der Blattbeschriftung in Rot ändert:
Sub ChangeTabColor()' Изменение цвета ярлыка листа на красныйThisWorkbook.Sheets("Название листа").Tab.Color = RGB(255, 0, 0)End Sub
Im obigen Code müssen Sie "Blattname" durch den tatsächlichen Namen des Blattes ersetzen, dessen Farbe Sie ändern möchten. Die RGB-Funktion wird verwendet, um die Farbe eines Etikettenblatts im RGB-Format festzulegen.
Sie können auch andere Farben verwenden, indem Sie die Werte in der RGB-Funktion ändern. Um beispielsweise die Farbe einer Blattbeschriftung in Grün zu ändern, können Sie den Code verwenden:
Sub ChangeTabColor()' Изменение цвета ярлыка листа на зеленыйThisWorkbook.Sheets("Название листа").Tab.Color = RGB(0, 255, 0)End Sub
Sie können mit verschiedenen Werten experimentieren, um die gewünschte Arbeitsblattbeschriftungsfarbe zu erstellen. Ändern Sie einfach die Werte in der RGB-Funktion, um die Farbe zu ändern.