From main macro: Automatically Enable a macro when opening a file

[jazzyt2u]

Hi,

I am using the following code to open unknown files in a folder and process them.
[vba]Sub OpenFiles()
Const FOLDER_NAME As String = "C:\test\" '<===== change to suit
Dim NextFile As String

NextFile = Dir(FOLDER_NAME & "*.xls", vbNormal)
Do While NextFile <> ""

Workbooks.Open FOLDER_NAME & NextFile
'do stuff on active workbook
NextFile = Dir
Loop
End Sub [/vba]

The files will have macros. How do I automatically enable the macro so the user doesn't have to take the time to click the enable macro button?

Thanks

[GTO]

Hi,

Have you tried the code? I only have access to 2003, but since the user had to enable macs to open the file containing the code, the files opened programatically should not fire the alert/warning. I tested your code nearly as written and opened several excel files (that do contain code) and received no warnings.

Mark