Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / закрыть файл програмно / 25 сообщений из 223, страница 1 из 9
  1  все
01.07.2010, 11:33
    #36717295
vera_t
vera_t
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
При выполнении команды из макроса Documents.Close word спрашивает сохранять ли файл. как можно закрыть файл без вопросов?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2010, 11:42
    #36717327
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Код: plaintext
Documents.Close wdDoNotSaveChanges
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2010, 13:54
    #36717740
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro,
ActiveDocument.Close wdDoNotSaveChanges 'закрываем документ без сохранения , диалог "Сохранить документ" отображаться не будет
'А как будет с сохранением документа, чтобы диалог "Сохранить документ" не отображался и затем убрать окно Ворд, чтобы не висело????? Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2010, 14:01
    #36717765
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович ЭндрюShocker.Pro,
ActiveDocument.Close wdDoNotSaveChanges 'закрываем документ без сохранения , диалог "Сохранить документ" отображаться не будет
'А как будет с сохранением документа, чтобы диалог "Сохранить документ" не отображался
У автора, этот вопрос не возник, потому что, видимо, он умеет пользоваться хелпом.

Ципихович Эндрюи затем убрать окно Ворд, чтобы не висело????? Спасибо
посмотри методы объекта Application
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2010, 14:04
    #36717772
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro, спасибо большое, как Вы умеете доходчиво объяснять
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.07.2010, 20:02
    #36720764
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
vera_t, подскажите пожалуйста
ActiveDocument.Close wdDoNotSaveChanges 'закрываем документ без сохранения, диалог "Сохранить документ" отображаться не будет
'А как будет с сохранением документа, чтобы диалог "Сохранить документ" не отображался и затем убрать окно Ворд, чтобы не висело????? Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.07.2010, 20:07
    #36720770
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович Эндрюvera_t, подскажите пожалуйста
ActiveDocument.Close wdDoNotSaveChanges 'закрываем документ без сохранения, диалог "Сохранить документ" отображаться не будет
'А как будет с сохранением документа, чтобы диалог "Сохранить документ" не отображался Вот ведь лентяй. Ну мог бы хотя бы написать этот код и увидеть в выпадающем списке wdDoNotSaveChanges еще и wdSaveChanges
Ципихович Эндрюи затем убрать окно Ворд, чтобы не висело????? Спасибо
.Quit
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.07.2010, 20:09
    #36720773
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro, у меня ничего никуда не выпадало, давайте Веру спросим
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.07.2010, 20:11
    #36720775
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович ЭндрюShocker.Pro, у меня ничего никуда не выпадало, давайте Веру спросимЯ опять недостаточно подробно ответил?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.07.2010, 20:18
    #36720784
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ну дайте у Веры спросить, или подскажите скрипт????
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.07.2010, 20:20
    #36720786
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович ЭндрюНу дайте у Веры спросить, или подскажите скрипт????
Ну ладно-ладно. Подождем Веру....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 05:32
    #36722438
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro,

ActiveDocument.Close wdDoNotSaveChanges 'закрываем документ без сохранения, диалог "Сохранить документ" отображаться не будет
'А как будет с сохранением документа, чтобы диалог "Сохранить документ" не отображался и затем убрать окно Ворд, чтобы не висело?

У автора, вообще никаких вопросов не возникло, потому что, видимо, он умеет пользоваться хелпом или по другому поводу не известно? Помоему если умеешь пользоваться хелпом, вобще вопрос не должно возникать, во всяком случае, такой как она задала, разве не так?

И чтобы уже всё до конца мне выяснить еще подскажите, пожалуйста:
Я запускаю с шаблона файл, макросы Sub AutoNew() и Sub AutoOpen() имеются, их задача, проверить есть ли диск D, есть ли на нём определённая папка, если нет выдать сообщение. Например она есть, я открываю этот шаблон, получаю Документ1 и тут же ничего не делая его закрываю, у меня выдаётся сообщение, сохранить ли сохранения, но я же ничего не делал, как можно от этого сообщения избавитья?, может, что-то надо в AutoClose прописать. Вобще каков скрипт следующего условия, если в документе ничего не изменилось, то есть в него я ничего не вводил и с него ничего не удалял, тогда ...? Может я не правильно в этом условии высказался но смысл остаётся прежним, если пользователь ничего не сделал сам, тогда нечего у него и спрашивать. Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 09:18
    #36722595
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович Эндрю,

свойство документа Saved показывает, сохранен документ или нет
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 09:21
    #36722599
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro,
я в этом и не сомневался, подскажите скрипт, пожалуйста?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:10
    #36724236
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ну уж подскажите, читал, пробовал, остановился на этом:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Sub AutoClose()

Set DocWord = ActiveDocument 'создаём  объект, активный документ Word-a

'проверка, были ли сохранены внесенные изменения свойством Saved
'если изменения не были сохранены - сохранить их

If DocWord.Saved = False Then DocWord.Close True 'ошибка команды???? и всё же появляется окно сохранения документа????????7

'закрываем Word (без запроса на сохранение)
DocWord.Quit True

'уничтожаем обьект - документ
Set DocWord = Nothing

End Sub
Ошибка в тексте
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:17
    #36724241
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Код: plaintext
1.
Set DocWord = ActiveDocument 'создаём  объект, активный документ Word-a
Ну, в принципе, в это нет никакой необходимосте, но - если для наглядности - можно оставить.

Код: plaintext
1.
DocWord.Close True 'ошибка команды???? и всё же появляется окно сохранения документа????????7
почитай описание метода Close. Там нет параметра True, к тому же мы обсуждаем это с самого начала топика

Код: plaintext
DocWord.Quit True
Что это за конструкция? У документа нет метода Quit, он есть у приложения
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:19
    #36724243
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro
Код: plaintext
1.
DocWord.Close True 'ошибка команды???? и всё же появляется окно сохранения документа????????7
почитай описание метода Close. Там нет параметра True, к тому же мы обсуждаем это с самого начала топика
А все от нежелания использовать Оклиптик.
В случае правильного объявления переменной, все параметры метода Close выпадут сами, можно даже хелп не читать. Но мы же не ищем легких путей...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:20
    #36724245
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro
Код: plaintext
DocWord.Quit True
Что это за конструкция? У документа нет метода Quit, он есть у приложения
Это тоже выявил бы Оклиптик. Но твое упорство в биении головой об стену просто поражает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:22
    #36724246
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович ЭндрюShocker.Pro, у меня ничего никуда не выпадало
Потому что нет Оклиптика и не определена правильно переменная документа
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:46
    #36724260
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro, Оклиптик!!!, что за Оклиптик? где то я об этом слышал
У, какое невежество, Вы вероятно говорите о Option Explicit, сам догадался!
А если серьёзно, делаю сейчас так:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
Option Explicit

Sub AutoClose()

Dim DocWord As Word.Document 'экземпляр документа

Set DocWord = ActiveDocument

'проверить, были ли сохранены внесенные изменения свойством Saved и если изменения не были сохранены - сохранить их;

If DocWord.Saved = False Then DocWord.Save

'закрываем документ (без запроса на сохранение)
DocWord.Close 'True здесь пробовал и до заремарчивания 'True и после ????????????????

'закрываем Word (без запроса на сохранение)
DocWord.Quit True

'уничтожаем обьект - документ
Set DocWord = Nothing

End Sub

Опять не получается. Подскажите, благаю
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:49
    #36724262
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович ЭндрюОпять не получается.
В чем это выражается? Какой текст ошибки?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 20:58
    #36724273
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro, конструктивный разговор, на этой строке:
DocWord.Close 'True здесь пробовал и до заремарчивания 'True и после ????????????????
Ошибка команды и крестик в сообщении.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 21:00
    #36724277
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Ципихович ЭндрюОшибка команды и крестик в сообщении.
Конструктивный разговор. Место ошибки я понял. Иконку сообщения тоже. Текст сообщения об ошибке увидеть бы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 21:09
    #36724289
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Стоп, а что за бред вообще.
Зачем закрывать документ в AutoClose? То есть тогда, когда и так происходит его закрытие. Вот и выходит бред.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.07.2010, 21:09
    #36724290
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
закрыть файл програмно
Shocker.Pro,
я понял к чему Вы клоните, там есть кнопка Справка
И понеслось, почему не нажмёте справку и т.д и т.п. Нажимал она не открывается
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / закрыть файл програмно / 25 сообщений из 223, страница 1 из 9
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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