考勤中遇到的问题，求助各位大佬~

带薪或夜班，都是在批注里面说明的吧？

如果都是在批注里面说明的，批注的格式最好能统一，这样才方便统计。不过统计批注里面的内容，必要用VBA。

Option Explicit
Public Function CountComment(ByVal Target As Range, ByVal Comment As String) As Integer
Dim rg As Range
Dim sum As Integer
Dim tmp As String
For Each rg In Target
If Not rg.Comment Is Nothing Then
tmp = rg.Comment.Text
If tmp Like "*" & Comment & "*" Then sum = sum + 1
End If
Next
CountComment = sum
End Function