Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Создание SQL-представления
 
Код, естественно, урезан. Далее идёт объединение с другими таблицами, часть данных убирается, группируется и т. д., короче необходимо работать именно с данными, полученными из запроса.
Создание SQL-представления
 
Пытаюсь создать SQL-представление следующим образом:
Код
Sub trade_balances2()  
  
Set cn = CreateObject("ADODB.Connection")  
  
With cn  
  
    .Provider = "Microsoft.Jet.OLEDB.4.0"  
    .ConnectionString = "Data Source=" & ThisWorkbook.Sheets("База").Cells(2, 2) & ";Extended Properties=dBase IV"  
    .Open  
      
    Set rs = .Execute("CREATE VIEW terp AS " & _  
    "SELECT D_VAGON.NP_VAGD as hred FROM D_VAGON")  
  
    ThisWorkbook.Sheets("Процесс2").Cells.ClearContents  
      
    ThisWorkbook.Sheets("Процесс2").Cells(1, 1).CopyFromRecordset rs  
      
    .Close  
      
End With  
  
End Sub


При запуске выдаётся ошибка «Операция не поддерживается для объектов этого типа». Как же создавать SQL-представления на VBA в Excel?
Страницы: 1
Наверх