Получаю данные из закрытой книги:
Вопрос: как обратиться не к листу "Результат", а к листу, который был бы активен если бы книгу отрыли?
Ведь ексел запоминает при закрытии активный лист и при открытии открывае его
| Код |
|---|
Set rs = CreateObject("ADODB.Recordset")
Set cn = CreateObject("ADODB.Connection")
With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=C:\ПРТ1.xls;" & "Extended Properties=Excel 8.0;"
.Open
End With
sCon = "select * from [Результат$]"
Set rs = cn.Execute(sCon)
[a2].CopyFromRecordset rs |
Ведь ексел запоминает при закрытии активный лист и при открытии открывае его
