ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Закрыть сохраненную книгу
6 сообщений из 6, страница 1 из 1
Закрыть сохраненную книгу
    #36542425
segail
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
segail
Участник
Здравствуйте.
По условию идет сохранение книги (вторая строка кода)
После сообщения идет открытие файла и открытие формы3(пятая строка кода)
А сохраненная книга должна закрыться. Но она не закрывается из за кода открытие формы : UserForm3.Show
Как это исправить?
Код: plaintext
1.
2.
3.
4.
5.
6.
Application.DisplayAlerts = False
ThisWorkbook.SaveAs Rep_Documents & "\V ГСМ " & Sheets("Отчет").Range("R1") & "\" & Sheets("Отчет").Range("N1") & ".xls",  1 , ConflictResolution:=xlLocalSessionChanges
Unload Me
MsgBox "  Данные сохранены в папке  V ГСМ " & Sheets("Отчет").Range("R1") & " имя файла " & Sheets("Отчет").Range("N1"),  64 , "Сохранение данных"
Workbooks.Open Filename:="C:\Program Files\IL vgsm\V ГСМ\V_ГСМ.xls": UserForm3.Show
ThisWorkbook.Close (False)
Application.DisplayAlerts = True
...
Рейтинг: 0 / 0
25.03.2010, 14:50
| Ответить | Цитировать | Написать  
Закрыть сохраненную книгу
    #36542502
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
А зачем вы показываете форму из той книги, которую собираетесь закрыть? Или наоборот, зачем закрываете книгу, с формой которой собрались работать? Форма не может вот так взять и отцепиться от своей книги.

Jah loves you.
...
Рейтинг: 0 / 0
25.03.2010, 15:13
| Ответить | Цитировать | Написать  
Закрыть сохраненную книгу
    #36542518
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Код: plaintext
UserForm3.Show  0
В этом случае форма мелькнет и закроется вмести с книгой.

Jah loves you.
...
Рейтинг: 0 / 0
25.03.2010, 15:16
| Ответить | Цитировать | Написать  
Закрыть сохраненную книгу
    #36542564
segail
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
segail
Участник
Antonariy,
Затем файл V_ГСМ.xls опять открывается, вот и не обходимо, чтобы форма3 данной книги открылась…
...
Рейтинг: 0 / 0
25.03.2010, 15:28
| Ответить | Цитировать | Написать  
Закрыть сохраненную книгу
    #36542917
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
V_ГСМ.xls опять открывается
Это уже другой файл, а UserForm3.Show и ThisWorkbook.Close выполняются для файла "V ГСМ " & Sheets("Отчет").Range("R1") & "\" & Sheets("Отчет").Range("N1") & ".xls"
...
Рейтинг: 0 / 0
25.03.2010, 17:11
| Ответить | Цитировать | Написать  
Закрыть сохраненную книгу
    #36542945
segail
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
segail
Участник
Antonariy,
Сформулирую по другому.
Как открыть форму UserForm3 файла V_ГСМ.xls, после открытия файла V_ГСМ.xls
...
Рейтинг: 0 / 0
25.03.2010, 17:21
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Закрыть сохраненную книгу
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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