在命名范围中查找相同的单词

Question

这里结束游戏是采取行动，如果单词＆＃34;注意：＆＃34;在命名范围内出现不止一次，但首先我只是试图计算单词的数量＆＃34;注意：＆＃34;在每个范围内。第一个代码可以工作，但是当我尝试用命名范围替换范围时（首先是Range4，其他的将是变量），我得到一个＆＃34;需要对象＆＃34;错误。

第一个代码

Dim iVal As Integer
iVal = Application.WorksheetFunction.COUNTIF(Range("A1:A10"),"NOTE:")

我想要的代码

Dim iVal As Integer
iVal = Application.WorksheetFunction.CountIf((Range4), "NOTE:")

就像我说的那样，最后的游戏是使用类似Range（a）的东西，这样a可以是一个变量，因为我的命名范围是＆＃34; Range1，Range2，Range3等...），但我和＃39; m甚至无法获得第一个命名范围以提取NOTE的数量：即使没有变量。