View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
isabelle isabelle is offline
external usenet poster
 
Posts: 587
Default Set Folder path for entire module

hi,

you must declare the variable outside of macro

--------------------

Dim FolderName As String

Sub test()
'you must run Path_Name macro before this Test
MsgBox FolderName & "\Switchfoot"
End Sub

Sub Path_Name()
With Application.FileDialog(msoFileDialogFolderPicker)
.Show
On Error Resume Next
FolderName = .SelectedItems(1)
Err.Clear
On Error GoTo 0
End With
End Sub


--------------------

--
isabelle



Le 2012-09-27 11:01, KeriM a écrit :
I'm trying to set up some code where I choose the general file path
directory at the start (via folderpicker or something), set as a
variable, then be able to reference that variable throughout my code.
It's a network location, I'm not sure if that changes things.

Here is an example:


Code:
--------------------


' Sub Path_Name()
' Dim FolderName As Long
' With Application.FileDialog(msoFileDialogFolderPicker)
' .Show
' On Error Resume Next
' FolderName = .SelectedItems(1)
' Err.Clear
' On Error GoTo 0
'End With
' End Sub


--------------------


Let's say I pick the following path in the folder picker:
\\documents\music\09.27.12

I want to set that path to the variable "FolderName"

And then I want to reference that variable in the remainder of my code,
so if I want to reference the folder "Switchfoot", located in 09.27.12,
in another sub procedure, I just need to call FolderName & "Switchfoot"
I don't want to have to pick the folder again, I just want it to
automatically look in that path for Switchfoot.

Any help is appreciated!