Πώς να εισαγάγετε σφραγίδα ημερομηνίας σε ένα κελί, εάν είναι επιλεγμένο ένα πλαίσιο ελέγχου στο Excel;
Κανονικά, εισάγετε μια σφραγίδα ημερομηνίας χρησιμοποιώντας πλήκτρα στο Excel. Τι γίνεται με την εισαγωγή σφραγίδας ημερομηνίας σε ένα κελί από ένα πλαίσιο ελέγχου στο Excel; Όταν επιλέγετε το πλαίσιο ελέγχου, η χρονική σήμανση εισάγεται αυτόματα σε ένα καθορισμένο κελί. Αυτό το άρθρο θα σας βοηθήσει να το λύσετε.
Εισαγάγετε τη σφραγίδα ημερομηνίας σε ένα κελί, εάν είναι επιλεγμένο ένα πλαίσιο ελέγχου με κωδικό VBA
Αυτή η ενότητα θα εισαγάγει ένα σενάριο VBA για να σας βοηθήσει να εισαγάγετε μια σφραγίδα ημερομηνίας σε ένα κελί αυτόματα εάν είναι επιλεγμένο ένα πλαίσιο ελέγχου στο Excel. Κάντε τα εξής.
1. Αφού εισαγάγετε ένα πλαίσιο ελέγχου, πατήστε άλλος + F11 ταυτόχρονα για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο Module.
Κωδικός VBA: Εισαγάγετε τη σφραγίδα ημερομηνίας σε ένα κελί, εάν είναι επιλεγμένο ένα πλαίσιο ελέγχου
Sub CheckBox_Date_Stamp()
Dim xChk As CheckBox
Set xChk = ActiveSheet.CheckBoxes(Application.Caller)
With xChk.TopLeftCell.Offset(, 1)
If xChk.Value = xlOff Then
.Value = ""
Else
.Value = Date
End If
End With
End Sub
3. Τύπος άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
4. Κάντε δεξί κλικ στο πλαίσιο ελέγχου και επιλέξτε Εκχώρηση Micro από το μενού με δεξί κλικ. Δείτε το στιγμιότυπο οθόνης:
5. Στο Εκχώρηση μακροεντολής , επιλέξτε Checkbox_date_stamp στο Όνομα μακροεντολής πλαίσιο και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:
Όταν επιλέγετε το πλαίσιο ελέγχου, η σφραγίδα ημερομηνίας θα εισαχθεί αυτόματα στο παρακείμενο κελί.
Σχετικά Άρθρα:
- Πώς να αλλάξετε μια καθορισμένη τιμή ή χρώμα κελιού όταν το πλαίσιο ελέγχου είναι επιλεγμένο στο Excel;
- Πώς να επισημάνετε το κελί ή τη γραμμή με το πλαίσιο ελέγχου στο Excel;
- Πώς να κάνετε το πλαίσιο ελέγχου επιλεγμένο με βάση την τιμή κελιού στο Excel;
- Πώς να φιλτράρετε δεδομένα με βάση το πλαίσιο ελέγχου στο Excel;
- Πώς να αποκρύψετε το πλαίσιο ελέγχου όταν η σειρά είναι κρυφή στο Excel;
- Πώς να δημιουργήσετε μια αναπτυσσόμενη λίστα με πολλά πλαίσια ελέγχου στο Excel;
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!