Add text to title bar of Open file browser dialog box

[Chris Freeman]

I'm using some code fouind online, and wanted to add one revision, adding
text to the title of the open file dialog browser window. It seems its these
three lines that initiate the browser window:

With FD

'Use the Show method to display the File Picker dialog box and
return the
user's action.
'The user pressed the action button.
Do Until FileName <> ""
.Show
etc...

I wanted to to add something like:
.Title = "Browse for previous Print Services Export file"

but this is a no go. Does anyone have a method for adding this text?

Thank you

 

[Mr. B]

Chris,

Take a look at this thread:
http://www.microsoft.com/communitie...&pt=&catlist=&dglist=&ptlist=&exp=&sloc=en-us

Pay peticualr attention to Douglas J. Steele's answer. He addresses this
very issue.

If the link above does not work, just go to the Access Programming Newsgroup
and do a search for "file dialog box" and look for the topic: "api001 Dialog
Box - VBA Assistance in Coding Sav..."

 

[KLZA]

I'm using some code fouind online, and wanted to add one revision, adding
text to the title of the open file dialog browser window. It seems its these
three lines that initiate the browser window:

With FD

        'Use the Show method to display the File Picker dialog box and
return the
         user's action.
        'The user pressed the action button.
        Do Until FileName <> ""
        .Show
etc...

I wanted to to add something like:
       .Title = "Browse for previous Print Services Export file"

but this is a no go. Does anyone have a method for adding this text?

Thank you

Try"

Me.Caption = "ANY TEXT HERE"

 

[Chris Freeman]

KZLA,
Thanks, you were in the right ball park, I just needed to get down to the
better seats. .caption is not an object option, the little option list that
pops up when you hit the period, but title is. so as I played with other
methods, it occured to me that .title was the correct option. Problem was
simple: I was putting .Title after .Show. So I rearranged the order and
voila, works just fine:

With FD

'Use the Show method to display the File Picker dialog box and
return the
user's action.
'The user pressed the action button.
Do Until FileName <> ""
.Title = "Browse for previous Print Services Export file"
.Show

Thanks