排班表-(統計某日期區間的例、休計數)

-統計某日期區間的例、休計數

原資料格式

仿製資料格式

VBA Code

儲格E8、F8得到結果計數

撰寫概念:
1 先將日期條件 set dateRng取出;再用Split切割連接符號-,取得起迄的日期
  startDate、endDate
2 被比對日期區域 set dateArea,利用 for each.. 搭配if 結合
3 結合並開始比對
 3.1 取出日期區域的列值, 以天為格式化 datestr = Cells(7, cell.Column).Value
 3.2 If Day(datestr) >= Day(startDate) And Day(datestr) <= Day(endDate)
 3.3 確定大於等於>= 大於等等<= ,日期區間後再cell.offset位移到下一儲格取得例、休
 3.4 並與Range("E7")、Range("F7")做最後字串比對,再加總得到結果
     最後字串比對 (.Range("E7").Value = cell.Offset(1, 0).Value)
     加總 (count1 = count1 + 1)