Thread
:
Creating FileSystemObject
View Single Post
#
2
Posted to microsoft.public.excel.programming
Chip Pearson
external usenet poster
Posts: 7,247
Creating FileSystemObject
Kirk,
Change
Set fso = CreateObject("VBA.FileSystemObject")
to
Set fso = CreateObject("Scripting.FileSystemObject")
--
Cordially,
Chip Pearson
Microsoft MVP - Excel
www.cpearson.com
"Kirk" wrote in message
...
I have the following code:
Public Function FolderExists(folderspec)
Dim fso As Object
Dim blnFolderExist As Boolean
Set fso = CreateObject("VBA.FileSystemObject")
If fso.FolderExists(folderspec) Then
MsgBox "Folder Exists"
Else
MsgBox "Folder Does Not Exist"
End If
End Function
I am attempting to verify that a folder path exists that
a user inputs.
I get a Run-time error '429': ActiveX componetn can't
create object.
I checked my references and the VBA Library exists with
FileSystem. I tried only FileSystem, but got the same
error.
I need to be able to verify that a path a user enters in
a UserForm exists. Am I on the right track? What do I
need to do to get the above code to work? Any help would
be appreciated. Thanks.
Kirk
Reply With Quote
Chip Pearson
View Public Profile
Find all posts by Chip Pearson