从单元到VBA取值

Question

我在使用Range.Value / Value2 / Text时遇到问题

例如： 单元格A1包含IF公式，结果=第2周

在我的VBA中，我想根据A1中包含的Week进行循环

所以我的代码如下：

Dim a as Integer
If (Range("A1").Text = "Week 2") Then
    a = 4
End if

使用.text或.value或.value2不会返回任何内容。所以变量a等于零

您知道如何采用此值吗？

Answer 1

如@Brotato所说，明确定义范围（例如）：

Option Explicit

Public Sub CheckA1()

    If ActiveWorkbook.Worksheets("Sheet1").Range("A1").Value = "Week 2" Then
        MsgBox "It is Week 2"
    End If

End Sub

会导致...