Αυτόματη εκτέλεση μακροεντολής κατά το άνοιγμα ενός βιβλίου εργασίας

Σημείωση:  Θέλουμε να σας παρέχουμε το πιο πρόσφατο περιεχόμενο βοήθειας στη γλώσσα σας όσο πιο σύντομα γίνεται. Αυτή η σελίδα έχω μεταφραστεί μέσω αυτοματοποιημένης διαδικασίας και ενδεχομένως να περιέχει γραμματικά λάθη και ανακρίβειες. Ο σκοπός μας είναι αυτό το περιεχόμενο να σας φανεί χρήσιμο. Μπορείτε να μας ενημερώσετε στο κάτω μέρος αυτής της σελίδας εάν οι πληροφορίες σάς φάνηκαν χρήσιμες; Εδώ θα βρείτε το άρθρο στα Αγγλικά , για να το συμβουλεύεστε εύκολα.

Ίσως θέλετε μια μακροεντολή που έχει καταγραφεί ώστε να εκτελείται αυτόματα όταν ανοίγετε ένα συγκεκριμένο βιβλίο εργασίας. Η παρακάτω διαδικασία χρησιμοποιεί ένα παράδειγμα για να μάθετε τον τρόπο που λειτουργεί. Μπορείτε επίσης να εκτελέσετε μακροεντολές αυτόματα όταν ξεκινά το Excel.

Πριν ξεκινήσετε, βεβαιωθείτε ότι εμφανίζεται η καρτέλα Προγραμματιστής στην κορδέλα. Για περισσότερες πληροφορίες, ανατρέξτε στο θέμα Εμφάνιση της καρτέλας προγραμματιστής.

Για να χρησιμοποιήσετε το παρακάτω παράδειγμα, ανοίξτε ένα νέο βιβλίο εργασίας.

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

  1. Επιλέξτε Προγραμματιστής > Visual Basic.

    Ομάδα "Κώδικας" στην καρτέλα "Προγραμματιστής"

  2. Στην Εξερεύνηση έργου VBA στην αριστερή πλευρά, αναπτύξτε το φάκελο Έργο VBA για το βιβλίο εργασίας σας και, στη συνέχεια, κάντε διπλό κλικ στη λειτουργική μονάδα Αυτό_το_βιβλίο_εργασίας . Εάν δεν βλέπετε την Εξερεύνηση έργου, μπορείτε να μεταβείτε σε Προβολή > Εξερεύνηση έργου ή πατήστε το Συνδυασμό πλήκτρων Ctrl + R.

    Λειτουργική μονάδα Αυτό_το_βιβλίο_εργασίας στο πρόγραμμα επεξεργασίας Visual Basic (VBE)
  3. Στο παράθυρο λειτουργική μονάδα που ανοίγει στη δεξιά πλευρά, εισαγάγετε τον ακόλουθο κώδικα:

    Private Sub Workbook_Open()
    ' Put your code here
    End Sub
  4. Επικολλήστε τον κώδικα καταγεγραμμένο στην υπορουτίνα μεταξύ των γραμμών Sub και End Sub.

    Κλείστε το πρόγραμμα Επεξεργασίας Visual Basic (δεν χρειάζεται να αποθηκεύσετε οτιδήποτε).

  5. Αποθηκεύστε το βιβλίο εργασίας ως ένα βιβλίο εργασίας του Excel με δυνατότητα μακροεντολών (* xlsm), και κλείστε το.

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

Πριν ξεκινήσετε, βεβαιωθείτε ότι εμφανίζεται η καρτέλα Προγραμματιστής στην κορδέλα. Για να το κάνετε:

  1. Στο μενού, κάντε κλικ στην επιλογή Excel > Προτιμήσεις... > κορδέλα & γραμμή εργαλείων.

  2. Στην κατηγορία Προσαρμογή της κορδέλας, στη λίστα Κύριες καρτέλες, επιλέξτε το πλαίσιο ελέγχου Προγραμματιστής.

  3. Κάντε κλικ στην επιλογή Αποθήκευση.

Για να χρησιμοποιήσετε το παρακάτω παράδειγμα, ανοίξτε ένα νέο βιβλίο εργασίας.

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

  1. Επιλέξτε Προγραμματιστής > Visual Basic.

  2. Στην Εξερεύνηση έργου VBA στην αριστερή πλευρά, αναπτύξτε το φάκελο Έργο VBA για το βιβλίο εργασίας σας και, στη συνέχεια, κάντε διπλό κλικ στη λειτουργική μονάδα Αυτό_το_βιβλίο_εργασίας .

  3. Στο παράθυρο λειτουργική μονάδα που ανοίγει στη δεξιά πλευρά, εισαγάγετε τον ακόλουθο κώδικα:

    Private Sub Workbook_Open()
    ' Put your code here
    End Sub
  4. Επικολλήστε τον κώδικα καταγεγραμμένο στην υπορουτίνα μεταξύ των γραμμών Sub και End Sub.

    Κλείστε το πρόγραμμα Επεξεργασίας Visual Basic (δεν χρειάζεται να αποθηκεύσετε οτιδήποτε).

  5. Αποθηκεύστε το βιβλίο εργασίας ως ένα βιβλίο εργασίας του Excel με δυνατότητα μακροεντολών (* xlsm), και κλείστε το.

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

Χρειάζεστε περισσότερη βοήθεια;

Μπορείτε ανά πάσα στιγμή να ρωτήσετε έναν ειδικό στην Κοινότητα τεχνικής υποστήριξης του Excel, να λάβετε υποστήριξη από την κοινότητα Answers ή να προτείνετε μια νέα δυνατότητα ή βελτίωση στο Excel User Voice.

Αναπτύξτε τις δεξιότητές σας στο Office
Εξερευνήστε το περιεχόμενο της εκπαίδευσης
Αποκτήστε πρώτοι τις νέες δυνατότητες
Γίνετε μέλος του Office Insider

Σας βοήθησαν αυτές οι πληροφορίες;

Σας ευχαριστούμε για τα σχόλιά σας!

Σας ευχαριστούμε για τα σχόλιά σας! Φαίνεται ότι μπορεί να είναι χρήσιμο να συνδεθείτε με έναν από τους συνεργάτες υποστήριξης του Office.

×