好,我傻 经过一番修补后,事实证明
Set Cn = New ADODB.Connection
With Cn
.Provider = "Microsoft.ACE.OLEDB.12.0"
.CursorLocation = adUseClient
.Open MyConn
End With
循环外的位使其更快。
VBA将许多记录快速插入Access DB
好,我傻 经过一番修补后,事实证明
Set Cn = New ADODB.Connection
With Cn
.Provider = "Microsoft.ACE.OLEDB.12.0"
.CursorLocation = adUseClient
.Open MyConn
End With
循环外的位使其更快。