![how to change font on sticky notes how to change font on sticky notes](https://i0.wp.com/nazim.co/assets/img/notes/jupyter-notebook-theme.png)
Set Selection = currentExplorer.Selectionįirst: You need to have macro security set to the lowest setting, Enable all macros during testing. Set currentExplorer = Application.ActiveExplorer I recommend selecting some items, then Ctrl+C, V to create a copy of the items for testing. Each item will quickly open then close as Outlook makes the changes. To use, select the items (it's easier to use a list view, especially for appointments) then run the code.
How to change font on sticky notes code#
This code changes the font in the body of selected appointment, contact, or task items. Replace the m_Inspector_Activate() sub with the following code: then statement looks for the item type and changes the font. If, like Martin, you only want to change the font for one Outlook item type, the If. OlSelection.InsertBefore & " your sample text" Set olInspector = Application.ActiveInspector() ' Sticky notes don't use Word editor, so we need check for Notes too ' Set a reference to Word object model in Private Sub m_Inspectors_NewInspector(ByVal Inspector As Outlook.Inspector) Set m_Inspectors = Application.Inspectors Private WithEvents m_Inspector As Outlook.Inspector Private WithEvents m_Inspectors As Outlook.Inspectors
How to change font on sticky notes how to#
How to use Outlook’s VBA Editor has more information if you are new to VBA. Oh, and macro security needs to be set to Low during testing and the macro signed once you're satisfied with it. To test it without restarting Outlook you'll need to click in Application_Startup and click the Run button. Paste it into ThisOutlookSession and set a reference to the Microsoft Word Object Library in Tools, References. (You can use lower case names as the font name is not case-sensitive.) Replace it with a font name as seen in the Font selector. In my example (so we can easily see that it works), I'm using Wingdings (and size 18 font). Now when I open any new Outlook item (but not a new message or sticky note), the body font is changed. I'm starting with Michael Bauer's Inspector: Edit new items code sample and adding a few lines to set the font. This works on new items only, it will not change the font in existing items. While this works fine if you want to use one font for everything except email, since Outlook now uses Word as the email editor, you can use Word VBA to change the font in the notes field in any new item type except email and sticky notes. One option is to use custom stationery for your email messages.