| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Check for Folder
i have this code supplied by Joel which i have changed but i always get a
FindFolder="" when the folder is there RootFolder = ThisWorkbook.Path DestinationFolder = "\The_Folder_im_LookingFor" Dim FindFolder As String FindFolder = "" On Error Resume Next FindFolder = RootFolder & DestinationFolder On Error GoTo 0 If FindFolder = "" Then 'not there Worksheets("Macros").Run_All.Visible = False Worksheets("Macros").Run_All.Enabled = False Else 'is there Worksheets("Macros").Run_All.Visible = True Worksheets("Macros").Run_All.Enabled = True |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Check for file in folder, if not there, open folder to rename file | Excel Programming | |||
| Check access right to folder | Excel Programming | |||
| Check Folder For Files | Excel Discussion (Misc queries) | |||
| Check if a folder has x files in it. | Excel Discussion (Misc queries) | |||
| Check if folder exists, if yes just copy sheet in to folder? | Excel Programming | |||
Threaded Mode
