Another getFolder(sFolder) Error

[mevasquez]

I get an error when the folder name has an apostrophe. Here is part of my code.

Dim sFolder
dim sFolderRoot

sFolderRoot = oSheet.Cells(2, 1).Value [COLOR=green]'Value is "Z:\AMA's" [/color]

Set sFolder = oFso.getfolder(sFolderRoot & "\")

I get a "Path not found error." I have tried,

Set sFolder = oFso.getfolder(chr(34) & sFolderRoot & "\" & chr(34))

which does not work

Any suggestions?

TIA

Mike

 

[PHV]

Set sFolder = oFso.getfolder(sFolderRoot & "\")
Works for me, even without the trailing \
Obviously I've created a directory named AMA's in the Z: drive.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886