Вы фактически не вводите имя листа в формулу:
Worksheets("Sheet1").Range(Cells(3, 9), Cells(30, 9)).Address(False, False)
не возвращает имя листа; он возвращает I3:I30
.
Измените "=COUNTIFS("
на "=COUNTIFS('Sheet1'!"
, чтобы фактически включить имя листа.
Также предпочтительно использовать .Formula
вместо .Value
здесь.