keyongtech


  keyongtech > word.* > word.vba.general > 04/2006

 #1  
04-10-06, 05:54 PM
Michael Eyestone
Is the list that comes up in the VB Editor as you type

Dialogs(

the full list available? In particular, I'm trying to find out how to call
the "Modify Style" dialog.

Thanks in advance,
Michael Eyestone
Ottawa, Canada
 #2  
04-10-06, 06:28 PM
Helmut Weber
Hi Michael,

not really a help, what I have to offer.

It seems that the list is complete.
Which doesn't help you, as there is a dialog
wdDialogEditStyle,
which may be what you want,
but doesn't do anything at all:

Dim oDlg As Dialog
Set oDlg = Dialogs(wdDialogEditStyle)
oDlg.Display

Results in nothing! :-(

If you are just interested in font then:
Dialogs(wdDialogFormatDefineStyleFont)

If you are just interested in the paragraph's layout, then:
Dialogs(wdDialogFormatDefineStylePara)

plus some more.
 #3  
04-10-06, 07:50 PM
Michael Eyestone
Helmut:

Thanks for the input. I had found that (non-functioning) one, and thought
perhaps I was using it incorrectly. Upshot is that I am evidently unable to
cause Word to show me the Modify Styles dialog box using a macro. Sad!

Cheers,
Michael

"Helmut Weber" wrote:
[..]
 #4  
04-10-06, 08:58 PM
Jay Freedman
Since the Modify Style dialog needs to know which style to work on, it's a
child of the FormatStyles dialog. It's clunky (and might sometimes
malfunction), but you can use the SendKeys command to simulate pressing
Alt+M in the FormatStyles dialog this way:

Dim StyleToEdit As String
Dim dlg As Dialog

StyleToEdit = "Footer" ' just an example...
Set dlg = Dialogs(wdDialogFormatStyle)

With dlg
.Name = StyleToEdit
SendKeys "%m": .Show
End With

Set dlg = Nothing
 #5  
04-11-06, 12:11 PM
Tony Jollans
There are some dialogs for which there are no defined constants. I don't
know of any list (bar my own somewhat incomplete one) but ..

Dialogs(1347).Show

.... will present the Modify Style dialog for the Style at the insertion
point.
 #6  
04-12-06, 02:55 PM
Michael Eyestone
Hey, that's terrific, thanks very much! Why are things like this so hard?
Why wouldn't the help file include such a list? I mean, really.

But thanks again!

Michael

"Tony Jollans" wrote:
[..]
Similar Threads
How to access built-in dialog boxes

How do you find the numeric value of a built-in dialog box, such as: Dialogs(1347).Show to display the Modify Style dialog box? I am interested in accessing the Fill...

Using built in dialog boxes - how to determine arguments?

How do I find out what the arguments/members of a given Word.Dialog are? I can invoke them fine using the code from: [..], and I can get some information on member names...

Built-in Dialog Boxes

Is there anyway you can display dialog boxes using VBA. For example, would like to display the Save As dialog box, if a presentation has no already been saved, just before...

Customizing Word Built-In Dialog Boxes

I am showing the Insert Table of Contents dialog box using VBA. "Dialogs(wdDialogsInsertTableofContents).Show" When i do this, the Show Levels box has a 9 in it. How can I...

Re : Making use of the Built-in Dialog Boxes

1. Please examine the following code :- Dim TextFind As String Call Application.Dialogs(xlDialogFormulaFind).Show(TextFind, 2, 2, 1, 0, True, True) MsgBox "TextFind = " &...


All times are GMT. The time now is 06:26 AM. | Privacy Policy