excel - 在链接到访问表（并打开）时编辑 Excel 工作表

Question

我有 2 个 excel 工作簿，主要和备份。

每隔一段时间就会从 Main 运行一个宏，将一行数据传输到 Backup。这两个工作簿都包含完全相同的表。

我有一个直接链接到备份中的表的访问数据库，因此我可以查看我的访问数据库中的数据。

但是，如果我的访问数据库已打开（或意外打开），则从 Main 到 Backup excel 工作簿的宏不起作用，因为它只能以“只读”的形式打开。

有没有办法解决这个问题？主要的 excel 工作簿由用户 24/7 开放，这就是为什么我想出了第二个 excel 工作簿作为“中间人”，它只是短暂打开以插入数据。当然，如果同时这会导致问题有数据试图传输。主工作簿受到保护，但备份工作簿不受保护。

我已经在备份工作簿上尝试了“允许多个用户进行更改”。我开始认为这是我在我的主 excel 工作簿中的代码中“打开”工作簿的方式？

我的代码在下面，它基本上打开了 Backup excel 工作簿并将一行数据插入到单元格 A3-BL3 中。

Sub TransferData()


Application.ScreenUpdating = False
Dim wb As Workbook
Dim Reportwb As Workbook


Set Reportwb = Workbooks("Main.xlsm")


Set wb = Workbooks.Open(Filename:="C:\Users\yilmadu001\Desktop\Backup.xlsx")


Reportwb.Sheets("Data1").Range("A4:BL4").Copy
wb.Sheets("DATA").Range("A3:BL3").Insert Shift:=xlDown
Reportwb.Save
wb.Close True


Application.ScreenUpdating = True
End Sub

任何帮助表示赞赏，谢谢。

标签： excelvba