Access.2007.VBA.Bibl..

In the Choose Form dialog, select “User Templates in File System” from the “Look in” drop-down list,

as shown in Figure 8.19.

FIGURE 8.19

Selecting the “User Templates in File System” option to open a saved template file.

The template path defaults to the standard Office 2007/Windows Vista template location,

C:\Users\Your Name\App Data\Roaming\Microsoft\Templates, but there is a Browse button that

lets you select a template from another location. After selecting the template, you can open it with

the Open button, and you will see your custom form at last (though its colors may have changed,

because of changes in the Windows Vista and Office 2007 color palette).

Set a reference to the default local Contacts folder:

Set fld = nms.GetDefaultFolder(olFolderContacts)

Set a reference to the Folders collection of a folder called “Custom Contacts” under the top-level

Personal Folders folder (via the previously set fldsvariable):

Set fld = flds(“Custom Contacts”)

Set a reference to a custom public folder:

Set flds = nms.Folders(“Public Folders”).Folders

Set fld = _

flds(“All Public Folders”).Folders(“Custom Folder”)

Set a reference to the currently open folder, via the active Explorer:

Set exp = appOutlook.ActiveExplorer

Set fld = exp.CurrentFolder

Part II Writing VBA Code to Exchange Data between Office Components