Excel VBA:引用其他工作表中单元格的公式(变量)

Excel VBA:引用其他工作表中单元格的公式(变量),vba,excel,Vba,Excel,我试图创建一个宏,将另一个工作表中的单元格链接起来(该宏存储为一个名为SheetName的变量)。系统将使用输入框提示用户选择单元格。我希望在另一个工作表中有一个单元格引用所选单元格 以下是相关代码: Dim WorkRng As Range Total1 = "Select Total cell" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", Total1,

我试图创建一个宏,将另一个工作表中的单元格链接起来(该宏存储为一个名为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
最后一行是我遇到对象错误的地方。 非常感谢您的帮助

试试看

Worksheets("WorksheetA").Range("C6").formula = _
   "='" & SheetName.Name & "'!" & WorkRng.Address
'注意这里的引号“=”,这里的“!”

试试看

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

'注意这里的引号“=”,这里的“!”

sheetname是在哪里定义的?然后需要将其连接到字符串中

DIm SheetName As Worksheet
Set SheetName = Worksheets("Sheet2")
那么公式呢

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

sheetname在哪里定义?然后需要将其连接到字符串中

DIm SheetName As Worksheet
Set SheetName = Worksheets("Sheet2")
那么公式呢

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

外部包括工作表名称;事实上,它还包括工作簿名称和路径,如果不需要,Excel会将其蒸发掉。您可能正在复制工作表名称。啊。。。谢谢你让我知道。我在问我自己。应该已经做了一些快速的作业。外部包括工作表名称;事实上,它还包括工作簿名称和路径,如果不需要,Excel会将其蒸发掉。您可能正在复制工作表名称。啊。。。谢谢你让我知道。我在问我自己。我应该做些速成作业。