Вопрос о oExcel.Quit

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Alp
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 08.08.2011 (Пн) 10:40

Вопрос о oExcel.Quit

Сообщение Alp » 08.08.2011 (Пн) 10:49

Простенький код на забытом VB6 ))) но любимом )))
Dim oExcel As Object
Dim oBook As Object
Dim oSheet As Object
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Open("C:\VCD\Book121.xls")
Set oSheet = oBook.Worksheets(1)
oSheet.Range("A5").Value = "500"
temp = oSheet.Range("B5").Value
'oBook.Save ("C:\VCD\Book121.xls")
oExcel.Quit
Вылетает msgbox с вопрос хотите ли вы сохранить файл C:\VCD\Book121.xls, три варианта ответа да нет и отмена.
Вопрос: Как сделать так чтобы этот мессидж не было видно и нажимался ответ ДА.
В гугле по oExcel.Quit вообще нет ни какого описания.
побывал oExcel.Quit(true) и кучу других глупых вариантов не помогает

Antonariy
Повелитель Internet Explorer
Повелитель Internet Explorer
Аватара пользователя
 
Сообщения: 4824
Зарегистрирован: 28.04.2005 (Чт) 14:33
Откуда: Мимо проходил

Re: Вопрос о oExcel.Quit

Сообщение Antonariy » 08.08.2011 (Пн) 11:12

Циничное нарушение правил + циничная ложь:
В гугле по oExcel.Quit вообще нет ни какого описания.

Сейчас кто-то будет цинично забанен.
Лучший способ понять что-то самому — объяснить это другому.

Alp
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 08.08.2011 (Пн) 10:40

Re: Вопрос о oExcel.Quit

Сообщение Alp » 08.08.2011 (Пн) 11:17

Строчка 'oBook.Save ("C:\VCD\Book121.xls")
это одна из попыток решить проблему
первоначально было oBook.SaveAs "C:\VCD\Book121.xls"
Но появлялся тот же меседж так что строчку oBook.SaveAs ("C:\VCD\Book121.xls") можно вообще убрать

Alp
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 08.08.2011 (Пн) 10:40

Re: Вопрос о oExcel.Quit

Сообщение Alp » 08.08.2011 (Пн) 11:19

А можно объяснить и обосновать в чем лож.

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16473
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Re: Вопрос о oExcel.Quit

Сообщение Хакер » 08.08.2011 (Пн) 11:20

[Хакер] :: Первое нарушение. Тема переносится в обычный раздел.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

Alp
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 08.08.2011 (Пн) 10:40

Re: Вопрос о oExcel.Quit

Сообщение Alp » 08.08.2011 (Пн) 11:24

Antonariy писал(а):Excel.Quit
Скинь ссылку обоснуй.

FireFenix
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1640
Зарегистрирован: 25.05.2007 (Пт) 10:24
Откуда: Mugen no Sora

Re: Вопрос о oExcel.Quit

Сообщение FireFenix » 08.08.2011 (Пн) 12:38

Alp писал(а):Quit

2ая строка в гугле http://msdn.microsoft.com/en-us/library/bb223560.aspx
там же пример с cохранением
Птицей Гермеса меня называют, свои крылья пожирая... сам себя я укрощаю
私はヘルメスの鳥 私は自らの羽根を喰らい 飼い慣らされる

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 08.08.2011 (Пн) 15:46

Alp писал(а):побывал oExcel.Quit(true) и кучу других глупых вариантов не помогает

Код: Выделить всё
objWord.Quit False ' Закрытие Word'а без сохранения, наверное, Excell'я - тоже
objDoc.Close False ' Завкрытие документа без сохранения

ger_kar
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1957
Зарегистрирован: 19.05.2011 (Чт) 19:23
Откуда: Кыргызстан, Иссык-Куль, г. Каракол

Re: Вопрос о oExcel.Quit

Сообщение ger_kar » 09.08.2011 (Вт) 21:26

Alp писал(а):Вылетает msgbox с вопрос хотите ли вы сохранить файл C:\VCD\Book121.xls, три варианта ответа да нет и отмена.Вопрос: Как сделать так чтобы этот мессидж не было видно и нажимался ответ ДА.
Т.е. насколько я понял надо сохранить книгу и выйти, если так, то что мешает использовать oBook.Save? Причем имя файла указывать не надо, так как метод вызывается без параметров.
Бороться и искать, найти и перепрятать

JohnK
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 874
Зарегистрирован: 03.08.2002 (Сб) 0:35
Откуда: 48.02` 37.58`

Re: Вопрос о oExcel.Quit

Сообщение JohnK » 11.08.2011 (Чт) 16:23

Я обычно так делаю:
Код: Выделить всё
oExcel.Visible = False
oExcel.AlertBeforeOverwriting = False
oExcel.DisplayAlerts = False
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty

Samovar
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 111
Зарегистрирован: 23.05.2004 (Вс) 8:13

Re: Вопрос о oExcel.Quit

Сообщение Samovar » 10.02.2012 (Пт) 22:02

Код: Выделить всё
oBook.Saved=True

А потом делайте что хотите.
Ученье - свет, неученых - тьма.


Вернуться в Visual Basic 1–6

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

Сейчас этот форум просматривают: AhrefsBot, Yandex-бот и гости: 10

    TopList  
cron