Přejít k hlavnímu obsahu

Jak vložit výběr data do e-mailů v aplikaci Outlook?

Autor: Siluvia Naposledy změněno: 2024-05-09

Předpokládejme, že potřebujete poslat svým kolegům pracovní plán, kterým přidělujete různé úkoly různým lidem v různých termínech. Obáváte se však, že uděláte chyby při ručním zadávání data, takže místo toho potřebujete nástroj pro výběr data. Tento kurz poskytuje metodu, která vám pomůže vložit nástroj pro výběr data do e-mailů v aplikaci Outlook.


Vložte výběr data do e-mailů v Outlooku pomocí kódu VBA

Chcete-li vložit výběr data do e-mailů aplikace Outlook, můžete spustit následující kód VBA. Postupujte podle pokynů níže.

  1. Launch your Outlook, press the Další + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
  2. In the left pane, double click Project1 > Objekty Microsoft Outlook > TatoOutlookSession, a poté zkopírujte následující kód VBA do ThisOutlookSession (kód) okno.
    Kód VBA: Vložte výběr data do e-mailů aplikace Outlook
    Sub DatePicker()
    'Updated by Extendoffice 20220615
      Dim xDoc As Document
      On Error Resume Next
      Set xDoc = Application.ActiveInspector.WordEditor
      With xDoc.Application.Selection
        .Range.ContentControls.Add (wdContentControlDate)
        .ParentContentControl.DateDisplayFormat = "MMMM d, yyyy"
        .InsertAfter Format(Now(), "MMMM d, yyyy")
        .MoveRight wdCharacter, 1
      End With
    End Sub
    Poznámka: In the code, you can change "d. MMMM, yyyy" to the date format you need.
  3. Zůstaňte v Microsoft Visual Basic pro aplikace okno, klepněte na tlačítko Tools > Reference.
  4. v Reference – Projekt1 V dialogovém okně zaškrtněte Knihovna objektů Microsoft Word 16.0 zaškrtávací políčko a klikněte na OK pro uložení změn.
  5. Stiskněte Další + Q klávesy pro zavření Microsoft Visual Basic pro aplikace okno.
  6. v Poštovní zásilka zobrazení, klikněte na Nový Email pod tlačítkem Domů vytvořte nový e-mail.
  7. v Zpráva okno, klepněte na tlačítko Přizpůsobte panel nástrojů Rychlý přístup tlačítko A poté vyberte Další příkazy z rozevírací nabídky. Viz screenshot:
  8. v Možnosti aplikace Outlook okno, musíte nakonfigurovat následovně.
    1. Vybrat makra v Vyberte příkaz z rozbalovací seznam;
    2. Select the script you created above in the left commands box;
    3. Klepněte na tlačítko přidat .
    4. Keep the script selected in the right box, and then click the Upravit tlačítko. V Tlačítko Upravit v dialogovém okně přiřaďte skriptu nové tlačítko a klikněte OK.
    5. klikněte OK v Možnosti aplikace Outlook okno pro uložení změn.
  9. Skript VBA je nyní přidán do Panel nástrojů Rychlý přístup a zobrazí se jako ikona, kterou jste určili.
  10. Od této chvíle můžete při psaní e-mailu kliknout na ikonu pro výběr data na stránce Panel nástrojů Rychlý přístup pro vložení výběru data do těla e-mailu a poté z něj vyberte požadované datum. Podívejte se na následující demo.
Poznámky:
  • You can insert multiple date pickers into the body of an email.
  • You can change the date you have selected: click on the date field to display the Date control, then select a new date as needed.
  • This date picker can also be inserted into the body of an appointment or a task. If you need to, create a new appointment or task and repeat the step 7-8 above to achieve it.
  • If you restart Outlook and find that the script does not run. That's because the macro was disabled. You need to follow the steps below to re-enable the macro:
    1. Klikněte na Soubor > možnosti k zadání Možnosti aplikace Outlook okno.
    2. Klikněte na Centrum zabezpečení > Nastavení centra důvěryhodnosti.
    3. v Centrum zabezpečení v okně klikněte na Nastavení makra tab, zvolte Povolit všechna makra a klepněte na tlačítko OK > OK pro uložení nového nastavení.
    4. Restart Outlook once more.

Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro aplikaci Outlook - Více než 100 výkonných funkcí, které doplní váš Outlook

🤖 AI Mail Assistant: Okamžité profesionální e-maily s magií umělé inteligence – jedním kliknutím získáte geniální odpovědi, perfektní tón, vícejazyčné ovládání. Transformujte e-maily bez námahy! ...

???? Automatizace e-mailu: Mimo kancelář (k dispozici pro POP a IMAP)  /  Naplánujte odesílání e-mailů  /  Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu  /  Automatické přeposílání (pokročilá pravidla)   /  Automatické přidání pozdravu   /  Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...

📨 Email management: Snadné vyvolání e-mailů  /  Blokujte podvodné e-maily podle předmětů a dalších  /  Odstranit duplicitní e-maily  /  pokročilé vyhledávání  /  Konsolidovat složky ...

📁 Přílohy ProDávkové uložení  /  Dávkové odpojení  /  Dávková komprese  /  Automaticky uložit   /  Automatické odpojení  /  Automatické komprimování ...

???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů   /  Zvyšte produktivitu své aplikace Outlook pomocí zobrazení s kartami  /  Minimalizujte aplikaci Outlook namísto zavírání ...

???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami  /   E-maily proti phishingu  /  🕘Zobrazit časové pásmo odesílatele ...

👩🏼‍🤝‍👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů  /  Rozdělit skupinu kontaktů na jednotlivé skupiny  /  Odeberte připomenutí narozenin ...

Přes 100 Vlastnosti Očekávejte svůj průzkum! Kliknutím sem zobrazíte další informace.

Více       Stažení zdarma      Nákup
 

 

Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
WHEN I CLOSE THE OUTLOOK AND RESTAR THIS IS NOT WORKING, WHY? CAN YOU HELP
This comment was minimized by the moderator on the site
Hi,

I'm very sorry, this issue occurred because macros were disabled after restarting Outlook. Please follow these steps to re-enable macros:
Click on File > Options to enter the Outlook Options window, click on Trust Center > Trust Center Settings, in the Trust Center window, click on the Macro Settings tab, select the Enable all macros option, and click OK to save the new settings. Please restart Outlook once more, and the issue should be resolved.
This comment was minimized by the moderator on the site
Hello. Very clear instructions, thank you.
When I attempt to use the macro, I get this error:
"Compile error: User defined type not defined."
Sub DatePicker() and xDoc As Document are highlighted.
Any ideas on how to fix it please?
This comment was minimized by the moderator on the site
Hi Dave,

To solve this problem, please follow the instruction of step 3 and 4 to enable the Microsoft Word 16.0 Object Library option in the Microsoft Visual Basic for Applications window.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/outlook-word-referece-vba.png?1711618070
This comment was minimized by the moderator on the site
This was exactly what I was looking for. Thank you!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations