Batch Processing Excel Workbooks

A possibility can be to put all macros in the same file: Toolbox
The file must be in the same folder as the files to treat

Sub TreatAllFile()
Dim Masq_File  As String
Dim DIR_Result  As String
Dim StartRow As Integer
Dim I  As Integer
Dim ThisFileName  As String
Dim WkPath As String
Dim WkStg  As String
Dim DispCol As String

Application.ScreenUpdating = False
'-----   INIT
    WkPath = ActiveWorkbook.Path
    ThisFileName = ActiveWorkbook.Name
    StartRow = 5
    DispCol = "B"
    Range("WkPath") = WkPath
    Range(Cells(StartRow, DispCol), Cells(Rows.Count, DispCol).End(xlUp)).ClearContents

'------------ LOOK IF  EXISTS  SOME FILES
    Masq_File = WkPath & "\*.*"
    DIR_Result = Dir(Masq_File, 0)  '  0 --> READ  ONLY FILES
      While (DIR_Result <> "")
        If (DIR_Result <> ThisFileName) Then
            Cells(StartRow + I, DispCol) = DIR_Result
            WkStg = WkPath & "\" & DIR_Result
            Workbooks.Open Filename:=WkStg
            Application.Run ThisFileName & "!Treat"
            ActiveWindow.Close SaveChanges:=True   ' QUIT  WITH  save
        End If
        I = I + 1
        DIR_Result = Dir
      Wend
Application.ScreenUpdating = True
End Sub

Well, the way to do is this one:

In the folder where are the files put the file Toolbox file
Don't do anything on the files
In file Toolbox clic the button = Launch Full treatment or launch the macro TreatAllfile
It can takes some time

" I'm using 2003 excel. "
OK see the file attached

OK
Prepare a file that you call ToolBox
Record a macro in this file and change the contains of this macro by the code sent at the beginning.
Put this file in the same folder where are the files to treat.
When the ToolBox is open launch the macro

What is the statement involved?

OK I got it.
Delete statement

    Range("WkPath") = WkPath

It was used to display the working path in the file

By the way to finish the presentation.
In file Toolbox from row 5 and column "B" is done the list of files treated
See next statements: you can delete them if you don' t want
If you keep them, take care that the name you create ( WkPath ) is not in this range.

    StartRow = 5
    DispCol = "B"

In the file Toolbox did you put the macro Treat
Here the set of macros to put in the file Toolbox

Option Explicit

Sub Treat()
Dim DelRg  As Range
Dim FR  As Integer, LR  As Integer, I As Integer
Dim WkSh As String
Dim WS  As Worksheet
Dim WkCol As String
    WkSh = "March,April,May,June,July,August,September,October,November"
    WkCol = "BR"
    FR = 13
    LR = 350
    For Each WS In Worksheets
        If (WkSh Like "*" & WS.Name & "*") Then
            With WS
                Set DelRg = .Cells(LR + 1, 1)
                For I = FR To LR
                    If .Cells(I, WkCol) = 0 Then Set DelRg = Union(DelRg, .Cells(I, 1))
                Next
            End With
            DelRg.EntireRow.Delete
        End If
    Next
End Sub


Sub TreatAllFile()
Dim Masq_File  As String
Dim DIR_Result  As String
Dim StartRow As Integer
Dim I  As Integer
Dim ThisFileName  As String
Dim WkPath As String
Dim WkStg  As String
Dim DispCol As String

Application.ScreenUpdating = False
'-----   INIT
    WkPath = ActiveWorkbook.Path
    ThisFileName = ActiveWorkbook.Name
    StartRow = 5
    DispCol = "B"
'    Range("WkPath") = WkPath
    Range(Cells(StartRow, DispCol), Cells(Rows.Count, DispCol).End(xlUp)).ClearContents

'------------ LOOK IF  EXISTS  SOME FILES
    Masq_File = WkPath & "\*.*"
    DIR_Result = Dir(Masq_File, 0)  '  0 --> READ  ONLY FILES
      While (DIR_Result <> "")
        If (DIR_Result <> ThisFileName) Then
            Cells(StartRow + I, DispCol) = DIR_Result
            WkStg = WkPath & "\" & DIR_Result
            Workbooks.Open Filename:=WkStg
            Application.Run ThisFileName & "!Treat"
            ActiveWindow.Close SaveChanges:=True   ' QUIT  WITH  save
        End If
        I = I + 1
        DIR_Result = Dir
      Wend
Application.ScreenUpdating = True
End Sub

So just to review what's happen:
It did not work immediately, because it was not possible to use the file sent
All macros are merged in the same file like a tool box
All files in the same folder are treated if there is sheets named "March,April,May,June,July,August,September,October,November"
In file Toolbox (you could used another name) in the active sheet:
is displayed the files treated
is displayed the path in cell named "WkPath"
It can takes some time to do the full treatment, because all files are opened, treated, recorded and closed