excel - 将 Excel 数据连接指定为只读

Question

我有一个 Excel 文件，其中包含与其他几个报告引用的另一个 Excel 源的数据连接。数据连接应该是只读的，但我似乎无法设置属性来这样做 - 每当源文件在其他地方打开时，数据连接都会尝试以读写方式打开源。我尝试输入ReadOnly=0、ReadOnly=TRUE和ReadOnly=1，但似乎没有任何效果。

当源文件打开时，它似乎中断了我作为计时器执行的宏。我的数据连接的连接字符串是（带有替换路径）：

DSN=Excel Files;DBQ="Source File Path";DefaultDir="Directory Path";DriverId=1046;MaxBufferSize=2048;PageTimeout=5;

Answer 1

我将工作簿从源代码复制到我使用它们的工作簿中。为此，我使用以下代码（使用ReadOnly:=True）：

'Open workbook
Application.DisplayAlerts = False
Application.EnableEvents = False
Workbooks.Open ("location"), UpdateLinks:=0, ReadOnly:=True

'Copy worksheet
Workbooks(sourceWorkbook).Worksheets(sourceSheet).Copy _
 after:=Workbooks(destinationWorkbook).Worksheets(Workbooks(destinationWorkbook).Worksheets.Count)

'Close source workbook      
Workbooks(sourceWorkbook).Close
Application.EnableEvents = True
Application.DisplayAlerts = True

希望有帮助