Добрый день!
Столкнулся с проблемкой.....

макрос не хочет выполнять выгрузку, если в скрипте есть ";".
цыклом загоняю скрипт с листа
SQLquery = ""
i = 1
Do While WB.Worksheets("SQL").Range("A" & i).Value <> ""
SQLquery = SQLquery + WB.Worksheets("SQL").Range("A" & i).Value + vbNewLine
i = i + 1
Loop

открываю...
objRst.Open SQLquery, objCon

выбивает ошибку.
вот сам скрипт
DROP Table IF EXISTS BVB_b;
CREATE TEMPORARY TABLE BVB_b
select *
from contract
where customer_id = 25

если взять только так
select *
from contract
where customer_id = 25
выгружает без проблем

буду благодарен за помощь!

скукотища,для автоматизации отчетности.
А как научить его выполнять весь скрипт?

alex564657498765453,
выход всегда есть))


' цыкл последовательного запуска многих запросов
i = 0
j = 1
Do While j <= 4
i = i + 1
SQLquery = ""
Do While WB.Worksheets("SQL").Range("A" & i).Value <> ""
SQLquery = SQLquery + WB.Worksheets("SQL").Range("A" & i).Value + vbNewLine
i = i + 1
Loop
objRst.Open SQLquery, objCon
j = j + 1

Loop