Visio and Access databases

I was able to successfully export some custom shape properties into an Access
database. I can edit those properties in Access then apply them to the shapes
through Visio. But in order to do this, I have to right click on the shape,
click "Select Database Record", broswe to the database location, right click
on the shape and click on "Select Database Record" again, then choose which
record I want to apply to the shape. Is there a better way of doing this?
Maybe have it update automatically when I open the layout with Visio?

I am using Visio Pro 2003 SP3.

One of the best tools in visio is the "create macro" function. It will often
allow users to automate repeating processes by copying the on-screen steps
into a macro, which can then be called either from the toolbar or other vba
code. Here's an example of a macro to do database refresh for each page in
the document

Public Sub DoRefresh()
Dim myPage As Visio.Page
Dim myDoc As Visio.Document

Set myDoc = Visio.Application.ActiveDocument

For Each myPage In myDoc.Pages
RUNADDON ("DBRS")
' MsgBox CStr(myPage.Name)
Next myPage

End Sub

al


"MaxPower1234" wrote in message
...
I was able to successfully export some custom shape properties into an
Access
database. I can edit those properties in Access then apply them to the
shapes
through Visio. But in order to do this, I have to right click on the
shape,
click "Select Database Record", broswe to the database location, right
click
on the shape and click on "Select Database Record" again, then choose
which
record I want to apply to the shape. Is there a better way of doing this?
Maybe have it update automatically when I open the layout with Visio?

I am using Visio Pro 2003 SP3.