使用另一个工作簿中的值设置活动单元格

时间:2013-06-11 20:55:30

标签: vba

我需要在当前工作表的B列的第一个空单元格中放置一个值。 必须从使用绝对路径标识的另一个工作簿中读取该值。

这是我的不工作尝试:

Sub Macro1()
    Range("B1").Select
    Do While Not IsEmpty(ActiveCell)
        ActiveCell.Offset(1, 0).Select
    Loop
    ActiveCell.Value = "=[C:\Users\Manu...\Source.xlsx]Sheet1!A1"
End Sub

我在最后一行收到错误1004。 我怎么才能纠正? 如果可能的话,我宁愿不打开源工作簿。

1 个答案:

答案 0 :(得分:2)

我认为这是正确尝试编写公式(您尝试写入第一个空单元格):

ActiveCell.Value = "='C:\Users\Manuel\Desktop\[Source.xlsx]Sheet1'!A1"

查看single quotation markssquare brackets的位置。