VBA代码 ADO对象2025年3月18日 09:58
Dim cnn as object,rs as object
Set cnn = CreateObject("adodb.connection")
Set cnn = CreateObject("adodb.connection"): mybook = ThisWorkbook.FullName
cnn.Open "Provider = Microsoft.Jet.Oledb.4.0;Extended Properties =Excel 8.0;Data Source =" & mybook
全部回复（0）