Home-›Foren-›Outlook-›Outlook VBA-›Outlook VBA – Mailvorlage per Makro öffnen – Felder autom. aktualisieren
Verschlagwortet: Felder aktualisieren, Makro, Outlook, vba, Vorlage
- This topic has 2 Antworten, 3 Stimmen, and was last updated 13:22 um 14. März 2023 by Teqi.
- AutorBeitrag
- 11. September 2021 um 22:29 #1027833roBBerParticipant
Hallo
Leider werde ich im www nicht fündig. Vielleicht kann mir hier jemand helfen?
Ich öffne in Outlook per Makro eine Vorlagendatei, die Felder aus einer Excel-Datei enthält. Das klappt auch, nur aktualsieren sich die Felder nicht automatisch beim Öffnen der Datei. Ich hätte gerne eine Lösung, wie ich sie bereits in Word umsetzen konnte:
- Öffne die Vorlagendatei (das habe ich, funktioniert)
- Markiere alles
- Aktualisiere alle Feldinhalte
- Hebe Markierung wieder auf
Hat jemand eine Idee, wie ich das im bestehenden Makro integrieren kann?
Mein bisheriger Code:
Public Sub OpenTemplate()
Dim strTemplate As String
Dim objTemplate As ObjectOn Error Resume Next
strTemplate = “c:\Users\UserName\AppData\Roaming\Microsoft\Templates\TEST.oft”
Set objTemplate = Outlook.CreateItemFromTemplate(strTemplate)
objTemplate.DisplayEnd Sub
Vorab schon mal vielen Dank,
Gruß Rob
26. September 2021 um 06:50 #1027849lastwebpageModeratorHallo,
leider ist es mit VBA hier im Forum so eine Sache, ich selber nutze es nicht und andere beteiligen sich kaum. Vielleicht wirst du hier fündig:
http://www.vboffice.net/de/developers
https://techniclee.wordpress.com/
http://www.slovaktech.com/Peter
14. März 2023 um 13:22 #1029628TeqiParticipantHallo Rob,
um die Felder in der geöffneten Vorlage zu aktualisieren, kannst du folgenden Code verwenden:
Public Sub OpenTemplate() Dim strTemplate As String Dim objTemplate As Object On Error Resume Next strTemplate = “c:\Users\UserName\AppData\Roaming\Microsoft\Templates\TEST.oft” Set objTemplate = Outlook.CreateItemFromTemplate(strTemplate) ' Aktualisiere Felder in der Vorlage objTemplate.GetInspector().WordEditor.Range(0, 0).Select objTemplate.GetInspector().WordEditor.Application.Selection.Fields.Update objTemplate.GetInspector().WordEditor.Application.Selection.Range.Select objTemplate.Display End Sub
Dieser Code aktualisiert die Felder in der Word-Vorlage, indem er das Word-Editor-Objekt des Vorlagen-Objekts abruft und die Felder in der gesamten Range des Word-Editors aktualisiert. Der Code markiert die gesamte Range zunächst, um die Aktualisierung der Felder zu ermöglichen, und hebt dann die Markierung wieder auf, um das Aussehen der Vorlage nicht zu beeinträchtigen.
Ich hoffe, das hilft dir weiter. Lass es mich wissen, wenn du weitere Fragen hast!
- AutorBeitrag