Конференция VBStreets

**kate158** » 08.03.2009 (Вс) 17:12

Помогите пожалуйста экспортировать отчет access в excel с форматированием!! Мучаюсь второй день. Может есть уже готовые исходники?Хэээлп!!! :oops:

**kate158** » 08.03.2009 (Вс) 17:32

ИМЕЕТСЯ ИСХОДНИК
ругатся на строку

Код: Выделить всё: Set rs = CurrentDb.OpenRecordset("SELECT Excel_Column FROM Excel_Column_Row GROUP BY Excel_Column ORDER BY Excel_Column", dbOpenSnapshot) rs.MoveLast

не вижу в чем ошибка

**Хакер** » 08.03.2009 (Вс) 19:29

Кейт, ругается на строку не для того, чтобы разозлить тебя, а для того, чтобы дать тебе (и нам) знать, в чём же дело.

Ты зря не обращаешь внимания на текст "ругания".

Во-вторых, если есть, что добавить, надо использовать кнопку [Правка], а не плодить новые сообщения. В следующий раз будет замечание.

**BION** » 08.03.2009 (Вс) 19:47

kate158 писал(а):ИМЕЕТСЯ ИСХОДНИК
ругатся на строку
Код: Выделить всё
Set rs = CurrentDb.OpenRecordset("SELECT Excel_Column FROM Excel_Column_Row GROUP BY Excel_Column ORDER BY Excel_Column", dbOpenSnapshot) rs.MoveLast

не вижу в чем ошибка

У тебя записей ноль возвращается, а ты гоняешь курсор взад и вперед. Делай проверку на кол-во записей в рэкордсэте после селекта.

**kate158** » 08.03.2009 (Вс) 20:58

Хакер,никто никого не злит. я просто ищу истину.
код не мой, поэтому пока это получается с трудом. плодить сообщения не буду. спасибо за ясные мысли. BION, буду править. :idea:

**arthur2** » 08.03.2009 (Вс) 21:23

kate158 писал(а):Хакер,никто никого не злит. я просто ищу истину.

Дело не в том, что кто-то кого-то злит. Просто для поиска истины не достаточно сказать, на какой строке бейсик ругается. А нужно ещё процитировать, какими именно словами он ругается

**kate158** » 08.03.2009 (Вс) 21:29

arthur2 "Текущая запись отсутствует"

**arthur2** » 09.03.2009 (Пн) 10:57

У тебя вызывается rs.MoveLast тогда, когда ты уже перебрал все записи - вероятно, так

Точнее, записей вообще нет.

BION писал(а):У тебя записей ноль возвращается, а ты гоняешь курсор взад и вперед.

Похоже, что твой исходник просто не полный. Например, нет определений для констант "msoLine..."

**alibek** » 09.03.2009 (Пн) 16:51

arthur2 писал(а):Похоже, что твой исходник просто не полный. Например, нет определений для констант "msoLine..."

А должны?
Это константы MS Officeю. Видимо просто исходник использовался в VBA.

**kate158** » 10.03.2009 (Вт) 15:24

есть полный и рабочий исходник. как только вставляю свои таблицы и заменяю в модуле название своего отчета, прога виснет. (

**RayShade** » 10.03.2009 (Вт) 15:27

А, ну так это защита от копирования срабатывает скорее всего

**kate158** » 10.03.2009 (Вт) 15:34

"Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут."
Если Вы много знаете, поделитесь знаниями со мной. Или киньте ссылку на нормальную книгу, богатую рассмотренным примером выше.

**Хакер** » 10.03.2009 (Вт) 15:36

kate158 писал(а):"Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут."

Там следом куда более значимая фраза есть.

**kate158** » 10.03.2009 (Вт) 15:50

Спасибо за помощь и поддержку. Если что, умерла от счастья.

Конференция VBStreets

экспорт отчетов access в excel

экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Re: экспорт отчетов access в excel

Кто сейчас на конференции