ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Подскажите по работе с Excel
12 сообщений из 12, страница 1 из 1
Подскажите по работе с Excel
    #35305964
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexusXXX
Участник
Суть вопроса вот в чем, хочу организовать печать Excel таблицы в фоне, есть шаблон
я его открываю добовляю что надо, затем вывожу на печать. Все нормально печать идет, вот
только когда закрываю книгу появляется окно сохранить измнения, мне оно нафиг не надо.
Как от него избавится или как напечать в фоне, чтоб после печати в процессах не висел Excel.
Если не закрывать книгу m.loExcel.Workbooks(book).close то release loExcel не отрабатывет и Excel
висит в процессах.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
loExcel=CREATEOBJECT("EXCEL.Application")
book = m.loExcel.Workbooks.Open("c:\temp\ex.xls").name
loSheet = m.loExcel.Sheets( 1 )

m.loSheet.Cells( 2 , 2 ).Value = "Проба блин"
m.loSheet.PrintOut

m.loExcel.Workbooks(book).close
*loExcel.Visible= .T.
*loExcel.Application.WindowState =  2 
release loExcel

Спасибо.
...
Рейтинг: 0 / 0
12.05.2008, 11:47
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306046
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexusXXX
Участник
И еще вопрос по теме а как добавть строку в опеределенное место?
...
Рейтинг: 0 / 0
12.05.2008, 12:09
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306054
CTAC-KO
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
CTAC-KO
Участник
не поленитесь и воспользуйтесь поиском на этом форуме - эта тема уже неоднократно обсуждалась. я сам задавался теми же вопросами когда-то и нашел, но сейчас перешел на ОО.
...
Рейтинг: 0 / 0
12.05.2008, 12:11
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306081
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexusXXX
Участник
Да искал, не могу понять как процесс убить.
...
Рейтинг: 0 / 0
12.05.2008, 12:19
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306119
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
lexusXXXДа искал, не могу понять как процесс убить.
См. метод Экселя Quit и свойство DisplayAlerts
...
Рейтинг: 0 / 0
12.05.2008, 12:29
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306145
проходящий.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проходящий.
Гость
lexusXXXДа искал, не могу понять как процесс убить.
Надо не убийствами заниматься, а сохранять измененные книги и корректно выходить из Excel. Наводки уже дали.
...
Рейтинг: 0 / 0
12.05.2008, 12:36
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306153
AlexTal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexTal
Гость
book.close
...
Рейтинг: 0 / 0
12.05.2008, 12:38
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306155
Sovereign
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sovereign
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
loExcel=CREATEOBJECT("EXCEL.Application")
book = m.loExcel.Workbooks.Open("c:\temp\ex.xls").name
loSheet = m.loExcel.Sheets( 1 )

m.loSheet.Cells( 2 , 2 ).Value = "Проба блин"
m.loSheet.PrintOut

m.loExcel.ActiveWorkbook.SaveAs("ex.xls"',xlExcel9795,,,.F.,.F.) && сохраняем данные

m.loExcel.Workbooks(book).close
*loExcel.Visible= .T.
*loExcel.Application.WindowState =  2 
release loExcel
...
Рейтинг: 0 / 0
12.05.2008, 12:38
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306166
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexusXXX
Участник
AlexTal Спасибо!
И всем остальным тоже спасибо!

loExcel.DisplayAlerts = .F.
loExcel.Quit
release loExcel

все гуд!!! А изменения мне сохранять не надо.
...
Рейтинг: 0 / 0
12.05.2008, 12:41
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306236
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexusXXX
Участник
Подскажите по инсерту строки
вот так на VB
Код: plaintext
1.
2.
Range("B6").Select
Selection.EntireRow.Insert
а как в фоксе будет?
Код: plaintext
1.
2.
3.
m.loSheet.Cells( 6 , 2 ).Select()
* дальше не знаю, так не работает
m.loSheet.Selection.EntireRow.Insert
это к выше указанному коду
...
Рейтинг: 0 / 0
12.05.2008, 13:03
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306245
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
lexusXXXПодскажите по инсерту строки
вот так на VB
Код: plaintext
1.
2.
Range("B6").Select
Selection.EntireRow.Insert
а как в фоксе будет?
Код: plaintext
1.
2.
3.
m.loSheet.Cells( 6 , 2 ).Select()
* дальше не знаю, так не работает
m.loSheet.Selection.EntireRow.Insert
это к выше указанному коду
Код: plaintext
m.loSheet.Cells( 6 , 2 ).EntireRow.Insert
...
Рейтинг: 0 / 0
12.05.2008, 13:05
| Ответить | Цитировать | Написать  
Подскажите по работе с Excel
    #35306278
lexusXXX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lexusXXX
Участник
AleksMed спасибо все работает!!!
...
Рейтинг: 0 / 0
12.05.2008, 13:13
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Подскажите по работе с Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=35306155&tid=1587798]:
 0ms
get settings:
 12ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 28ms
get topic data:
 8ms
get forum data:
 3ms
get page messages:
 42ms
get tp. blocked users:
 1ms
others: 259ms
total:  373ms
созд. / загр.: 373ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]