Question

我正在尝试使用一个宏，无论将其粘贴到何处，都将提取数字。我正在使用索引匹配从输入中提取这些。我已经成功地找到了想要的“地址”。如何获取引用单元中地址而不是单元本身的函数？

它就在我的舌尖上，令人发疯。当我放

Application.WorksheetFunction.Countif(Indirect(Address(5,9,True,"Sheet2")), Range("C1").Value)>0= True Then

存在功能错误。当我放入

Application.WorksheetFunction.Countif(Variable.Address(Extrenal:=True), Range("C1").Value)>0= True Then

存在不匹配错误

我尝试了Indirect（address（）），但是当我将它插入Index Match时，它表示存在错误。 Index(indirect(address()),Match(Ref,Indirect(Address),0))

我也一直试图在countif语句中使用该地址。

If Application.WorksheetFunction.Countif(Indirect(Address(5,9,True,"Sheet2")), Range("C1").Value)>0= True Then...

也是

(Index(indirect(address()),Match(Ref,Indirect(Address),0))

如上所述，我遇到了不匹配错误和功能错误。我将采取任何方法来解决这些问题。

Answer 1

感谢大家的投入。这就是我的想法。Dim SKU as Range;Dim SKUR as Range;Dim SKU1 as String;Dim Variable as String;Dim VariableR as Range;Set SKU = Worksheets("Sheets1").Range("A:AC").Find("Number");Set SKUR =SKU.EntireColumn;Variable - SKUR.Address(External:=True);SetVariableR=Range(Variable);SKU1=Application.WorksheetFunction.IfError(Application.WorksheetFunction.Index(VariableR,(Application.WorksheetFunction.Match((Range("C1").Value),VariableR,0)),0);Worksheets("Sheet2").Range("C5").Value = SKU1

同样，这就是我在VBA中使用找到的地址范围在索引匹配中使用的原因，由于某些原因，它不允许我在空格中加上空格，所以我使用半冒号分隔行，请把它们分开出来使用它时。

WorksheetFunction.Countif行未读取我的地址函数

1 个答案: