excel - 如何将范围值更改为单元格值？

Question

我有一个功能：

=COUNTIF(Data!$V$6:$V$1029;Analyse_ALL!C7)

目前我需要手动输入“1029”（列中包含单元格值的最后一行）。我制作了一个计算最后一行的vba函数，并将结果写入一个单元格。

如何将我的 vba 结果/单元格值带入我的函数？

提前致谢！

Answer 1

1. 您可以让 VBA 为您编写完整的公式，而不仅仅是 1029：

   Range("**Coordinates of the formula**").Formula = "=COUNTIF(Data!$V$6:$V$"& **originalVBAresult** & ";Analyse_ALL!C7)"

2. 您可以在 COUNTIF 中有一个 OFFSET，它链接到您将 1029 写入的单元格：

   =COUNTIF(OFFSET(Data!$V$6;0;0;**Cell with 1029 in it**);Analyse_ALL!C7)

Answer 2

你可以使用这样的东西

1. 检测Sheet中V列中最后使用的行Data
2. 如果该行超过 6，则将此公式添加到A1, =COUNTIF(Data!$V$6:$VX;Analyse_ALL!C7)（其中X是步骤 1 的最后一行）

代码

Sub InsertFormula()
Dim rng1 As Range
Set rng1 = Sheets("Data").Cells(Rows.Count, "V").End(xlUp)
If rng1.Row > 6 Then
[a1].FormulaR1C1 = "=COUNTIF(Data!R6C22:R" & rng1.Row & "C22,Analyse_ALL!R7C3)"
End If
End Sub