they are ranges........see code below
Set Received_col_range = Workbooks(wrkbookname1).Worksheets(wkrsheetname1). _
Range(alphacol(Received_Col) & "2:" & alphacol(Received_Col) & (last_row1 + 1))
Set study_number_range = Workbooks(wrkbookname1).Worksheets(wkrsheetname1). _
Range(alphacol(1) & "1:" & alphacol(1) & (last_row1 + 1))
Set Closed_col_range = Workbooks(wrkbookname1).Worksheets(wkrsheetname1). _
Range(alphacol(Closed_Col) & "2:" & alphacol(Closed_Col) & (last_row1 + 1))
'Set study_1_range = Workbooks("To_be_used_with_macro1_doc1.xlsm").Worksheets("Sheet1").Range("A2")
'Total closed
Junk1 = Application.WorksheetFunction.CountIfs( _
study_number_range, "=" & Workbooks("To_be_used_with_macro1_doc1.xlsm").Worksheets("Sheet1").Range("A2").Value, _
Received_col_range, "<>" & "", _
Closed_col_range, ">=" & start_date1, _
Closed_col_range, "<=" & end_date1)
Bookmarks