Λαμβάνετε μήνυμα λάθους χρόνου εκτέλεσης 4248, 4605 ή 5941 όταν προσπαθείτε να αλλάξετε τις ιδιότητες σε μη ανοιγμένο έγγραφο στο Word

Συμπτώματα

Κατά την προσπάθειά σας να χρησιμοποιήσετε το Microsoft Visual Basic for Applications (VBA) για να αλλάξετε τις ιδιότητες ενός εγγράφου, ενδέχεται να εμφανιστεί ένα από τα ακόλουθα μηνύματα λάθους:
Σφάλμα χρόνου εκτέλεσης '4248':

Αυτή η εντολή δεν είναι διαθέσιμη, επειδή το έγγραφο δεν είναι ανοιχτό.
Σφάλμα χρόνου εκτέλεσης '4605':
Αυτή η μέθοδος ή ιδιότητα δεν είναι διαθέσιμη επειδή ένα παράθυρο εγγράφου δεν είναι ενεργή.
Σφάλμα χρόνου εκτέλεσης '5941':
Δεν υπάρχει το απαιτούμενο μέλος της συλλογής.

Αιτία

Αυτό το ζήτημα μπορεί να προκύψει, εάν δεν έχετε ανοίξει ένα έγγραφο ή εάν το έγγραφο στο οποίο κάνετε αναφορά δεν είναι ανοιχτό. Το Word μπορεί να αλλάξει μόνο τις ιδιότητες ενός εγγράφου Ανοίξτε (ή ορατότητα).

Σημείωση Αυτά τα μηνύματα λάθους ενδέχεται να προκύψουν, εάν ανοίξετε το έγγραφο με την ιδιότητα Visible οριστεί σε
FALSE (ψευδές).

Εναλλακτικός τρόπος αντιμετώπισης

Η Microsoft παρέχει παραδείγματα προγραμματισμού μόνο για επεξήγηση, χωρίς να παρέχει καμία εγγύηση, είτε σιωπηρή είτε ρητή, περιλαμβανομένων, ενδεικτικά, των σιωπηρών εγγυήσεων εμπορευσιμότητας ή/και καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που παρουσιάζεται και τα εργαλεία που χρησιμοποιούνται για τη δημιουργία και εντοπισμό σφαλμάτων διαδικασιών. Οι μηχανικοί υποστήριξης της Microsoft μπορούν να σας εξηγήσουν τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας, αλλά δεν θα τροποποιήσουν αυτά τα παραδείγματα για να παράσχουν πρόσθετες λειτουργίες, ούτε θα δημιουργήσουν διαδικασίες για να καλύψουν τις συγκεκριμένες ανάγκες σας.
Εάν διαθέτετε περιορισμένη εμπειρία προγραμματισμού, ίσως θέλετε να επικοινωνήσετε με έναν Πιστοποιημένος εταίρος Microsoft ή συμβουλευτικές υπηρεσίες της Microsoft. Για περισσότερες πληροφορίες, επισκεφθείτε αυτές τις τοποθεσίες της Microsoft στο Web:

Microsoft πιστοποιημένους συνεργάτες - https://partner.microsoft.com/global/30000104

Συμβουλευτικό δελτίο της Microsoft υπηρεσιών - http://support.microsoft.com/gp/advisoryservice

Για περισσότερες πληροφορίες σχετικά με τις επιλογές υποστήριξης που είναι διαθέσιμες και σχετικά με τον τρόπο επικοινωνίας με τη Microsoft, επισκεφθείτε την ακόλουθη τοποθεσία της Microsoft στο Web:http://support.microsoft.com/default.aspx?scid=fh; EN-US; CNTACTMS
Για πρόσθετες πληροφορίες σχετικά με τον τρόπο χρήσης του δείγματος κώδικα που περιλαμβάνονται σε αυτό το άρθρο, κάντε κλικ στον αριθμό του άρθρου παρακάτω, για να προβάλετε το άρθρο της Γνωσιακής Βάσης της Microsoft:
290140 OFFXP: Τρόπος εκτέλεσης δείγματος κώδικα από άρθρα της Γνωσιακής βάσης

Τα ακόλουθα δείγματα μακροεντολών VBA δείχνουν πώς μπορείτε να αλλάξετε την τιμή του πεδίου τίτλου με το
Στο παράθυρο διαλόγου Ιδιότητες . Επίσης, το ακόλουθο δείγμα περιλαμβάνει κώδικα για να παγιδεύσει το σφάλμα, στην περίπτωση που δεν υπάρχουν ανοιχτά έγγραφα και να εμφανίσετε ένα μήνυμα:
Sub ChangeDocProperties()
On Error GoTo ErrHandler
ActiveDocument.BuiltInDocumentProperties("Title") = "My Title"
Exit Sub

ErrHandler:
If Err <> 0 Then
'
' Display an error message.
'
MsgBox Err.Description
'
' Clear the error.
'
Err.Clear
Resume Next

End If

End Sub
Το ακόλουθο δείγμα μακροεντολής περιλαμβάνει κώδικα που θα γίνουν τα εξής:
  • Παγίδευση του σφάλματος, σε περίπτωση που δεν υπάρχουν ανοιχτά έγγραφα.
  • Στο η παγίδευση σφαλμάτων, δημιουργήστε ένα νέο έγγραφο.
  • Συνέχιση εκτέλεσης στη γραμμή που προκάλεσε το σφάλμα.
Sub ChangeDocProperties()
On Error GoTo ErrHandler
ActiveDocument.BuiltInDocumentProperties("Title") = "My Title"
Exit Sub

ErrHandler:
If Err <> 0 Then
'
' Add a document.
'
Documents.Add
'
' Clear the error.
'
Err.Clear
'
' Run the code that caused the error.
'
Resume

End If

End Sub

Αναφορές

Για πρόσθετες πληροφορίες σχετικά με τον τρόπο για να λάβετε Βοήθεια με τη VBA, κάντε κλικ στον αριθμό του άρθρου παρακάτω, για να προβάλετε το άρθρο της Γνωσιακής Βάσης της Microsoft:
305326 OFFXP: πόροι προγραμματισμού για τη Visual Basic για εφαρμογές

Ιδιότητες

Αναγνωριστικό άρθρου: 813983 - Τελευταία αναθεώρηση: 17 Ιαν 2017 - Αναθεώρηση: 1

Σχόλια