从另一个工作簿中获取价值，保持链接

Question

我正在尝试将值从工作簿复制到Excel中的另一个工作簿。事实是，我需要与其他工作簿的链接处于活动状态，因为它可以及时进行修改。

我已经使用VBA宏构建了一个代码，并且在该代码的一部分中，我构建了一个函数来进行读取，但是我是新手，不知道该执行该功能。我试过打开我想阅读并提取单元格的工作簿，但它只会复制值，而不复制链接。

Function NuevoMes(dir As String, fila As Integer) As Boolean

   Dim objWorkbook As Workbook
   Set objWorkbook = Workbooks.Open(dir)

   Cells(fila, 4) = objWorkbook.Worksheets("ENTRADAS DIARIAS").Cells(9, 267)

   objWorkbook.Close

End Function

我希望我所说的是将值复制到单元格中（确实如此），但是链接到值的来源方向（ dir ）

Answer 1

您需要的是另一个工作簿中的Cell的链接。

这可以通过 VBA 或仅通过使用公式来实现。

  

  

• 使用公式

  

如果您没有特殊的理由为此写Function，则可以通过更改路径，工作簿名称< / strong>和您的工作表名称：

Formula

---

  

  

• 使用函数

  

如果您需要='C:\myDir\[myWorkbook.xlsx]Sheet1'!A1 ，则可以使用以下内容：

Function

希望这会有所帮助。