Hi CD,

The excel objects technically are class objects in VBAs eyes, which is why it is exporting them as .cls files. You can open them in notepad, the pertinent code is under the Attribute statements. If you wanted to export programatically, you could use:

Sub cyberdude()
 Dim aComponent As Object, ExportPath As String
 ExportPath = "C:\backup\" 'ends in "\"
 For Each aComponent In ThisWorkbook.VBProject.VBComponents
  Select Case aComponent.Type
   Case 2, 100: aComponent.Export ExportPath & aComponent.Name & ".cls"
   Case 1: aComponent.Export ExportPath & aComponent.Name & ".bas"
   Case 3: aComponent.Export ExportPath & aComponent.Name & ".frm"
  End Select
 Next
End Sub
Matt