Πώς να επισημάνετε την ενεργή καρτέλα φύλλων στο Excel;

Σε ένα άνοιγμα βιβλίου εργασίας, η καρτέλα ενεργού φύλλου διακρίνει από τους άλλους λευκαίνοντας την καρτέλα και τυπώνοντας το κείμενο από προεπιλογή. Εάν θέλετε να κάνετε την καρτέλα ενεργού φύλλου εργασίας πιο εξαιρετική στο βιβλίο εργασίας σας, μια μέθοδος σε αυτό το άρθρο μπορεί να σας βοηθήσει.

Επισημάνετε την καρτέλα του ενεργού φύλλου εργασίας με τον κωδικό VBA

Επισημάνετε την καρτέλα του ενεργού φύλλου εργασίας με τον κωδικό VBA

Κάντε τα εξής για να επισημάνετε την καρτέλα ενεργού φύλλου σε ένα άνοιγμα του βιβλίου εργασίας του Excel.

1. Στο βιβλίο εργασίας, θέλετε να επισημάνετε την ενεργή καρτέλα φύλλου, πατήστε το άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές κάντε διπλό κλικ στο Αυτό το βιβλίο εργασίας στο αριστερό παράθυρο και, στη συνέχεια, αντιγράψτε και επικολλήστε τον κώδικα VBA στο Αυτό το βιβλίο εργασίας (Κωδικός) παράθυρο. Δείτε το στιγμιότυπο οθόνης:

Κωδικός VBA: Επισημάνετε την καρτέλα του ενεργού φύλλου εργασίας σε ένα βιβλίο εργασίας που ανοίγει

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. Πάτα το άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

Τώρα, όταν ενεργοποιείτε ένα φύλλο, η καρτέλα του φύλλου επισημαίνεται αυτόματα με κίτρινο χρώμα όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης:

Σχετικά Άρθρα:

• Πώς να αναφέρετε το όνομα της καρτέλας στο κελί στο Excel;
• Πώς να κάνετε το όνομα της καρτέλας φύλλου ίσο με την τιμή κελιού στο Excel;
• Πώς να αντιστοιχίσετε την τιμή κελιού με το όνομα της καρτέλας φύλλου ή αντίστροφα στο Excel;