Public oCNN As New ADODB.Connection Public oRST As New ADODB.Recordset Public oRSTemp As ADODB.Recordset Public iLastRow As Long, iLastCol As Long 'ThisWorkBook模块 Private Sub Workbook_Open() oCNN.Open "Provider=Microsoft.Jet.OLEDB.4.0;" "Data Source=" ThisWorkbook.Pa ...