Code to Enable Macros

Hi there

I am using this code it works only when Excel Macros are enabled.........so what is the point of excuting this code while Excel macros are enabled.

when excuting this code it askes to open a xl file, so the code opens the file with macros either enabled or disabled......but this code works only if Excel Macros are enabled, otherwise this code will not work.........

The code :

Sub Security() 
    Dim lngAutomation As MsoAutomationSecurity 

    With Application 
        lngAutomation = .AutomationSecurity 
        '.AutomationSecurity = msoAutomationSecurityForceDisable 
        .AutomationSecurity = msoAutomationSecurityLow 
        With .FileDialog(msoFileDialogOpen) 
            .Show 
            .Execute 
        End With 
        .AutomationSecurity = lngAutomation 
    End With 

End Sub