使用VBA引用范围中的单元格

Question

我正在使用VBA编写Excel宏，我有一个输入框让用户选择“任务”。然后为整行分配变量“myCell”。然后使用“myCell”，在该范围内为“SST”分配单元格“F”的值。我是编码的新手，所以我有点卡住了。到目前为止的代码如下：

Dim SST As Range
Dim myCell As Range
Dim Task As Range

Sheets("Sheets1").Activate
Set myCell = Application.InputBox(prompt:="Select a task", Type:=8)
Set Task = myCell.EntireRow

SST = Sheets("Sheet1").Range(Task).Cells(0, 6).Value

我也尝试过：

SST = Range("F" & Task).Value

似乎都没有用。如果你能提供帮助，那就太好了！

Answer 1

您已将SST声明为Range，因此正确的语法将是（因为Task已经定义为范围本身）

Set SST = Task.Cells(6)

如果您希望为其分配值，则将声明更改为Variant（或其他）并使用

SST = Task.Cells(6).value