export all vba modules into one folder

export all vba modules into one folder

Hello, colleagues.
We want to automate procedure of vba-modules export.
Theoretically easyest way is to use some reflection mechanism like this:
VBA Code:

Private Sub ExportAll()
Dim objMyProj As VBProject
Dim objVBComp As VBComponent
Set objMyProj = MyWorkspace.VBE.ActiveVBProject
For Each objVBComp In objMyProj.VBComponents
If objVBComp.Type = vbext_ct_StdModule Then
objVBComp.Export "C:\temp\" & objVBComp.Name & ".bas"
End If
Next
End Sub

We added reference to Microsoft VBA Extencibility 5.3 but line
Set...
of code is stopped with error ActiveX component can't create object.
Can you help us how to workaround this error?

This is a migrated post! Originally posted on 02.07.2013 by user stolyarov_as. Please be aware that information can be outdated.