Excel VBA - 引用公式中的命名范围

时间:2018-04-12 10:09:38

标签: excel vba excel-vba

我有一张表单,其中列表中的“项目”数量可以根据订单中的项目数量而变化。我有一个模板选项卡,然后我用它为每个订单创建一个特定的选项卡。

我想创建一个公式,计算此列表中的项目数,作为我拥有的宏的一部分,它从每个订单获取所有信息并放入主跟踪器。

我使用rows.count函数命名了项目代码的范围,因此它只查看确切的项目数。

我正在尝试使用此命名范围在宏中包含一个公式但是当宏运行并将公式放入指定的单元格时,它无法识别我希望它查看的单元格,并且只包含名称范围。

我想看的部分代码如下。

Dim ReqItems, SuppItems As Range

Set ReqItems = Form.Range("E16:E" & lastrow)
Set SuppItems = Form.Range("H16:H" & lastrow)

Tracker.Range("Q" & lastrow2).Formula = "=COUNTIF(ReqItems,"">0"")"

1 个答案:

答案 0 :(得分:1)

您需要在字符串中填写地址。

.Formula = "=COUNTIF(" & ReqItems.Address & ","">0"")"

请注意

Dim ReqItems, SupItems As Range

仅声明SupItems As Range,但此处ReqItems的类型为Variant。您需要为每个变量声明一个类型。

Dim ReqItems As Range, SupItems As Range