Σύνοψη
Το Microsoft Visual Basic for Applications δεν παρέχει μέθοδο για τον καθορισμό του συνολικού αριθμού των σελίδων που θα εκτυπωθούν σε ένα φύλλο εργασίας. Ωστόσο, μπορείτε να χρησιμοποιήσετε τη μέθοδο ExecuteExcel4Macro για να χρησιμοποιήσετε τη συνάρτηση GET. Συνάρτηση φύλλου μακροεντολών DOCUMENT(50) για την επιστροφή του συνολικού αριθμού των σελίδων που θα εκτυπωθούν στο ενεργό φύλλο εργασίας.
Περισσότερες πληροφορίες
Η Microsoft παρέχει παραδείγματα προγραμματισμού για παράδειγμα μόνο, χωρίς εγγύηση εκφρασμένη ή σιωπηρή, συμπεριλαμβανομένων, ενδεικτικά, των σιωπηρών εγγυήσεων εμπορευσιμότητας ή/και καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που επιδείχθηκε και τα εργαλεία που χρησιμοποιούνται για τη δημιουργία και τον εντοπισμό σφαλμάτων διαδικασιών. Οι επαγγελματίες υποστήριξης της Microsoft μπορούν να σας βοηθήσουν να εξηγήσετε τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας, αλλά δεν θα τροποποιήσουν αυτά τα παραδείγματα για να παρέχουν επιπλέον λειτουργικότητα ή διαδικασίες κατασκευής που ανταποκρίνονται στις συγκεκριμένες ανάγκες σας.https://partner.microsoft.com/global/30000104
Εάν έχετε περιορισμένη εμπειρία προγραμματισμού, μπορεί να θέλετε να επικοινωνήσετε με έναν Πιστοποιημένο συνεργάτη της Microsoft ή με τις Συμβουλευτικές υπηρεσίες της Microsoft. Για περισσότερες πληροφορίες, επισκεφθείτε αυτές τις τοποθεσίες Web της Microsoft: Πιστοποιημένοι συνεργάτες της Microsoft -Υπηρεσίες Microsoft Professional - https://www.microsoft.com/professionalservices/overview Για περισσότερες πληροφορίες σχετικά με τις επιλογές υποστήριξης που είναι διαθέσιμες και σχετικά με τον τρόπο επικοινωνίας με τη Microsoft, επισκεφθείτε την ακόλουθη τοποθεσία της Microsoft στο Web:http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSΓια να χρησιμοποιήσετε την ακόλουθη μακροεντολή, ρυθμίστε ένα αρχείο του Microsoft Excel ως εξής:
-
Δημιουργήστε ένα νέο βιβλίο εργασίας του Microsoft Excel.
-
Επιλέξτε την περιοχή A1:J100.
-
Πληκτρολογήστε τον αριθμό 1 και πατήστε το συνδυασμό πλήκτρων CTRL+ENTER. Θα πρέπει να δείτε όλα τα επιλεγμένα κελιά συμπληρωμένα με τον αριθμό 1.
-
Εισαγωγή μιας λειτουργικής μονάδας μακροεντολών της Visual Basic.
-
Πληκτρολογήστε τον παρακάτω κώδικα στη λειτουργική μονάδα:
-
Sub ShowMe() MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _ " pages will be printed." End Sub
-
Εκτελέστε τη μακροεντολή.
Αναφορές
Μπορείτε να βρείτε πρόσθετες πληροφορίες σχετικά με τη συνάρτηση μακροεντολών Get.Document στο εγχειρίδιο αναφοράς της συνάρτησης Excel.