When testing this function, I encountered "Invalid quantifier" message
and the highlighted word is "InvoiceNote.Find".

Function AccruedBillable(State As String, InvoiceNote As String) As
Variant

Application.Volatile (True)

On Error Resume Next

If InvoiceNote.Find(What:="Billable", _
LookIn:=xlFormulas, _
LookAt:=xlPart, MatchCase:=False, SearchFormat:=False) Then

Select Case State

Case Is = "ME"
AccruedBillable = 400

Pease shed a light on how to fix it. Thanks in advance.

H.Z.