Excel：如何编程让 Excel 读取单元格内容然后切换打开一个新工作表？

Question

我对编程非常陌生（1 天经验），我正在尝试构建一个交互式数据库，但我一直遇到某些部分工作的问题。

我希望 Excel 读取在某个单元格中选择的值，并根据该单元格中的值将其打开到单独的工作表，在那里我可以开始另一组数据输入。

我尝试了许多不同的选项，但到目前为止，我的代码如下所示：

Dim inputWks As Worksheet
Set inputWks = ("Input")

With inputWks
    If Range("D13").contents = "Yes" Then
        ActiveWorkbook.Sheets("Sheets2").activate
    End If
End With

我知道这是一个简单的问题，但我无法完成这项工作..

Answer 1

试试这个

Sub DoIt()
    Dim inputWks As Worksheet
    Set inputWks = ActiveWorkbook.Sheets("Input")

    With inputWks
        If Range("D13").Cells(1, 1) = "Yes" Then
           ActiveWorkbook.Sheets("Sheets2").Activate
        End If 
    End With 
End Sub