Thread: File directory
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
TimB[_2_] TimB[_2_] is offline
external usenet poster
 
Posts: 2
Default File directory

i did get this working, but not quite what i want.

Private Sub CommandButton3_Click()
Dim TheFile As Variant
TheFile = Application.GetSaveAsFilename("C:\Temp\", , , "PLEASE CHOSE FILE
LOCATION", "SAVE HERE")
If TheFile = False Then
MsgBox "You cancelled"
Else
Me.TextBox3.Value = TheFile
End If
End Sub


TimB wrote:
I am having trouble finding help on what i am looking to do, so i am hopeing
someone here can help me. I have a user form that has a text box and a
button in it. When the button is clicked i want a file directory to show up
so that the user can select a location, particular folder, and click ok.
This location will then be put into the textbox. The reason is that there
are a few other text boxes where the file name is entered and then another
button that will save as that name in the chosen location. Thanks in advance
for any help.