Excel VBA（将多个工作簿中的数据复制到主文件中）

Question

我在一个文件夹中有一个看起来像这样的大师。假设主表的文件路径是C：\ Users \ John \ OneDrive \ Desktop \ Test

然后每个月我都会在一个不同的文件夹中获得一个新的月度文件，文件路径为C：\ Users \ John \ OneDrive \ Desktop \ Test \ American Express，文件名将是日期（与主文件的列名称）。月度文件如下所示：

现在，我尝试抓取每月文件中以黄色突出显示的值的总和，并在每次将新月份保存在该文件夹时自动将其粘贴到主文件的右栏中。

非常感谢您的帮助

谢谢！

这是我的代码，但我收到错误＆＃34;下标超出范围＆＃34;。此外，我不知道如何告诉VBA在将新的月度文件保存在文件夹中时自动获取数据并将其数据粘贴到右栏下的主文件中

Sub AmericanEx()

Dim x As Workbook
Dim y As Workbook

'## Open both workbooks first:
Set x = Workbooks.Open("C:\Users\John\OneDrive\Desktop\Test\American 
Express\2018-02-28")
Set y = Workbooks.Open("C:\Users\John\OneDrive\Desktop\Test\Master file")

'Now, copy what you want from x:
x.Sheets("Monthly Sheet").Range("K26").Copy

'Now, paste to y worksheet:

y.Sheets("Master Sheet").Range("B6").PasteSpecial

'Close x:
x.Close

End Sub