Accessing Dialog Field Values

[Greg Maxey]

I have been trying to access the "Modify Building Block" dialog that is
presented when you select "Edit Properties" on the Building Blocks
Organizer.

I have cycled through the dialogs from 1 to 4000+ and it just doesn't appear
to exist in the dialog collection.

Next I thought I would try to modify one of the related dialogs.

Dialogs(2039).Show

Displays one of the Create Building Block dialogs. I though that I could
present it then exit its caption and programmatically set some of its field
values.

I can't figure out how to read or set the values that appears in the dialogs
fields. I tried the following, but each msgbox line returns and error.

Any ideas on how to read or set these values programmatically? Thanks.


Sub Test()
With Dialogs(2039)
If .Show = 0 Then
MsgBox .Name
MsgBox .Gallery
MsgBox .Category
MsgBox .Description
MsgBox .SaveIn
MsgBox .Options
End If
End With
End Sub

 

[jec]

Hi Greg

Try asking Christian Freßdorf through MVP channels or
microsoft.public.de.word.vba. Christian says that many features have not
been made available by Microsoft - this is perhaps one of them.

jec
www.ribbonspace.com

 

[Greg Maxey]

jec,

I think your right. Thanks.

Hi Greg

Try asking Christian Freßdorf through MVP channels or
microsoft.public.de.word.vba. Christian says that many features have
not been made available by Microsoft - this is perhaps one of them.

jec
www.ribbonspace.com