FoxClub Forums > Visual Foxpro, Foxpro for DOS

• Войти

Excel-отчёт
AlexUF Автор	AlexUF 04.04.05 13:46:34 Уважаемые дамы и господа! Подскажите может кто сталкивался. Создаю в екселе 3 файла отчёта, после программно сливаю их в один новый, а старые удаляю. Программа работает на 10 машинах, а на одной пишет что Workbooks не является объектом. Пробовал все офисы (2000,XP,2003). Может кто сталкивался? Заранее спасибо.

AlexUF
Автор

AlexUF

04.04.05 13:46:34

Уважаемые дамы и господа!
Подскажите может кто сталкивался. Создаю в екселе 3 файла отчёта, после программно сливаю их в один новый, а старые удаляю. Программа работает на 10 машинах, а на одной пишет что Workbooks не является объектом. Пробовал все офисы (2000,XP,2003). Может кто сталкивался?
Заранее спасибо.

Re: Excel-отчёт
vlad Сообщений: 850 Откуда: Запорожье Дата регистрации: 28.09.2000	vlad 04.04.05 13:56:50 на глючной машине переустанови офис

Re: Excel-отчёт
AlexUF Автор	AlexUF 04.04.05 13:59:03 Уже 4 раза переустанавливал менял 2000, ХР, 2003 не помогло. Единственное систему не менял (там много программ других стоит, а служба не в нашем отделе без разрешения нельзя).

Re: Excel-отчёт
vlad Сообщений: 850 Откуда: Запорожье Дата регистрации: 28.09.2000	vlad 04.04.05 14:02:04 а как идет обращение: _oWord.WorkBooks? если да , то попробуй _oWord.Application.WorkBooks

Re: Excel-отчёт
AlexUF Автор	AlexUF 04.04.05 14:12:05 Нет я работаю с Excel, а так пробовал уже оба варианта. Ошибка в следующей строке .Sheets("Лист1").Move(.workbooks("Протокол")) Синтаксис примерный. И вот в этой строке он ругается на Workbooks. Замечу этот глюк только на одной машине, на остальных работает идеально. Пробовал за место Move вставлять Copy и Cut эфект тот же.

Re: Excel-отчёт

AlexUF
Автор

AlexUF

04.04.05 14:12:05

Нет я работаю с Excel, а так пробовал уже оба варианта.
Ошибка в следующей строке
.Sheets("Лист1").Move(.workbooks("Протокол"))
Синтаксис примерный. И вот в этой строке он ругается на Workbooks. Замечу этот глюк только на одной машине, на остальных работает идеально. Пробовал за место Move вставлять Copy и Cut эфект тот же.

Re: Excel-отчёт
Петров Андрей Сообщений: 2506 Откуда: Химки (М.О.) Дата регистрации: 17.04.2002	Петров Андрей 04.04.05 14:35:15 Пробуй без WITH. У меня такое было с ActiveChart в Excel... ------------------ PS Недочитал тему до конца...

Re: Excel-отчёт
vlad Сообщений: 850 Откуда: Запорожье Дата регистрации: 28.09.2000	vlad 04.04.05 14:39:36 Цитата: Нет я работаю с Excel очепятка, понятно, что excel но сути дела это не меняет, попробуй добраться до WorkBooks через Application да, вот еще: Цитата: .Sheets("Лист1").Move(.workbooks("Протокол")) после workbooks("Протокол") по идее должно идти что-то типа .Sheets("Лист1").Move(.workbooks("Протокол").Sheets(1))

Re: Excel-отчёт

vlad

Сообщений: 850
Откуда: Запорожье
Дата регистрации: 28.09.2000

vlad

04.04.05 14:39:36

Цитата:
Нет я работаю с Excel

очепятка, понятно, что excel

но сути дела это не меняет, попробуй добраться до WorkBooks через Application

да, вот еще:

Цитата:
.Sheets("Лист1").Move(.workbooks("Протокол"))

после workbooks("Протокол") по идее должно идти что-то типа .Sheets("Лист1").Move(.workbooks("Протокол").Sheets(1))

Re: Excel-отчёт
AlexUF Автор Сообщений: 60 Откуда: Саров Дата регистрации: 04.04.2005	AlexUF 04.04.05 14:50:41 Именно такой синтаксис и у меня. .Sheets("Лист1").Move(.workbooks("Протокол").Sheets(1)) Я ещё пробовал вставлять ЛИСТ до и после -- это делу успех не принесло. Вот что делать сам ума не приложу. Есть какой нибудь альтернативный вариант вставки листа из другой рабочей книги?

Re: Excel-отчёт

AlexUF
Автор

Сообщений: 60
Откуда: Саров
Дата регистрации: 04.04.2005

AlexUF

04.04.05 14:50:41

Именно такой синтаксис и у меня.
.Sheets("Лист1").Move(.workbooks("Протокол").Sheets(1))
Я ещё пробовал вставлять ЛИСТ до и после -- это делу успех не принесло. Вот что делать сам ума не приложу. Есть какой нибудь альтернативный вариант вставки листа из другой рабочей книги?

Re: Excel-отчёт
vlad Сообщений: 850 Откуда: Запорожье Дата регистрации: 28.09.2000	vlad 04.04.05 15:00:43 Цитата: альтернативный вариант вставки листа из другой рабочей книги? не заморачивайся... создай лист и copy&paste програмно.

Re: Excel-отчёт
AlexUF Автор Сообщений: 60 Откуда: Саров Дата регистрации: 04.04.2005	AlexUF 04.04.05 15:04:05 Попробую. Спасибо всем кто учавствовал в разговоре (тему не считаю закрытой). А варианты Копирования вставки не работают. Огромное всем спасибо, постараюсь найти другой способ или буду править существующий.

Re: Excel-отчёт

AlexUF
Автор

Сообщений: 60
Откуда: Саров
Дата регистрации: 04.04.2005

AlexUF

04.04.05 15:04:05

Попробую.
Спасибо всем кто учавствовал в разговоре (тему не считаю закрытой).
А варианты Копирования вставки не работают.

Огромное всем спасибо, постараюсь найти другой способ или буду править существующий.

Re: Excel-отчёт
Igor Korolyov Сообщений: 34580 Дата регистрации: 28.05.2002	Igor Korolyov 04.04.05 16:14:01 Hi AlexUF! К сведению, у меня массу вопросов вызывал "ОфисГад" от Кошмарского (AVP потом KAV нескольких версий) - после того как я это г... искоренил, проблемы исчезли... Видать он мои попытки работы с Workbook-ами (а делал я банальнейший Workbook.Add если склероз не изменяет) считал происками злобного вируса ------------------ WBR, Igor

Re: Excel-отчёт

Igor Korolyov

Сообщений: 34580
Дата регистрации: 28.05.2002

Igor Korolyov

04.04.05 16:14:01

Hi AlexUF!

К сведению, у меня массу вопросов вызывал "ОфисГад" от Кошмарского (AVP
потом KAV нескольких версий) - после того как я это г... искоренил, проблемы
исчезли... Видать он мои попытки работы с Workbook-ами (а делал я
банальнейший Workbook.Add если склероз не изменяет) считал происками
злобного вируса

------------------
WBR, Igor

Re: Excel-отчёт
Naomi Сообщений: 1796 Дата регистрации: 09.10.2003	Naomi 04.04.05 16:22:25 Could it be a Russian "List" causing a problem? Just a SWAG.

Re: Excel-отчёт
AlexUF Автор Сообщений: 60 Откуда: Саров Дата регистрации: 04.04.2005	AlexUF 04.04.05 21:04:02 Нет на вирусы я проверял машину чистая. Дело всё в работе с несколькими рабочими книгами одновременно. На данной машине если создавать книгу со всеми листами всё работает изумительно, но если создавать файлы по отдельности, а потом сливать их в один лезут дикие глюки что книга не является объектом

Re: Excel-отчёт

AlexUF
Автор

Сообщений: 60
Откуда: Саров
Дата регистрации: 04.04.2005

AlexUF

04.04.05 21:04:02

Нет на вирусы я проверял машину чистая.
Дело всё в работе с несколькими рабочими книгами одновременно. На данной машине если создавать книгу со всеми листами всё работает изумительно, но если создавать файлы по отдельности, а потом сливать их в один лезут дикие глюки что книга не является объектом

Re: Excel-отчёт
AlexUF Автор Сообщений: 60 Откуда: Саров Дата регистрации: 04.04.2005	AlexUF 04.04.05 21:04:58 Я пробовал и с английскими названиями листов та же петрушка.

Re: Excel-отчёт
Игорь Гончаров Сообщений: 13 Дата регистрации: 05.02.2005	Игорь Гончаров 04.04.05 21:51:46 Если установлен Officeguard, то на 99% проблема в нем. Нужно установить минимальный уровень защиты.

Re: Excel-отчёт
Igor Korolyov Сообщений: 34580 Дата регистрации: 28.05.2002	Igor Korolyov 05.04.05 00:00:34 Hi Nadya_N! Кстати, чтобы не было недомолвок, вот какой код я использую для копирования целиком листа из одной книги в другую: *m.loXl это соответственно Excel.Application m.loXl.Workbooks.Open(m.lcFile2) m.loXl.Workbooks(2).Sheets(1).Copy(.NULL., m.loXl.Workbooks(1).Sheets(1)) Поскольку я ВСЕГДА работаю в совершенно свежем и никем не пользуемом экземпляре Excel-я, то могу обращаться по индексам в книжкам. В принципе если имена книжек известны, то обращения по именам тоже не должны вызывать вопросов... А вот Sheet переименовать - это никогда не помешает Не люблю когда остаются "Лист1" и т.п. некрасиво это. ------------------ WBR, Igor

Re: Excel-отчёт

Igor Korolyov

Сообщений: 34580
Дата регистрации: 28.05.2002

Igor Korolyov

05.04.05 00:00:34

Hi Nadya_N!

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


*m.loXl это соответственно Excel.Application
m.loXl.Workbooks.Open(m.lcFile2)
m.loXl.Workbooks(2).Sheets(1).Copy(.NULL., m.loXl.Workbooks(1).Sheets(1))

Поскольку я ВСЕГДА работаю в совершенно свежем и никем не пользуемом экземпляре Excel-я, то могу обращаться по индексам в книжкам. В принципе если имена книжек известны, то обращения по именам тоже не должны вызывать вопросов... А вот Sheet переименовать - это никогда не помешает

Не люблю когда остаются "Лист1" и т.п. некрасиво это.

------------------
WBR, Igor

Re: Excel-отчёт
AlexUF Автор Сообщений: 60 Откуда: Саров Дата регистрации: 04.04.2005	AlexUF 05.04.05 04:17:54 Спасибо! Попробую применить всё выше изложенное, если не пройдёт то вечером выложу код данного куска программы, может по нему будет ясно где собака зарыта.

:: Список Форумов•Список тем•Поиск•Войти

Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 15 (Гостей: 15)