VBA Excel字符串数据类型变量赋值

Question

我正在尝试为下面定义的CurrentClient变量设置一个值，然后用它来计算它在一个范围内出现的次数。我不知道我在这里做错了什么。它给了我错误：＆＃34;运行时错误9下标超出范围＆＃34;在步骤中，它将Sheet 2单元格A2中的值分配给Currentclient。

请帮忙。

Sub GetValue()

Dim ClientCnt As Integer
Dim CurrentClient As String

CurrentClient = Sheets("Sheet 2").Range("A2").Text

ClientCnt = Application.WorksheetFunction.CountIf(Range("A:A"), CurrentClient)

End Sub

Answer 1

使用 Sheet2

而不是

第2页