我正在尝试将数据从现有的Excel文件导入到另一个文件。 当连接字符串和SQL查询来自变量时,我使用ADO函数。
查看示例:
Dim sql As String
sql = Sheets("DASYSTEM").Range("E12").Value
Dim DaSystemCon As ADODB.Connection
Dim DaData As ADODB.Recordset
Set DaSystemCon = New ADODB.Connection
Set DaData = New ADODB.Recordset
DaSystemCon.ConnectionString = Trim(Sheets("DASYSTEM").Range("E11").Value)
DaSystemCon.Open
With DaData
.ActiveConnection = DaSystemCon
.Source = sql
.LockType = adLockReadOnly
.CursorType = adOpenForwardOnly
.Open
End With
从文件X运行的函数将数据导入到同一文件(文件X),并从文件Y导入数据。 这两个文件都在网络上(Windows服务器)。
当网络上的其他用户打开Y文件并且另一个用户尝试在X文件中执行该功能时,在运行期间会打开Y文件。 如果其他用户未打开Y文件,则从X文件运行的导入将在后台执行,并且不会打开Y文件。
如何避免这种情况? 我的意思是,无论如何,我如何导致该程序不打开Y文件,即使该文件是由网络上的另一个用户打开的也是如此。 谢谢