Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Траблы с повторным открытием UserForm из основной формы - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Траблы с повторным открытием UserForm из основной формы
Rykalo Дата: Среда, 03.04.2019, 10:32 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день! Столкнулся с такой проблемой есть основная форма ufrmMenu из нее вызывается форма ufSotrOtdel через кнопку "Справочники отделов / сотрудников"

В первый раз все отрабатывает на ура. Но если закрыть вызванную форму и попытаться заново открыть то форма показывается, и происходит зависание, заполнение не происходит, кнопки не работают, закрыть можно через диспетчер или через редактор VBA путем остановки выполнения макроса

Пытался отслеживать работу макроса по шагово но так проблему и не обнаружил
К сообщению приложен файл: ___test.xlsm (60.0 Kb)
 
Ответить
СообщениеДобрый день! Столкнулся с такой проблемой есть основная форма ufrmMenu из нее вызывается форма ufSotrOtdel через кнопку "Справочники отделов / сотрудников"

В первый раз все отрабатывает на ура. Но если закрыть вызванную форму и попытаться заново открыть то форма показывается, и происходит зависание, заполнение не происходит, кнопки не работают, закрыть можно через диспетчер или через редактор VBA путем остановки выполнения макроса

Пытался отслеживать работу макроса по шагово но так проблему и не обнаружил

Автор - Rykalo
Дата добавления - 03.04.2019 в 10:32
krosav4ig Дата: Среда, 03.04.2019, 12:57 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Rykalo,
в ufSotrOtdel уберите
[vba]
Код
Private Sub UserForm_Terminate()
    ufrmMain.Show
End Sub
[/vba]
в ufrmMain замените
[vba]
Код
Private Sub CommandButton_spSotrOtdels_Click()
    Me.Hide    ' скрываем главную форму
    ufSotrOtdel.Show   ' открываем форму работы со справочниками
    Me.Show    'после закрытия формы работы со справочниками показать главную форму
End Sub
[/vba]


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеRykalo,
в ufSotrOtdel уберите
[vba]
Код
Private Sub UserForm_Terminate()
    ufrmMain.Show
End Sub
[/vba]
в ufrmMain замените
[vba]
Код
Private Sub CommandButton_spSotrOtdels_Click()
    Me.Hide    ' скрываем главную форму
    ufSotrOtdel.Show   ' открываем форму работы со справочниками
    Me.Show    'после закрытия формы работы со справочниками показать главную форму
End Sub
[/vba]

Автор - krosav4ig
Дата добавления - 03.04.2019 в 12:57
Rykalo Дата: Среда, 03.04.2019, 13:57 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
krosav4ig, большое спасибо :)

А почему мой вариант не отрабатывал? Я его нашел в сети, и там все нормально работало.
 
Ответить
Сообщение krosav4ig, большое спасибо :)

А почему мой вариант не отрабатывал? Я его нашел в сети, и там все нормально работало.

Автор - Rykalo
Дата добавления - 03.04.2019 в 13:57
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!