Πώς να χρησιμοποιήσετε την επιλογή σχολίου μέσω VBA

Anonim

Σε αυτό το άρθρο, θα μάθουμε πώς να χρησιμοποιούμε την επιλογή σχολίων στο Microsoft Excel μέσω VBA.

Το σχόλιο είναι η πηγή από την οποία μπορούμε να μεταφέρουμε το μήνυμα σε κάθε χρήστη, εάν απαιτείται να παράσχει πληροφορίες για οποιοδήποτε συγκεκριμένο κελί.

Θα μάθουμε:-

  • Πώς να εισαγάγετε σχόλιο;
  • Πώς να διαγράψετε όλα τα σχόλια;
  • Πώς να διαγράψετε όλα τα σχόλια από όλα τα φύλλα σε ένα βιβλίο εργασίας;
  • Πώς να αποκρύψετε τα σχόλια μερικώς;
  • Πώς να αποκρύψετε εντελώς τα σχόλια;
  • Πώς να εμφανίσετε ένα ενιαίο σχόλιο;
  • Πώς να εμφανίσετε ή να εμφανίσετε όλα τα σχόλια σε ολόκληρο το βιβλίο εργασίας του Excel;
  • Απόκρυψη συγκεκριμένων σχολίων στο Excel- Τα σχόλια θα εμφανίζονται ακόμα.
  • Πώς να προσθέσετε σχόλια φωτογραφιών/εικόνων φόντου στο Excel;

Τώρα ξεκινήστε με τον τρόπο εισαγωγής σχολίου στο φύλλο Excel;

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να εισαγάγουμε σχόλια στο φύλλο Excel.

Έχουμε δεδομένα στο φύλλο 2 στο οποίο έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης έχουμε καταγράψει τις ώρες εργασίας, τις υπερωρίες και τις κανονικές ώρες στο φύλλο. Σε ορισμένα κελιά, θέλουμε να εισαγάγουμε τα σχόλια.

Για να προσθέσετε τα σχόλια στο φύλλο, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.

Γράψτε τον παρακάτω κωδικό:

Sub AddComment ()
Dim sh ως φύλλο εργασίας
Ορίστε sh = ThisWorkbook. Φύλλα (1)
sh.Range ("E10"). AddComment ("Saturday off")
sh.Range ("D12"). AddComment ("Συνολικές ώρες εργασίας - κανονικές ώρες")
sh.Range ("I12"). AddComment ("8 ώρες την ημέρα πολλαπλασιασμός με 5 εργάσιμες ημέρες")
sh.Range ("M12"). AddComment ("Συνολικές ώρες εργασίας 21-Ιουλίου-2014 έως 26-Ιουλίου-2014")
Τέλος υπο

Επεξήγηση κώδικα:- Πρώτα πρέπει να επιλέξουμε το όνομα του θέματος, μετά θα ορίσουμε τις μεταβλητές και μετά θα ορίσουμε όλες τις περιοχές όπου θέλουμε να βάλουμε τα σχόλια.
Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας. Όλα τα σχόλια θα ενημερωθούν στο φύλλο Excel. Μπορείτε να προσδιορίσετε τα σχόλια με το κόκκινο ορθογώνιο στη γωνία των κελιών.

Πώς μπορώ να διαγράψω όλα τα σχόλια από ένα φύλλο;

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να διαγράψουμε όλα τα σχόλια στο φύλλο Excel.

Έχουμε δεδομένα στο φύλλο 2 στο οποίο έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο. Στο Excel, έχουμε κάποια σχόλια τα οποία θέλουμε να διαγράψουμε.

Για να διαγράψετε όλα τα σχόλια στο φύλλο, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
  • Γράψτε τον παρακάτω κωδικό:
Sub DeleteComment ()
Cells.ClearComments
Τέλος υπο

Πώς να διαγράψετε όλα τα σχόλια από όλα τα κελιά σε ένα βιβλίο εργασίας;

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να διαγράψουμε όλα τα σχόλια στο φύλλο Excel.

Έχουμε δεδομένα σε δύο φύλλα στα οποία έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης, έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο. Στο Excel, έχουμε κάποια σχόλια τα οποία θέλουμε να διαγράψουμε, όχι μόνο από το ενεργό φύλλο ακόμη και από το βιβλίο εργασίας.

Για να διαγράψετε όλα τα σχόλια από όλα τα φύλλα εργασίας σε ένα βιβλίο εργασίας, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
  • Γράψτε τον παρακάτω κωδικό:
Sub DeleteAllComments ()
Dim wsh Ως φύλλο εργασίας
Dim CmtAs CommentFor Every wsh In ActiveWorkbook.Worksheets
Για κάθε Cmt In wsh.Comments
Cmt. Διαγραφή
Επόμενο
Επόμενο
Τέλος υπο

Επεξήγηση κώδικα: - Αρχικά, πρέπει να επιλέξουμε το όνομα του θέματος και, στη συνέχεια, θα εκτελέσουμε τον βρόχο για να ελέγξουμε τα φύλλα και, στη συνέχεια, να διαγράψουμε όλα τα σχόλια από όλα τα φύλλα.

Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας. Όλα τα σχόλια θα διαγραφούν από όλα τα φύλλα σε ένα βιβλίο εργασίας.

Πώς να αποκρύψετε τα σχόλια μερικώς;

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να αποκρύψουμε τα σχόλια εν μέρει.

Έχουμε δεδομένα σε δύο φύλλα στα οποία έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο. Στο Excel, έχουμε κάποια σχόλια που θέλουμε να αποκρύψουμε.

Για να αποκρύψετε τα σχόλια από όλα τα φύλλα εργασίας, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
  • Γράψτε τον παρακάτω κωδικό:
Sub HideComments ()
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Τέλος υπο

Επεξήγηση κώδικα: - Πρώτα θα δώσουμε το όνομα του θέματος και μετά θα ορίσουμε τον κώδικα για να αποκρύψουμε τα σχόλια.
Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας. Όλα τα σχόλια θα διαγραφούν από όλα τα φύλλα σε ένα βιβλίο εργασίας.

Πώς να αποκρύψετε εντελώς τα σχόλια;

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να αποκρύψουμε εντελώς τα σχόλια.

Έχουμε δεδομένα σε δύο φύλλα στα οποία έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο. Στο Excel έχουμε κάποια σχόλια που θέλουμε να αποκρύψουμε εντελώς. Σημαίνει ότι τα σχόλια πρέπει να υπάρχουν, αλλά δεν πρέπει να εμφανίζονται σε κανέναν, αλλά ο χρήστης θα μπορεί να επεξεργαστεί το σχόλιο. Ως αποτέλεσμα, αυτή δεν είναι μια ασφαλής μέθοδος για την πλήρη προστασία των σχολίων από τον χρήστη.

Για να αποκρύψετε εντελώς τα σχόλια, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
  • Γράψτε τον παρακάτω κωδικό:
Sub HideCommentscompelyely ()
Application.DisplayCommentIndicator = xlNoIndicator
Τέλος υπο

Επεξήγηση κώδικα: - Πρώτα πρέπει να επιλέξουμε το όνομα του θέματος και, στη συνέχεια, πρέπει να ορίσουμε τον κώδικα για να αποκρύψουμε εντελώς τα σχόλια.
Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας. Όλα τα σχόλια θα κρυφτούν εντελώς από το φύλλο εργασίας του Excel.

Πώς να εμφανίσετε ένα σχόλιο και θα πρέπει να είναι πάντα ορατό;

Η μακροεντολή χρησιμοποιείται για την εμφάνιση ορισμένων σημαντικών σχολίων σε ένα φύλλο εργασίας ή ένα βιβλίο εργασίας στο Excel.

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να δείξουμε το ενιαίο σχόλιο στο Excel.

Έχουμε δεδομένα σε δύο φύλλα στα οποία έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο. Στο Excel, έχουμε ορισμένα σχόλια που θέλουμε να εμφανίσουμε στο σχόλιο μεμονωμένων σχολίων από Ν αριθμούς.

Για να εμφανίσετε το μεμονωμένο σχόλιο, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
    • Γράψτε τον παρακάτω κωδικό:
Υποπροσθήκη σχολίου ()
Dim sh ως φύλλο εργασίας
Ορίστε sh = ThisWorkbook. Φύλλα (1)
sh.Range ("E10"). Comment.Visible = True
Τέλος υπο

Επεξήγηση κώδικα: - Αρχικά αποφασίζουμε το όνομα του θέματος και, στη συνέχεια, πρέπει να ορίσουμε τον κωδικό για να εμφανιστεί το μεμονωμένο σχόλιο στο φύλλο εργασίας.
Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας. Θα εμφανιστεί μόνο ένα σχόλιο και άλλα σχόλια θα παραμείνουν κρυφά.

Πώς να εμφανίσετε όλα τα σχόλια σε ένα ολόκληρο βιβλίο εργασίας του Excel;

Αυτό είναι χρήσιμο όταν λαμβάνουμε οποιοδήποτε βιβλίο εργασίας από κάποιον και δεν γνωρίζουμε ποιο κελί έχει σχόλια στο βιβλίο εργασίας, οπότε μπορούμε να χρησιμοποιήσουμε αυτόν τον κώδικα VBA για να εμφανίσουμε όλα τα σχόλια σε ένα βιβλίο εργασίας.

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να δείξουμε όλα τα σχόλια σε ολόκληρο το βιβλίο εργασίας του Excel.

Έχουμε δεδομένα σε δύο φύλλα στα οποία έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης, έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο με λίγα σχόλια. Αλλά όλα τα σχόλια είναι κρυμμένα και θέλουμε να δούμε όλα τα κρυφά σχόλια.

Για να εμφανίσετε το μεμονωμένο σχόλιο, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
  • Γράψτε τον παρακάτω κωδικό:
Sub ShowAllComments ()
Application.DisplayCommentIndicator = xlCommentAndIndicator
Τέλος υπο

Επεξήγηση κώδικα: - Πρώτα πρέπει να αποφασίσουμε το όνομα του θέματος και, στη συνέχεια, πρέπει να ορίσουμε τον κώδικα για να εμφανίζονται όλα τα σχόλια στο φύλλο εργασίας.
Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας. Όλα τα σχόλια θα εμφανιστούν στο φύλλο του Excel.

  • Απόκρυψη συγκεκριμένων σχολίων στο Excel- Τα σχόλια θα εμφανίζονται ακόμα.

Πώς να αποκρύψετε συγκεκριμένο σχόλιο στο Excel;

Αυτό είναι χρήσιμο για την απόκρυψη των λίγων σχολίων που δεν θέλουμε να εμφανίζουμε σε όλους σε δεδομένα.

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να αποκρύψουμε ορισμένα συγκεκριμένα σχόλια μέσα σε ένα ολόκληρο βιβλίο εργασίας του Excel.

Έχουμε δεδομένα σε δύο φύλλα στα οποία έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο.

Για να αποκρύψετε ορισμένα συγκεκριμένα σχόλια, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
  • Γράψτε τον παρακάτω κωδικό:
Sub HideSpecificComments ()
Dim sh ως φύλλο εργασίας
Ορίστε sh = ThisWorkbook. Φύλλα (1)
sh.Range ("E10"). Comment.Visible = False
sh.Range ("D12"). Comment.Visible = False
Τέλος υπο

Επεξήγηση κώδικα: - Πρώτα πρέπει να αποφασίσουμε το όνομα του θέματος και, στη συνέχεια, να ορίσουμε τις περιοχές που θέλουμε να είναι αόρατες.
Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας. Μόνο 2 σχόλια θα εμφανιστούν από τα 4.

  • Πώς να προσθέσετε σχόλια φωτογραφιών/εικόνων φόντου στο Excel;

Πώς να προσθέσετε φόντο φωτογραφιών ή εικόνων στο πλαίσιο σχολίων;

Αυτή η μακροεντολή θα χρησιμοποιηθεί για τη ρύθμιση φωτογραφιών ή εικόνων στο παρασκήνιο στο πλαίσιο σχολίων από τον υπολογιστή. Θα κάνει τα σχόλια και το Excel να φαίνονται πιο ελκυστικά.

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς μπορούμε να προσθέσουμε φόντο φωτογραφιών ή εικόνων στο πλαίσιο σχολίων.

Έχουμε δεδομένα σε δύο φύλλα στα οποία έχουμε χρόνο εισόδου και εξόδου κάθε υπαλλήλου και επίσης έχουμε καταγράψει ώρες εργασίας, υπερωρίες και κανονικές ώρες στο φύλλο με λίγα σχόλια στα οποία θέλουμε να προσθέσουμε εικόνες ή εικόνες.

Για να προσθέσετε τις εικόνες ή τις εικόνες στο πλαίσιο σχολίων, ακολουθήστε τα παρακάτω βήματα:-

  • Ανοίξτε τη σελίδα VBA και πατήστε το πλήκτρο Alt+F11.
  • Εισαγάγετε μια ενότητα.
  • Γράψτε τον παρακάτω κωδικό:
Sub AddPictureComment ()
Dim sh ως φύλλο εργασίας
Ορίστε sh = ThisWorkbook. Φύλλα (1)
sh.Range ("E10"). AddComment ("Saturday off")
sh.Range ("E10"). Comment.Shape.Fill.UserPicture "D: \ Data \ Flower.jpg"
sh.Range ("D12"). AddComment ("Συνολικές ώρες εργασίας - κανονικές ώρες")
sh.Range ("D12"). Comment.Shape.Fill.UserPicture "D: \ Data \ Flower.jpg"
Τέλος υπο

Επεξήγηση κώδικα: - Αρχικά, πρέπει να επιλέξουμε το όνομα του θέματος και, στη συνέχεια, να ορίσουμε το εύρος όπου θέλουμε να προσθέσουμε σχόλιο και από πού θέλουμε να προσθέσουμε εικόνα στο πλαίσιο σχολίων.
Για να εκτελέσετε τη μακροεντολή, πατήστε το πλήκτρο F5 στο πληκτρολόγιό σας και θα εμφανιστούν σχόλια με τις εικόνες στο πλαίσιο σχολίων.

Αυτός είναι ο τρόπος με τον οποίο μπορούμε να δημιουργήσουμε τα σχόλια, να αποκρύψουμε, να διαγράψουμε, να εισάγουμε την εικόνα στο πλαίσιο σχολίων μέσω VBA στο Microsoft Excel.

Ξεκινώντας με το Excel VBA UserForms| Θα εξηγήσω πώς να δημιουργήσετε μια φόρμα στο excel, πώς να χρησιμοποιήσετε την εργαλειοθήκη VBA, πώς να χειριστείτε τις εισόδους των χρηστών και τέλος πώς να αποθηκεύσετε τις εισόδους των χρηστών. Θα εξετάσουμε αυτά τα θέματα χρησιμοποιώντας ένα παράδειγμα και βήμα προς βήμα οδηγό.

Μεταβλητές VBA στο Excel| Το VBA σημαίνει Visual Basic for Applications. Είναι μια γλώσσα προγραμματισμού από τη Microsoft. Χρησιμοποιείται με εφαρμογές του Microsoft Office, όπως MSExcel, MS-Word και MS-Access, ενώ οι μεταβλητές VBA είναι συγκεκριμένες λέξεις-κλειδιά.

Πεδίο μεταβλητής Excel VBA| Σε όλες τις γλώσσες προγραμματισμού, έχουμε προσδιοριστές μεταβλητής πρόσβασης που ορίζουν από πού μπορεί να έχει πρόσβαση μια καθορισμένη μεταβλητή. Το Excel VBA δεν αποτελεί εξαίρεση. Το VBA έχει επίσης προσδιοριστικά πεδίου.

Επιχειρήματα ByRef και ByVal | Όταν ένα όρισμα μεταβιβάζεται ως όρισμα ByRef σε διαφορετικό υποσύστημα ή συνάρτηση, αποστέλλεται η αναφορά της πραγματικής μεταβλητής. Τυχόν αλλαγές που γίνονται στο αντίγραφο της μεταβλητής, θα αντικατοπτρίζονται στο αρχικό όρισμα.

Διαγράψτε φύλλα χωρίς προτροπές επιβεβαίωσης χρησιμοποιώντας VBA στο Microsoft Excel | Δεδομένου ότι διαγράφετε φύλλα χρησιμοποιώντας VBA, γνωρίζετε τι κάνετε. Θα θέλατε να πείτε στο Excel να μην εμφανίζει αυτήν την προειδοποίηση και να διαγράψει το καταραμένο φύλλο.

Προσθήκη και αποθήκευση νέου βιβλίου εργασίας χρησιμοποιώντας το VBA στο Microsoft Excel 2016| Σε αυτόν τον κώδικα, δημιουργήσαμε πρώτα μια αναφορά σε ένα αντικείμενο βιβλίου εργασίας. Και στη συνέχεια το αρχικοποιήσαμε με ένα νέο αντικείμενο βιβλίου εργασίας. Το πλεονέκτημα αυτής της προσέγγισης είναι ότι μπορείτε να κάνετε εύκολα λειτουργίες σε αυτό το νέο βιβλίο εργασίας. Όπως αποθήκευση, κλείσιμο, διαγραφή κλπ

Εμφάνιση μηνύματος στη γραμμή κατάστασης του Excel VBA| Η γραμμή κατάστασης στο excel μπορεί να χρησιμοποιηθεί ως οθόνη κώδικα. Όταν ο κώδικας VBA είναι μεγάλος και εκτελείτε πολλές εργασίες χρησιμοποιώντας το VBA, συχνά απενεργοποιείτε την ενημέρωση της οθόνης, έτσι ώστε να μην βλέπετε αυτήν την οθόνη να τρεμοπαίζει.

Απενεργοποιήστε τα μηνύματα προειδοποίησης χρησιμοποιώντας το VBA στο Microsoft Excel 2016| Αυτός ο κώδικας όχι μόνο απενεργοποιεί τις ειδοποιήσεις VBA αλλά επίσης αυξάνει την αποδοτικότητα χρόνου του κώδικα. Ας δούμε πώς.

Δημοφιλή άρθρα:

50 συντομεύσεις Excel για να αυξήσετε την παραγωγικότητά σας | Γίνετε πιο γρήγοροι στην εργασία σας. Αυτές οι 50 συντομεύσεις θα σας κάνουν να εργάζεστε ακόμη πιο γρήγορα στο Excel.

Η συνάρτηση VLOOKUP στο Excel | Αυτή είναι μια από τις πιο δημοφιλείς και δημοφιλείς λειτουργίες του excel που χρησιμοποιείται για την αναζήτηση τιμών από διαφορετικά εύρη και φύλλα.

COUNTIF στο Excel 2016 | Μετρήστε τιμές με συνθήκες χρησιμοποιώντας αυτήν την εκπληκτική συνάρτηση. Δεν χρειάζεται να φιλτράρετε τα δεδομένα σας για να μετρήσετε συγκεκριμένες τιμές. Η λειτουργία Countif είναι απαραίτητη για την προετοιμασία του ταμπλό σας.

Πώς να χρησιμοποιήσετε τη συνάρτηση SUMIF στο Excel | Αυτή είναι μια άλλη βασική λειτουργία του ταμπλό. Αυτό σας βοηθά να συνοψίσετε τιμές υπό συγκεκριμένες συνθήκες.