Thanks. After doing a bit of searching, I found a macro to capture and write
out the contents of the ViewXml Property. I had to modify it slightly, but I
wanted to share it here in case someone in the future is asking the same
thing.
Once set the ViewXML property in my own project to the saved XML, I was able
to get a view with the normal month view.
I am still looking for a way to capture and react to events in outlook such
as an appointment changing without writing an Add-in.
Bill
Sub test()
Dim fd As MAPIFolder
Set fd = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderCalendar)
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateTextFile("c:\testfile.txt", True)
f.Write (fd.CurrentView.XML)
f.Close
End Sub
which output this XML
<?xml version="1.0"?>
<view type="calendar">
<viewname>Day/Week/Month</viewname>
<viewstyle>table-layout:fixed;width:100%;font-family:Tahoma;font-style:normal;font-weight:normal;font-size:8pt;color:Black;font-charset:0</viewstyle>
<viewtime>0</viewtime>
<mode>2</mode>
<daymode>5</daymode>
<splitterwidth>-1</splitterwidth>
<splitterheight>-1</splitterheight>
<displaytimeunits>30</displaytimeunits>
<taskfilter>1</taskfilter>
<includenodue>1</includenodue>
<lunarinfotype>0</lunarinfotype>
<rokuyou>0</rokuyou>
<startfield>urn:schemas:calendar:dtstart</startfield>
<endfield>urn:schemas:calendar:dtend</endfield>
<daystyle></daystyle>
<weekstyle></weekstyle>
<monthstyle></monthstyle>
<calendarstyle>font-size:16pt</calendarstyle>
<previewpane>
<markasread>0</markasread>
</previewpane>
<embeddedview type="table">
<viewstyle>table-layout:fixed;width:100%;font-family:Tahoma;font-style:normal;font-weight:normal;font-size:8pt;color:Black;font-charset:0</viewstyle>
<viewtime>0</viewtime>
<linecolor>8421504</linecolor>
<linestyle>3</linestyle>
<gridlines>1</gridlines>
<newitemrow>1</newitemrow>
<incelledit>1</incelledit>
<usequickflags>0</usequickflags>
<collapsestate></collapsestate>
<rowstyle>background-color:#FFFFFF</rowstyle>
<headerstyle>background-color:#D3D3D3</headerstyle>
<previewstyle>color:Blue</previewstyle>
<arrangement>
<autogroup>0</autogroup>
<collapseclient></collapseclient>
</arrangement>
<column>
<name>HREF</name>
<prop>DAV:href</prop>
<checkbox>1</checkbox>
</column>
<column>
<heading>Icon</heading>
<prop>
http://schemas.microsoft.com/mapi/proptag/0x0fff0102</prop>
<bitmap>1</bitmap>
<width>18</width>
<style>padding-left:3px;;text-align:center</style>
</column>
<column>
<format>boolicon</format>
<heading>Complete</heading>
<prop>
http://schemas.microsoft.com/mapi/id/{00062003-0000-0000-C000-000000000046}/811c000b</prop>
<type>boolean</type>
<bitmap>1</bitmap>
<maxrows>28770304</maxrows>
<width>35</width>
<style>padding-left:3px;;text-align:center</style>
<displayformat>3</displayformat>
</column>
<column>
<heading>TaskPad</heading>
<prop>urn:schemas:httpmail:subject</prop>
<type>string</type>
<width>15</width>
<style>padding-left:3px;;text-align:left</style>
<userheading>TaskPad</userheading>
</column>
<groupbydefault>0</groupbydefault>
<previewpane>
<markasread>0</markasread>
</previewpane>
</embeddedview>
</view>