when i use this:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Run "NPI data entry form.xls!Macro1"
End Sub

it says it cannot find the macro

when i use this
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Run "'NPI data entry form.xls'!Macro1"
End Sub

i get subcript out of range