ACC: How to Create a MS Office Binder Using Automation

• Microsoft Access versions 7.0, 97

SUMMARY

Advanced: Requires expert coding, interoperability, and multiuser *skills.

This article shows you how to create a Microsoft Office Binder that includes documents from a variety of Microsoft Office programs.

This article assumes that you are familiar with Visual Basic for Applications and with creating Microsoft Access applications using the programming tools provided with Microsoft Access. For more information about Visual Basic for Applications, please refer to your version of *the "Building Applications with Microsoft Access" manual.

MORE INFORMATION

To create a Microsoft Office Binder, add a command button to a *Microsoft Access form, and set the following properties. When the command button *is selected, a new binder called Mybind.obd will be created in the C:\My Documents folder.

   Name: cmdOLEBinder
   Caption: Create Binder
   OnClick: [Event Procedure]

   Private Sub cmdOLEBinder_Click()
       Dim boObj As Object, boSec As Object
       Set boObj = CreateObject("Office.Binder")
       boObj.Visible = True
       boObj.Sections.Add ("Word.Document")
       boObj.Sections.Add ("Excel.Sheet")
       boObj.Sections.Add ("PowerPoint.Show")
       boObj.SaveAs FileName:="Mybind.obd"
       Set boObj = Nothing
   End Sub

REFERENCES

For more information about Automation, search the Help Index for "Automation," or ask the Microsoft Access 97 Office Assistant.

For more information on how to use Automation with the Office Binder, open VBABDR8.HLP (the VBA help file for the Office Binder). This file is located within the following folder on the Office 97 installation CD:

   ValuePack\MoreHelp

Keywords          : kbinterop IntpOleA
Technology        : kbole
Version           : 7.0 97
Platform          : WINDOWS
Hardware          : x86
Issue type        : kbhowto