Τροποποίηση φύλλου εργασίας από κώδικα; Προσθέστε ένα σχόλιο κελιού για να ενημερώσετε τον χρήστη για αυτό που μόλις κάνατε! Τα παρακάτω αποσπάσματα κώδικα σάς δείχνουν πώς μπορείτε να προσθέσετε ή να διαγράψετε ένα σχόλιο σε ένα κελί.
Προσθήκη σχολίου κελιού χρησιμοποιώντας VBA
1. Τοποθετήστε τον ακόλουθο κώδικα κάπου στη μακροεντολή σας για να προσθέσετε ένα σχόλιο
| 1 | Sheet1.Range ("A1"). AddComment ("Hello World") |
Διαγραφή σχολίου κελιού χρησιμοποιώντας VBA
2. Για να διαγράψετε ένα σχόλιο χρησιμοποιήστε αυτόν τον κωδικό
| 1 | Sheet1.Range ("A1"). Comment.Delete |
Επεξεργασία σχολίου κελιού χρησιμοποιώντας VBA
3. Για να επεξεργαστείτε ένα σχόλιο πρέπει να διαβάσετε το υπάρχον και να το επεξεργαστείτε. Χρησιμοποιήστε τον παρακάτω κωδικό
| 123456789 | Dim OldComment As VariantDim NewComment As VariantOldComment = Sheet1.Range ("A1"). Comment.TextNewComment = OldComment & "Edited comment"Sheet1.Range ("A1"). Comment.DeleteSheet1.Range ("A1"). AddComment (NewComment) |
Πρώτον, πρέπει να διαβάσετε το υπάρχον σχόλιο OldComment μεταβλητός.
Μετά από αυτό μπορείτε να επεξεργαστείτε ένα σχόλιο, π.χ. προσθέστε το νέο κείμενο στο υπάρχον NewComment μεταβλητός.
Τώρα, πρέπει να διαγράψετε το παλιό σχόλιο και να προσθέσετε το νέο. Για να διαγράψετε το σχόλιο, πρέπει να χρησιμοποιήσετε το .Σχόλιο. Διαγραφή εντολή.
Τέλος, μπορείτε να προσθέσετε το σχόλιο από το NewComment μεταβλητή χρησιμοποιώντας το .Προσθήκη Σχολίου εντολή.
