参照不同的片材进行分类

Question

你好，我将需要帮助的问题，我现在面临的，甚至谷歌无法帮助我。

我想添加到字段 AS2 a COUNTIF 含有来自不同工作表的源信息的公式。

这个 COUNTIF 应跳转 ee_lpk 然后从柱子上取一个范围 A2 并与字段中的标准进行比较。D.

所以 AS2 将与 D2 对于 AS3 与 D3.

当我记录，它显示。

ActiveCell.FormulaR1C1 = COUNTIF(ee_lkp!R[-143]C[-44]:R[217]C[-44],R[-143]C[-41])"

这是在工作，但只是在情况下，有对ee_lpk页相同的数量或行是什么变化从一天到一天。

任何帮助将是非常感激的。

马丁

Answer 1

你需要使用变量来分解这个问题。试试这样的方法。

sub Answer()

Dim srcRng as Range
Dim srcLength as Long

'First find how many rows on sheet ee_lpk and store it as a variable
srcLength = Sheets("ee_lkp").UsedRange.Rows.Count

'Then use that variable to get your range
Set srcRng = Range(Cells(2,1), Cells(srcLength, 1))
'Or another viable option would be:
'Set srcRng = Range("A2:A" & srcLength)

'Then put that in your Countif formula
ActiveCell.FormulaR1C1 = _
   "=COUNTIF(ee_lkp!" & srcRng.Address(True, True, xlR1C1) & ", R[-143]C[-41])

End Sub