FileDialog to get user selected folder

[Southern at Heart]

I can't seem to get this figured out: All I need is to save a text file that
is created by my code, and I would like to give the user the dialogbox that
pops up and lets them choose a folder. My code then knows what path they
chose, and saves the text file there. My text file is called Contacts.txt
If this isn't too hard, can someone please show me how to do this?
Thanks so much.

 

[Alex Dybenko]

Hi,

Try this:
http://www.mvps.org/access/api/api0001.htm

--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com

 

[Douglas J. Steele]

Actually, if all you need is to allow them to select the folder, use
http://www.mvps.org/access/api/api0002.htm

 

[Southern at Heart]

Thanks. That's a lot of code just to select a folder... I thought it'd just
be a couple lines. ...I use these few lines below to let the user pick an
Outlook folder:

Dim ol As New Outlook.Application
Dim olns As Outlook.NameSpace
Dim cf As Outlook.MAPIFolder
Set olns = ol.GetNamespace("MAPI")
Set cf = olns.PickFolder
If cf Is Nothing Then
MsgBox "No folder chosen ...action canceled"
End
End If

 

[Alex Dybenko]

But once you put BrowseFolder() function in a module - then you need only
one line to run it

--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com