View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Steve Yandl[_3_] Steve Yandl[_3_] is offline
external usenet poster
 
Posts: 117
Default "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