This example toggles the document map for the active window.
ActiveDocument.ActiveWindow.DocumentMap = _
Not ActiveDocument.ActiveWindow.DocumentMap
This example displays the document map in the window for Sales.doc.
Set myDoc = Documents.Open(FileName:="C:\Documents\Sales.doc")
myDoc.ActiveWindow.DocumentMap = True