VBA，每天在公式中更新到其他工作簿的鏈接

Question

我對VBA編程非常陌生，並遇到了問題。

我有一個稱為流動性預測的基本文件，其中填充了其他文檔中的數據。收集數據的文檔每天都在更新，因此名稱中的日期每天都在變化。

名稱為“（（Date，“ YYMMDD”）＆“ SE_Laizy.xlsx”，因此示例為160229SE_Laizy.xlsx

當我收集數據時，我使用索引匹配公式。 我的問題是嘗試通過使用日期值來更新公式中的鏈接。

目前我是這樣寫的

ActiveCell.Range((Cells(1, 1)), (Cells(1, 1))).FormulaR1C1 = _
    "=INDEX('[" & Format(Date, "YYMMDD") &  "SE_Laizy.xlsx"]Visa'!R1:R1048576,MATCH(R2C,'[" & Format(Date, "YYMMDD") & "SE_Laizy.xlsx"]Visa'!C1,0),MATCH(""Ub perioden"",'[" & Format(Date, "YYMMDD") & "SE_Laizy.xlsx"]Visa'!R2,0))"

我從中得到的只是一個不適用。 任何幫助，將不勝感激！

Answer 1

我添加了一個父工作表引用，並將INDEX和MATCH函數分為三個主要部分。

With Worksheets("Sheet2")
    .Cells(1, 1).FormulaR1C1 = _
        "=INDEX('[" & Format(Date, "YYMMDD") & "SE_Laizy.xlsx]Visa'!C1:C16384, " & _
            "MATCH(R2C,'[" & Format(Date, "YYMMDD") & "SE_Laizy.xlsx]Visa'!C1, 0), " & _
            "MATCH(""Ub perioden"", '[" & Format(Date, "YYMMDD") & "SE_Laizy.xlsx]Visa'!R2, 0))"
End With

如上所述，外部工作簿名稱中的引號放錯了位置。 我不確定如何處理您的Range對象定義。 出於所有意圖和目的，提供的內容僅會分解為[A1]。