Run time error 50034 method export of object vb component failed

I keep getting this error on this line

[CODE]ThisWorkbook.VBProject.VBComponents("Module2").Export FileName[\CODE]

of this code:

Sub Transfer_Module()

Dim FileName As String

FileName = "C:\Module2.bas"

ThisWorkbook.VBProject.VBComponents("Module2").Export FileName

ActiveWorkbook.VBProject.VBComponents.Import FileName
    
Kill FileName
End Sub

I have scanned for registry errors but it is still happening can anyone help?

Thank you in advance
Libby