excel自定义名称在VBA中提示字段名非法或丢失

Advanceadd定义称为：OFFSET(Sheet4!$AZ$1,,,COUNTA(Sheet4!$AZ:$AZ),1)，工作簿级

Advanceclear定义称为：OFFSET(Sheet4!$AZ$2,,,COUNTA(Sheet4!$AZ:$AZ)-1,1)，工作簿级，

Range("advanceclear").Clear

Sheet1.Range("d2:d999").SpecialCells(xlCellTypeVisible).Copy

_Sheet4.Range("AZ2")

    Sheet4.Select

Range("A1:AQ18666").AdvancedFilter,Action:=xlFilterCopy, _CriteriaRange:=Range("advanceadd"), CopyToRange:=Range("G18800"), _Unique:=False

提示：提取区域中的字段名非法或丢失，为什么？已定义名称了啊？请教大神！