VBA 計算日期相差天數 (扣掉六日)

DateDiff("d", Before, Today) - (Ceiling((DateDiff("d", Before, Today) - (Format(Today, "w") - 1)) / 7) * 2)