| Вопрос: как закрыть excel без потверждения ? | Добавлено: 01.11.05 13:36 |
Автор вопроса:  admsasha | Web-сайт: dansoft.krasnokamensk.ru | ICQ: 234002454 |
|
Dim SHEET1 As Object
Dim NObj As Object Set NObj = CreateObject("EXCEL.APPLICATION") NObj.workbooks.Open FileName:="c:\list.xls" Set SHEET1 = NObj.workbooks NObj.cells(5, 5) = "Dennis" NObj.Range("I5").Select NObj.Selection.Font.ColorIndex = 1 NObj.Visible = True NObj.workbooks.Close NObj.quit Как закрыть приложение, что бы не спрашивалось потверждение ? |
| Ответы | Всего ответов: 7 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | Цитата | #1 | Добавлено: 01.11.05 14:10 |
| В методе .Close явно указать, сохранять изменения или нет. | ||
|
Номер ответа: 2 Автор ответа: admsasha ICQ: 234002454 Вопросов: 56 Ответов: 69 |
Web-сайт: Профиль | Цитата | #2 | Добавлено: 02.11.05 03:27 |
|
как ?, если ставлю:
NObj.workbooks.Close False
Run-time error '450':
Wrong number of arguments or invalid property assignment |
||
|
Номер ответа: 3 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | Цитата | #3 | Добавлено: 02.11.05 03:57 |
убить нах процесс экселя 
|
||
|
Номер ответа: 4 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | Цитата | #4 | Добавлено: 02.11.05 12:23 |
|
workbooks - это все книги.
А ты по одной. К тому же, у тебя как раз одна. |
||
|
Номер ответа: 5 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | Цитата | #5 | Добавлено: 02.11.05 12:36 |
|
........
NObj.Visible = True NObj.workbooks[B]  1)[/B].Close False
NObj.quit ........ |
||
|
Номер ответа: 6 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | Цитата | #6 | Добавлено: 02.11.05 12:37 |
| Тьфу... | ||
|
Номер ответа: 7 Автор ответа: el-paso Вопросов: 3 Ответов: 164 |
Профиль | Цитата | #7 | Добавлено: 02.11.05 20:27 |
|
Sub CloseAll() Application.DisplayAlerts = False Application.Quit End Sub |
||
Страница: 1 |