Μακροεντολές PowerPoint: Πώς να εκτελέσετε το VBA στις διαφάνειες του PowerPoint 2016 και 2019;

Ισχύει για Microsoft Office 365, 2019 και παλαιότερες εκδόσεις. Λειτουργικά συστήματα Windows.

Ακολουθεί μια ερώτηση που λάβαμε από έναν αναγνώστη:

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

Ναι σίγουρα! Υπάρχουν αρκετά βαρετές εργασίες που σχετίζονται με το PowerPoint που θα μπορούσαν να αυτοματοποιηθούν:

  • Αυτόματη δημιουργία περιοδικών παρουσιάσεων (ας πούμε τριμηνιαίες αναφορές).
  • Αυτόματη μορφοποίηση των διαφανειών σας στο PowerPoint – εφαρμογή στυλ, γραμματοσειρών.
  • Εργασία με εικόνες (αλλαγή μεγέθους, προσαρμογή σε πρότυπα διαφανειών κ.λπ.).
  • Απαλλαγείτε από τα αχρησιμοποίητα βασικά πρότυπα διαφανειών που διογκώνουν το μέγεθος της παρουσίασής σας.
  • Κι αλλα…

Μπορώ να εγγράψω μια μακροεντολή στο PowerPoint;

Θα ήθελα να διευκρινίσω αυτό το σημείο, καθώς δύο αναγνώστες το ζήτησαν συγκεκριμένα. Το Microsoft PowerPoint δεν αποστέλλει συσκευή εγγραφής μακροεντολών όπως αυτή που θα βρείτε στο Word ή στο Excel. Επομένως, εάν θέλετε να αυτοματοποιήσετε το PowerPoint, θα χρειαστεί να δημιουργήσετε τη μακροεντολή σας με μη αυτόματο τρόπο χρησιμοποιώντας τη Visual Basic για εφαρμογές (VBA). Η VBA είναι μια σχετικά απλή γλώσσα προγραμματισμού που βοηθά τους χρήστες να επεκτείνουν τη λειτουργικότητα του Microsoft Office. Όλα όσα είπαν, η σύνταξη του PowerPoint VBA δεν είναι περίπλοκη, απλώς ακολουθήστε τις παρακάτω οδηγίες.

Δημιουργήστε μια παρουσίαση με δυνατότητα μακροεντολής

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

  1. Ανοίξτε τη συγκεκριμένη παρουσίαση που θέλετε να αυτοματοποιήσετε.
  2. Αποθηκεύστε την παρουσίασή σας χρησιμοποιώντας διαφορετικό όνομα αρχείου, πείτε MyPresentationwithMacros και βεβαιωθείτε ότι έχετε επιλέξει τη μορφή αρχείου .pptm (παρουσίαση μακροεντολής Powerpoint) ως τύπο αρχείου.

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

Προσθέστε τη μακροεντολή σας στο PowerPoint

Το επόμενο βήμα σας θα ήταν να εισαγάγετε το απόσπασμα κώδικα VBA σε μια ενότητα έργου της Visual Basic for Applications. Ακολουθήστε τις παρακάτω οδηγίες:

  1. Από την κορδέλα του PowerPoint, πατήστε Προγραμματιστής.
  2. Στη συνέχεια, πατήστε το κουμπί της Visual Basic .
  3. Ο επεξεργαστής VBA θα ανοίξει.
  4. Τώρα, από το δέντρο του έργου, επισημάνετε την καταχώρηση VBAProject .
  5. Τώρα από το μενού κεφαλίδας πατήστε Εισαγωγή και επιλέξτε Μονάδα .
  6. Πληκτρολογήστε τον ακόλουθο κώδικα στη μονάδα που δημιουργήθηκε πρόσφατα. Αυτή η μικρή μακροεντολή προσθέτει μια νέα διαφάνεια στη δεύτερη θέση της Παρουσίασής σας.

[κώδικας]

Sub Add_Slide()

Εξασθένιση του NewSlide ως Slide

Ορισμός NewSlide = ActivePresentation.Slides.Add(1, ppLayoutBlank)

End Sub

[/κώδικας]

Σημαντικό: Μια λέξη προσοχής εδώ: Φροντίζετε πάντα να λαμβάνετε τη μακροεντολή σας από αξιόπιστες πηγές. Η αντιγραφή κώδικα VBA από τον Ιστό δεν είναι καλή ιδέα!

  1. Πριν εκτελέσετε τον κωδικό σας, ίσως θέλετε να τον ελέγξετε για σφάλματα. Συνεχίστε και πατήστε Debug και, στη συνέχεια, επιλέξτε Compile VBA project .
  2. Εάν δεν λάβετε μηνύματα σφάλματος, μπορείτε να προχωρήσετε και να πατήσετε Αποθήκευση . Αυτό θα ενημερώσει την παρουσίασή σας με δυνατότητα μακροεντολής PwerPoint.

Ενεργοποιήστε τις μακροεντολές σας

Η εγκατάσταση του Microsoft Office ενδέχεται να έχει τις μακροεντολές VBA απενεργοποιημένες από προεπιλογή χωρίς να παρέχεται καμία ειδοποίηση στον τελικό χρήστη. Εάν συμβαίνει αυτό, από την καρτέλα Προγραμματιστής, πατήστε Macro Security και επιλέξτε Απενεργοποίηση όλων των μακροεντολών με ειδοποίηση. Από εδώ και στο εξής, το PowerPoint θα δημοσιεύει ένα ορατό μήνυμα κάτω από την Κορδέλα σε περίπτωση που η παρουσίασή σας περιέχει Περιεχόμενο μακροεντολών που ήταν απενεργοποιημένο από προεπιλογή και θα σας ζητά συγκεκριμένα άδεια για την εκτέλεση αυτών των μακροεντολών.

Εκτέλεση της μακροεντολής του PowerPoint

  1. Κλείστε το πρόγραμμα επεξεργασίας VBA και επιστρέψτε στην παρουσίαση του PowerPoint.
  2. Επιστρέψτε στην καρτέλα προγραμματιστή, πατήστε Μακροεντολές .
  3. Επιλέξτε τη μακροεντολή που μόλις προσθέσατε στην παρουσίασή σας στην προηγούμενη ενότητα.
  4. Πατήστε Run .

Αντιστοιχίστε τη μακροεντολή σας σε ένα κουμπί

Όπως μόλις μαθαίνετε, μπορείτε να καλέσετε εύκολα τη μακροεντολή του PowerPoint από την καρτέλα Προγραμματιστής. Μπορείτε επίσης να καλέσετε τη Μακροεντολή από την καρτέλα Προβολή. Ωστόσο, εάν ενδιαφέρεστε να βελτιώσετε την αλληλεπίδραση του χρήστη με τη μακροεντολή, μπορείτε εύκολα να την αντιστοιχίσετε σε ένα νέο κουμπί στη γραμμή εργαλείων γρήγορης πρόσβασης. Εναλλακτικά, μπορείτε να συνδέσετε τη μακροεντολή σας με ένα κουμπί Command στη διαφάνειά σας ή σε μια φόρμα χρήστη.

Προσαρμοσμένη μακροεντολή για παραδείγματα PowerPoint

Μερικοί αναγνώστες ζήτησαν μερικά παραδείγματα μακροεντολών Visual Basic for Applications για το PowerPoint. Μη διστάσετε να επικοινωνήσετε μαζί μου χρησιμοποιώντας τη φόρμα επικοινωνίας για να συζητήσουμε τις συγκεκριμένες προσαρμοσμένες απαιτήσεις ανάπτυξης Μακροεντολών.

Πώς μπορώ να διορθώσω τον κώδικα VBA στο πρόγραμμα επεξεργασίας PowerPoint;

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

Πρώτα, ανοίγω το πρόγραμμα επεξεργασίας της Visual Basic πατώντας Alt+F11. Στη συνέχεια, ορίζω σημεία διακοπής στον κώδικά μου κάνοντας κλικ στο αριστερό περιθώριο των αριθμών γραμμής. Όταν εκτελώ τον κώδικα με F5, θα διακόψει την εκτέλεση σε οποιοδήποτε σημείο διακοπής που έχω ορίσει, ώστε να μπορώ να περάσω τον κώδικα γραμμή προς γραμμή με και επιθεωρήστε τις μεταβλητές.F8 

Χρησιμοποιώ επίσης το παράθυρο Άμεσο (Ctrl+G) και τις δηλώσεις Debug.Print για να εξάγω τιμές μεταβλητών. Με αυτά τα εργαλεία, μπορώ να παρακολουθώ μεθοδικά τον κώδικά μου για να εντοπίσω και να διορθώσω τυχόν προβλήματα.