Use VBA to copy macros from one workbook to another

[Dean@ERYC]

I have a 'master' workbook which opens other 'Data' workbooks and does
various calculations/data validations on these workbooks. Before saving the
'Data' workbooks a Module from the master containing several macros is copied
across to the 'Data' spreadsheet. The code below works in Excel 2000 but not
in 2003.

It displays an error:
Run-time error '1004':
Programmatic access to Visual Basic Project is not trusted

'copy macro to validated wookbook
Dim FName As String
With Workbooks("TEAMS_Master.xls")
FName = .Path & "\code.txt"
.VBProject.VBComponents("Module9").Export FName
End With
Workbooks("IDBev.xls").VBProject.VBComponents.Import FName

Thanks for your help,
Dean.

 

[Norman Jones]

Hi Dean,

Try:

Tools | Macro | Security |Trusted Publisher Tab
[x] Trust access to Visual Basic Project

 

[Jim Thomlinson]

Starting in XL2002 the idea of trusted sources for macros began. In XL 2003
select Tools -> Macros -> Security -> Trusted Sources and check Trust Access
to Visual Basic Project.

 

[Dean@ERYC]

Thanks for your quick reply, - It's nice when it't something so simple! I had
visions of having to recode half of the 10,000 lines in the workbook!!

Thanks, Dean.