Πώς να επισημάνετε την ενεργή καρτέλα φύλλων στο 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;
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
