Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Office Новый топик    Ответить
 excel как база данных  [new]
muk07
Member

Откуда: Челябинск
Сообщений: 1754
Нужно обращаться к книге excel как к базе данных.
32bit драйверы ODBC не работают на моей 64bit WIN7.
Следовательно, нужен office x64.
Как я понял - это начиная с 2013? - это 1й вопрос.
инет пугает возможностями несовместимости, а у меня на работе всюду office 2007.
Посоветуйте пжста правильную линию поведения.
10 сен 17, 08:52    [20784445]     Ответить | Цитировать Сообщить модератору
 Re: excel как база данных  [new]
muk07
Member

Откуда: Челябинск
Сообщений: 1754
Установил 64 битн офис 2010 и эта проблема пропала. Возникла следующая:
Sub main()

' обращение к Excel
    Dim i As Integer
    Dim v As Variant
    Dim s As String
    
    OpenExcelDB 'ADO connection ExcelConn is open - выполняется успешно
    Dim Sql As String
    Dim rs As Object
    
    '---Run the SQL SELECT Query---
    Sql = "select Topic_ID,SubjName,TopicNumb,TopicName from [sheet1$] order by Topic_ID"
    Dim L As Long
    
    Set rs = ExcelConn.Execute(Sql, L, adCmdText) ' ВОТ ЗДЕСЬ СООБЩЕНИЕ -2147217904 - не все параметры заданы
    Dim output As String
    Do
       output = output & rs(0) & ";" & rs(1) & ";" & rs(2) & vbNewLine
       Debug.Print rs(0); ";" & rs(1) & ";" & rs(2)
       rs.MoveNext
    Loop Until rs.EOF
 End Sub

В операторе
Set rs=ExcelConn.Execute...' СООБЩЕНИЕ -2147217904 - не все параметры заданы
10 сен 17, 16:12    [20784874]     Ответить | Цитировать Сообщить модератору
 Re: excel как база данных  [new]
muk07
Member

Откуда: Челябинск
Сообщений: 1754
со всем разобрался
11 сен 17, 07:22    [20785587]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Office Ответить