Argument not Optional Error
<p>I am building a sheet to extract data from a list of job openings that I need to sort and filter by location and by BU. I need the code to count the number of openings then pass that information back to the main sub to use in creating additional pages and to loop the sub. I keep getting the above error in this segment. Any thoughts on what I am doing wrong?</p>

<pre><code>Sub Organize_Data()

    Dim A As Integer
    Dim B As Integer
    Dim C As Integer

    Worksheets.Add().Name = "Calculations"
    Find_Unit
    Find_Locations
    Count_BU_Data
    Count_Country_Data
    Count_Raw_Data
End Sub

Function Count_BU_Data(A As Integer)

   ActiveWorkbook.Worksheets("Calculations").Range("B3", Worksheets("Calculations").Range("B3").End(xlDown)).Rows.Count
End Function
</code></pre>