Question

我正在尝试创建一个宏，该宏链接另一个工作表中的单元格（此表存储为名为SheetName的变量）。提示用户输入框选择一个单元格。我想在另一个工作表引用的选定单元格中有一个单元格。

以下是相关代码：

Dim WorkRng As Range
    Total1 = "Select Total cell"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", Total1, WorkRng.Address, Type:=8)
    Worksheets("WorksheetA").Range("C6").formula = "=" & 'SheetName.Name' & "!" & WorkRng.Address

最后一行是我遇到对象错误的地方。任何帮助将不胜感激！

Answer 1

尝试

Worksheets("WorksheetA").Range("C6").formula = _
   "='" & SheetName.Name & "'!" & WorkRng.Address

'请在此处引号“ ='”和此处“'！”

Answer 2

在何处定义工作表名称？然后需要将其串联到字符串中

DIm SheetName As Worksheet
Set SheetName = Worksheets("Sheet2")

然后公式

"=" & SheetName.Name  & "!" & [A1:B2].Address

Excel VBA：引用另一个工作表中单元格的公式（变量）

2 个答案: