Displaying Insert/Picture dialog box

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Adri - 24 Jan 2005 18:37 GMT

I need to display the Insert/Picture dialog box, pointing to a specific
directory. I can get the dialog to display, but can't figure out how to
change 'look in' to the directory I want. Any suggestions? I'm using:
Dialogs(wdDialogInsertPicture).Show to display the dialog.

Signature

Thanks...
Adri

Reply to this Message

Dave Lett - 24 Jan 2005 19:47 GMT

Hi Adri,

You can use something like the following:

Dim sPixFolder As String
''' store the default pictures location
sPixFolder = Options.DefaultFilePath(wdPicturesPath)
''' change the default pictures location
Options.DefaultFilePath(wdPicturesPath) = "C:\Test\"
''' open the dialog box
Dialogs(wdDialogInsertPicture).Show
''' restore the default pictures location
Options.DefaultFilePath(wdPicturesPath) = sPixFolder

HTH,
Dave

> I need to display the Insert/Picture dialog box, pointing to a specific
> directory. I can get the dialog to display, but can't figure out how to
> change 'look in' to the directory I want. Any suggestions? I'm using:
> Dialogs(wdDialogInsertPicture).Show to display the dialog.

Reply to this Message

Adri - 25 Jan 2005 16:23 GMT

Thanks Dave, works perfectly.

> Hi Adri,
>
[quoted text clipped - 17 lines]
> > change 'look in' to the directory I want. Any suggestions? I'm using:
> > Dialogs(wdDialogInsertPicture).Show to display the dialog.

Reply to this Message