Πώς μπορώ να αποθηκεύσω μια λέξη doc που αυτό το auto εισάγει όνομα αρχείου με βάση τις πρώτες λέξεις ή τίτλο;

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

Μέθοδος 1:Χρησιμοποιώντας μακροεντολές (πιο προηγμένες)

1. Καταγράψτε μια μακροεντολή: Ανοίξτε το έγγραφο λέξεων σας και μεταβείτε στο "Προβολή"> "Μακροειδείς"> "Μακροειδές εγγραφής". Δώστε στη μακροεντολή σας ένα όνομα (π.χ., "Autosavetitle").

2. Εισαγάγετε τον κωδικό: Στο παράθυρο εγγραφής μακροεντολής, επικολλήστε τον ακόλουθο κώδικα, αντικαθιστώντας τον "τίτλο" με το επιθυμητό κείμενο σας:

`` `vba

Επιλογή.goto wdgotopage, wdgotoabsolute, 1

Επιλογή.goto wdgotoline, wdgotoabsolute, 1

Επιλογή.goto wdgotobookmark, wdgotoabsolute, "Τίτλος"

Επιλογή.ENDKEY ΜΟΝΑΔΑ:=WDStory

ActiveDocument.SAveas FileName:=Selection.Text &".docx"

`` `

3. Σταματήστε την εγγραφή: Κάντε κλικ στην επιλογή "Σταματήστε την εγγραφή" και κλείστε το παράθυρο εγγραφής μακροεντολής.

4. Αντιστοιχίστε μια συντόμευση: Κάντε δεξί κλικ στη μακροεντολή που μόλις δημιουργήσατε, μεταβείτε στο "Αντιστοίχιση κλειδιού συντόμευσης" και επιλέξτε έναν συνδυασμό συντόμευσης (π.χ. Ctrl+Shift+S).

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

Μέθοδος 2:Χρήση AutoText (απλούστερο)

1. Δημιουργήστε μια καταχώρηση Autotext: Επιλέξτε το κείμενο που θέλετε να χρησιμοποιήσετε για το όνομα αρχείου (π.χ. τον τίτλο του εγγράφου σας). Μεταβείτε στο "Εισαγωγή"> "Γρήγορη ανταλλακτικά"> "AutoText" και κάντε κλικ στην επιλογή "Αποθήκευση επιλογής στο AutoText Gallery". Δώστε του ένα όνομα (π.χ. "AutofileName").

2. Χρησιμοποιήστε το AutoText στο "Αποθήκευση ως": Όταν είστε έτοιμοι να αποθηκεύσετε, κάντε κλικ στο "Αρχείο"> "Αποθήκευση ως". Στο πεδίο αρχείου, πληκτρολογήστε `[autofileName]` και πατήστε Enter. Το Word θα αντικαταστήσει αυτόματα αυτό το σύμβολο κράτησης θέσης με το κείμενο που αποθηκεύσατε στην καταχώρηση του Autotext.

Πρόσθετες συμβουλές:

* χρησιμοποιώντας σελιδοδείκτες: Για να εξορθολογίσετε τη διαδικασία, προσθέστε ένα σελιδοδείκτη που ονομάζεται "Τίτλος" στο έγγραφό σας όπου βρίσκεται ο τίτλος. Αυτό θα κάνει τον κώδικα στη μακροεντολή πιο αποτελεσματική.

* Προσαρμογή επεκτάσεων αρχείων: Στις παραπάνω μεθόδους, μπορείτε να τροποποιήσετε την επέκταση του αρχείου (π.χ., ".docx", ".pdf") όπως απαιτείται.

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

Θυμηθείτε, αυτές οι λύσεις απαιτούν κάποια εξοικείωση με τις μακροεντολές ή/και το autotext στο Word. Εάν δεν είστε εξοικειωμένοι με αυτά τα χαρακτηριστικά, σκεφτείτε να αναζητήσετε καθοδήγηση ή να εξερευνήσετε μαθήματα πριν τα επιχειρήσετε.