Τρόπος προεπιλογής δρομέα στο πεδίο "Θέμα" κατά τη δημιουργία νέου μηνύματος στο Outlook

Στο Outlook, όταν δημιουργείτε ένα νέο email, το νέο παράθυρο μηνύματος θα ανοίξει με τον κέρσορα που βρίσκεται στο πεδίο "Προς" από προεπιλογή. Ωστόσο, εάν θέλετε να τοποθετήσετε τον κέρσορα στο άλλο πεδίο, όπως "Θέμα", μπορείτε να χρησιμοποιήσετε τη μέθοδο που κοινοποιείται σε αυτό το άρθρο.

Όπως μπορείτε να δείτε, όταν δημιουργείτε ένα νέο email, θα ανοίξει το νέο παράθυρο μηνύματος και ο δρομέας τοποθετείται στο πεδίο "Προς". Ωστόσο, ορισμένοι χρήστες θα ήθελαν πρώτα να συμπληρώσουν το θέμα του email. Έτσι, ελπίζουν να βάλουν τον κέρσορα στο πεδίο "Θέμα". Εδώ, θα σας παρουσιάσουμε ένα μέσο που μπορεί να αλλάξει την προεπιλεγμένη θέση του δρομέα σε ένα νέο παράθυρο μηνύματος.

Προεπιλεγμένος δρομέας στο πεδίο "Θέμα" κατά τη δημιουργία νέου μηνύματος

1. Από την αρχή, ξεκινήστε το πρόγραμμα Outlook.
2. Στη συνέχεια, στο κύριο παράθυρο του Outlook, πρέπει να πατήσετε τα πλήκτρα "Alt + F11".
3. Στη συνέχεια, θα ανοίξει ένα παράθυρο "Microsoft Visual Basic for Applications".
4. Μετά από αυτό, θα πρέπει να ανοίξετε το έργο "ThisOutlookSession".
5. Στη συνέχεια, θα πρέπει να αντιγράψετε τον ακόλουθο κώδικα VBA σε αυτό το έργο.

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objMail As Outlook.MailItem

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.currentItem Is MailItem Then
       Set objMail = Inspector.currentItem
    End If
End Sub

'Occurs when opening an email
Private Sub objMail_Open(Cancel As Boolean)
    Dim objPages As Outlook.Pages
    Dim objPage As Object
    Dim objControl As Object
 
    'If it is a brand new mail
    If objMail.Subject = "" Then
       Set objPages = objMail.GetInspector.ModifiedFormPages
       'Get the Message window
       Set objPage = objPages.Add("Message")
       'Position the cursor in "Subject" field
       Set objControl = objPage.Controls("Subject")
       objControl.SetFocus
    End If
End Sub

6. Στη συνέχεια, πρέπει να υπογράψετε αυτήν τη μακροεντολή. Κάντε κλικ στο «Εργαλεία» στη γραμμή μενού και επιλέξτε «Ψηφιακή υπογραφή». Στο νέο παράθυρο διαλόγου, απλώς ακολουθήστε τον οδηγό στην οθόνη.
7. Αργότερα, θα πρέπει να συνεχίσετε να τροποποιείτε τις ρυθμίσεις μακροεντολών του Outlook για να επιτρέψετε τις υπογεγραμμένες μακροεντολές.
8. Τέλος, μπορείτε να επανεκκινήσετε την εφαρμογή Outlook, η οποία θα ενεργοποιήσει το νέο έργο VBA.
9. Από τώρα και στο εξής, κάθε φορά που δημιουργείτε ένα νέο μήνυμα ηλεκτρονικού ταχυδρομείου, το νέο παράθυρο μηνύματος θα ανοίγει με τον κέρσορα στο πεδίο "Θέμα", όπως το ακόλουθο στιγμιότυπο οθόνης:

Λύσεις για καταστροφή του Outlook

Παρά το ότι διαθέτει πολλές δυνατότητες, το Outlook εξακολουθεί να μην μπορεί να απαλλαγεί από σφάλματα και διαφθορά. Δεν υπάρχει αμφιβολία ότι το χειρότερο σενάριο είναι το Outlook να καταστραφεί. Σε αυτό το σημείο, εάν έχετε δημιουργήσει αντίγραφα ασφαλείας αρχείων PST, μπορείτε να επαναφέρετε δεδομένα από το αντίγραφο ασφαλείας του αρχείου. Αλλά αν δεν έχετε αντίγραφα ασφαλείας, δεν έχετε άλλη εναλλακτική λύση για να λάβετε βοήθεια ενός αξιόπιστου Επιδιόρθωση του Outlook εργαλείο, όπως DataNumen Outlook Repair. Μπορεί να μετριάσει τη ζημιά και να ανακτήσει τα μέγιστα δεδομένα του Outlook για εσάς.

Εισαγωγή συγγραφέα:

Η Shirley Zhang είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων κατεστραμμένο mdf και προϊόντα λογισμικού επισκευής προοπτικών. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com