... последовательно открываю файлы в которых QueryTable, обновляю данные (RefreshAll ), провожу некоторые ... . проблема в том, что в QueryTable стоит "фоновое обновление" ...

... ") = Worksheets("query").QueryTables.item(1).connection End sub ... to Worksheets("query").QueryTables.Count Worksheets("main" ... ;") = Worksheets("query").QueryTables.item(i).connection next i ...

Автор: Guest. Вообще эта функция отрабатывает в Access модуле, но запускается от объекта xlsSheet: Set xlSheet = xlBook.Worksheets(1) With xlSheet.QueryTables.Add(Connection:=Array ....... насколько я понимаю QueryTables - это реализация Excel'ской "Данные" -> "Импорт внешних данных".

Автор: anighr. {quote}{login=anighr}{date=12.11.2011 01:48}{thema=Re: выполнить SQL запрос без QueryTable}{post}одс файл{/post}{/quote}

... ("$A$7") _ ).QueryTable .CommandType = xlCmdSql .CommandText = ... ("$E$7") _ ).QueryTable .CommandType = xlCmdSql .CommandText = ... quot;$I$7") _ ).QueryTable .CommandType = xlCmdSql .CommandText = ... ("$AC$7") _ ).QueryTable .CommandType = xlCmdSql .CommandText = ... ("$AG$7") _ ).QueryTable .CommandType = xlCmdSql .CommandText = ...

... одного сайта пользовался стандартной функцией querytables.add. Макросом через поиск выбиралась ... . Есть ли способ использовать дальше querytables напрямую или подобная защита капитальна ... табличном формате, как это делал querytables? Если возможен, просьба прикинуть скрипт ... папку, а затем делается запрос querytables к этой сохраненной на локальном ...

... Recordset, потом в QueryTable, но на этапе формирования QueryTable вылезает ошибка 1004 ... на лист ошибок нет, проблемаименно QueryTable Прошу помощи! Код ниже: Sub ... Dim QT As New QueryTable Set QT = ActiveSheet.QueryTables.Add(rs, ActiveSheet ...

... не имеет отношения к объекту QueryTables и имеет какое-то отношение ... , камнем преткновения становится именно объект QueryTables. Система: ХР, Excel 2003. Следите ... использует для своей работы объект QueryTables. Вот его примерный код: Sub ... ... where ... order ..." With ActiveSheet.QueryTables.Add(Connection:=Connection_BD, Destination:=Range ...

... простенький код OLEDB для получения QueryTable - ExecuteSQL:Sub ExecuteSQL() 'http://analystcave ... , sConn As String, qt As QueryTable     SQL = InputBox("Provide your ... ;;"     Set qt = ActiveCell.Worksheet.QueryTables.Add(Connection:=sConn, Destination:=ActiveCell ...

... базой диапазон, то можно использовать QueryTable, а этот объект позволяет использовать ... CreateQTable создаёт новый лист с QueryTable, связанный с Sheet1, и выполняет ... кнопка, которая позволяет выполнить обновление QueryTable и перестроить SubTotal. Успехов.

... :fv2].Cells cell.Select: ActiveCell.QueryTable.Refresh BackgroundQuery:=True Next pi ... :fv5].Cells cell.Select: ActiveCell.QueryTable.Refresh BackgroundQuery:=True Next pi ... засада? Чую, что в ActiveCell.QueryTable.Refresh BackgroundQuery:=True, но....

... pCell As Range, pQTable As QueryTable Dim pDict As Object, pLObject ... = pCell.ListObject If Not pLObject.QueryTable Is Nothing Then Set pQTable ... = pLObject.QueryTable If Not pDict.Exists(pQTable ...

... readme.txt описал работу. Собственно QueryTable создяётся макросом Public Sub CreateConnection ... As String Dim pTable As QueryTable, pSheet As Worksheet sCon = " ... .Worksheets(2) Set pTable = pSheet.QueryTables.Add(sCon, pSheet.Range(" ...

... написал: куда подключение выводит результат (QueryTable или ListObject) "В 2016 ... с выводом результата на лист. QueryTables.Add или ListObjects.Add Пример ...