Πώς να επισημάνετε το κελί ή τη γραμμή με το πλαίσιο ελέγχου στο Excel;
Όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης, πρέπει να επισημάνετε τη γραμμή ή το κελί με το πλαίσιο ελέγχου. Όταν ένα πλαίσιο ελέγχου είναι επιλεγμένο, μια καθορισμένη σειρά ή ένα κελί θα επισημανθούν αυτόματα. Αλλά πώς να το επιτύχετε στο Excel; Αυτό το άρθρο θα σας δείξει δύο μεθόδους για να το επιτύχετε.
Επισημάνετε το κελί ή τη σειρά με πλαίσιο ελέγχου με Μορφοποίηση υπό όρους
Επισημάνετε το κελί ή τη γραμμή με πλαίσιο ελέγχου με κωδικό VBA
Επισημάνετε το κελί ή τη σειρά με πλαίσιο ελέγχου με Μορφοποίηση υπό όρους
Μπορείτε να δημιουργήσετε έναν κανόνα μορφοποίησης υπό όρους για να επισημάνετε το κελί ή τη γραμμή με το πλαίσιο ελέγχου στο Excel. Κάντε τα εξής:
Συνδέστε όλα τα πλαίσια ελέγχου σε ένα καθορισμένο κελί
1. Πρέπει να εισαγάγετε τα κουτάκια στα κελιά ένα προς ένα χειροκίνητα κάνοντας κλικ Εργολάβος > Κύριο θέμα > Πλαίσιο ελέγχου (Έλεγχος φόρμας).
2. Τώρα τα πλαίσια ελέγχου έχουν εισαχθεί στα κελιά της στήλης Ι. Επιλέξτε το πρώτο πλαίσιο ελέγχου στο I1, εισάγετε τον τύπο = $ J1 στη γραμμή τύπων και, στη συνέχεια, πατήστε το εισάγετε κλειδί.
Άκρο: Εάν δεν θέλετε να συσχετίζονται τιμές σε παρακείμενα κελιά με πλαίσια ελέγχου, μπορείτε να συνδέσετε το πλαίσιο ελέγχου με ένα κελί άλλου φύλλου εργασίας, όπως = Φύλλο3! $ E1.
2. Επαναλάβετε το βήμα 1 έως ότου όλα τα πλαίσια ελέγχου συνδεθούν με τα γειτονικά κελιά ή κελιά σε άλλο φύλλο εργασίας.
Note: Όλα τα συνδεδεμένα κελιά πρέπει να είναι διαδοχικά και να βρίσκονται στην ίδια στήλη.
Δημιουργήστε έναν κανόνα μορφοποίησης υπό όρους
Τώρα πρέπει να δημιουργήσετε έναν κανόνα μορφοποίησης υπό όρους ως εξής βήμα προς βήμα.
1. Επιλέξτε τις γραμμές που πρέπει να επισημάνετε με πλαίσια ελέγχου και, στη συνέχεια, κάντε κλικ στο Μορφοποίηση υπό όρους > Νέος κανόνας σύμφωνα με το Αρχική αυτί. Δείτε το στιγμιότυπο οθόνης:
2. Στο Νέος κανόνας μορφοποίησης πλαίσιο διαλόγου, πρέπει:
2.1 Επιλέξτε το Χρησιμοποιήστε έναν τύπο για να προσδιορίσετε ποια κελιά θα μορφοποιηθούν επιλογή του Επιλέξτε έναν τύπο κανόνα κουτί;
2.2 Εισαγάγετε τον τύπο = IF ($ J1 = TRUE, TRUE, FALSE) μέσα στο Μορφοποιήστε τιμές όπου ισχύει αυτός ο τύπος κουτί;
Or = IF (Sheet3! $ E1 = TRUE, TRUE, FALSE) εάν τα πλαίσια ελέγχου συνδέονται με άλλο φύλλο εργασίας.
2.3 Κάντε κλικ στο Μορφή κουμπί για να καθορίσετε ένα επισημασμένο χρώμα για τις σειρές.
2.4 Κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:
Note: Στον τύπο, $ J1 or E1 $ είναι το πρώτο συνδεδεμένο κελί για τα πλαίσια ελέγχου και βεβαιωθείτε ότι η αναφορά κελιού έχει αλλάξει σε απόλυτη στήλη (J1> $ J1 or E1> $ E1).
Τώρα δημιουργείται ο κανόνας μορφοποίησης υπό όρους. Κατά τον έλεγχο των πλαισίων ελέγχου, οι αντίστοιχες σειρές θα επισημαίνονται αυτόματα όπως φαίνεται το στιγμιότυπο οθόνης φυσητήρα.
Επισημάνετε το κελί ή τη γραμμή με πλαίσιο ελέγχου με κωδικό VBA
Ο παρακάτω κώδικας VBA μπορεί επίσης να σας βοηθήσει να επισημάνετε το κελί ή τη γραμμή με το πλαίσιο ελέγχου στο Excel. Κάντε τα εξής:
1. Στο φύλλο εργασίας πρέπει να επισημάνετε το κελί ή τη γραμμή με το πλαίσιο ελέγχου. Κάντε δεξί κλικ στο Καρτέλα φύλλου και επιλέξτε Προβολή κωδικού από το δεξί κλικ για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο Code.
Κωδικός VBA: Επισήμανση γραμμής με πλαίσιο ελέγχου στο Excel
Sub AddCheckBox()
Dim xCell As Range
Dim xRng As Range
Dim I As Integer
Dim xChk As CheckBox
On Error Resume Next
InputC:
Set xRng = Application.InputBox("Please select the column range to insert checkboxes:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
If xRng.Columns.Count > 1 Then
MsgBox "The selected range should be a single column", vbInformation, "Kutools fro Excel"
GoTo InputC
Else
If xRng.Columns.Count = 1 Then
For Each xCell In xRng
With ActiveSheet.CheckBoxes.Add(xCell.Left, _
xCell.Top, xCell.Width = 15, xCell.Height = 12)
.LinkedCell = xCell.Offset(, 1).Address(External:=False)
.Interior.ColorIndex = xlNone
.Caption = ""
.Name = "Check Box " & xCell.Row
End With
xRng.Rows(xCell.Row).Interior.ColorIndex = xlNone
Next
End If
With xRng
.Rows.RowHeight = 16
End With
xRng.ColumnWidth = 5#
xRng.Cells(1, 1).Offset(0, 1).Select
For Each xChk In ActiveSheet.CheckBoxes
xChk.OnAction = ActiveSheet.Name + ".InsertBgColor"
Next
End If
End Sub
Sub InsertBgColor()
Dim xName As Integer
Dim xChk As CheckBox
For Each xChk In ActiveSheet.CheckBoxes
xName = Right(xChk.Name, Len(xChk.Name) - 10)
If (xName = Range(xChk.LinkedCell).Row) Then
If (Range(xChk.LinkedCell) = "True") Then
Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = 6
Else
Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = xlNone
End If
End If
Next
End Sub
3. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα. (Note: πρέπει να βάλετε τον κέρσορα στο πρώτο μέρος του κώδικα για να εφαρμόσετε το πλήκτρο F5) Στο αναδυόμενο παράθυρο Kutools για Excel πλαίσιο διαλόγου, επιλέξτε το εύρος που θέλετε να εισαγάγετε τα πλαίσια ελέγχου και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Εδώ επιλέγω το εύρος I1: I6. Δείτε το στιγμιότυπο οθόνης:
4. Στη συνέχεια, τα πλαίσια ελέγχου εισάγονται σε επιλεγμένα κελιά. Επιλέξτε οποιοδήποτε από τα πλαίσια ελέγχου, η αντίστοιχη σειρά θα επισημανθεί αυτόματα όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης.
Σχετικά Άρθρα:
- Πώς να αλλάξετε μια καθορισμένη τιμή ή χρώμα κελιού όταν το πλαίσιο ελέγχου είναι επιλεγμένο στο Excel;
- Πώς να εισαγάγετε σφραγίδα ημερομηνίας σε ένα κελί, εάν είναι επιλεγμένο ένα πλαίσιο ελέγχου στο Excel;
- Πώς να κάνετε το πλαίσιο ελέγχου επιλεγμένο με βάση την τιμή κελιού στο Excel;
- Πώς να φιλτράρετε δεδομένα με βάση το πλαίσιο ελέγχου στο Excel;
- Πώς να αποκρύψετε το πλαίσιο ελέγχου όταν η σειρά είναι κρυφή στο Excel;
- Πώς να δημιουργήσετε μια αναπτυσσόμενη λίστα με πολλά πλαίσια ελέγχου στο Excel;
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!