Πώς να κάνετε το χρώμα φόντου του πλαισίου ελέγχου διαφανές στο Excel;
Κανονικά, κατά την εισαγωγή πλαισίων ελέγχου (ActiveX Control) σε κελιά στο Excel, το χρώμα φόντου του πλαισίου ελέγχου θα καλύπτει το χρώμα πλήρωσης του φύλλου εργασίας, όπως φαίνεται παρακάτω. Για την εμφάνιση ολόκληρου του χρώματος φόντου του φύλλου εργασίας, πρέπει να αλλάξετε το χρώμα φόντου του πλαισίου ελέγχου ώστε να είναι διαφανές. Και αυτό το άρθρο θα παρέχει μια μέθοδο VBA για την επίλυση αυτού του προβλήματος.
Κάντε το χρώμα φόντου του πλαισίου ελέγχου διαφανές με τον κωδικό VBA
Κάντε το χρώμα φόντου του πλαισίου ελέγχου διαφανές με τον κωδικό VBA
Κάντε τα εξής για να κάνετε το χρώμα φόντου των πλαισίων ελέγχου διαφανές με τον κώδικα VBA.
1. Στο φύλλο εργασίας περιέχει τα πλαίσια ελέγχου που χρειάζεστε για να τα κάνετε διαφανή, πατήστε το άλλος + F11 ταυτόχρονα για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Στο Microsoft Visual Basic για εφαρμογές παρακαλώ κάντε κλικ Κύριο θέμα > Μονάδα μέτρησης. Στη συνέχεια, αντιγράψτε και επικολλήστε τον κώδικα VBA στο παράθυρο Code.
Κωδικός VBA: Κάντε διαφανές το χρώμα φόντου των πλαισίων ελέγχου
Sub CheckBoxTransparent()
Dim xOleChk As OLEObject
Application.ScreenUpdating = False
For Each xOleChk In ActiveSheet.OLEObjects
If TypeName(xOleChk.Object) = "CheckBox" Then
xOleChk.Object.BackStyle = fmBackStyleTransparent
End If
Next
Application.ScreenUpdating = True
End Sub
3. Πάτα το F5 ή κάντε κλικ στο τρέξιμο κουμπί για να εκτελέσετε τον κωδικό. Στη συνέχεια, όλα τα πλαίσια ελέγχου στο τρέχον φύλλο εργασίας γίνονται διαφανή. Δείτε το στιγμιότυπο οθόνης:
Σχετικά άρθρα:
- Πώς να φιλτράρετε δεδομένα με βάση το πλαίσιο ελέγχου στο Excel;
- Πώς να δημιουργήσετε μια αναπτυσσόμενη λίστα με πολλά πλαίσια ελέγχου στο Excel;
- Πώς να αλλάξετε μια καθορισμένη τιμή ή χρώμα κελιού όταν το πλαίσιο ελέγχου είναι επιλεγμένο στο Excel;
- Πώς να επισημάνετε το κελί ή τη γραμμή με το πλαίσιο ελέγχου στο Excel;
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!