"Scripting.FileSystemObject" suddenly stopped working
If you haven't done so already, power down the PC, restart and then try the
routine again.
I've had similar messages while creating new scripts or VBA routines. I
suspect that if you fail to set the object to nothing at the end of the
routine or if the routine is halted for some reason before reaching "Set
objFolder = Nothing" the object still resides in memory, even after the
workbook and/or Excel are shut down.
Steve Yandl
"Budget Programmer" wrote in
message ...
Hello,
I've had a macro in place for over a year and a half. It works fine
weekly.
Suddenly, I get an error. I've made no changes to the environment (Vista
32
Home Premium, Excel 2007)
Under Tools / References I have checked:
- Visual Basic For Applications
- Microsoft Excel 12.0 Object Library
- OLE Automation
- Microsoft Office 12.0 Object Library
These haven't changed.
Here's some of the pertanent lines from the code:
Sub CreateEditedSongListing()
'DECLARE VARIABLES
Dim objFSO As Object
Dim objFolder As Object
'Use Microsoft Scripting runtime.
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(strSongs_EditedPath)
End Sub
I get an error on the first SET statement. "Run-time error: '429'
ActiveX
component can't create object."
Any idea what's going on?
Thanks for your help.
--
Programmer on Budget
|