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

Вход

Регистрация

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

 

= Мир MS Excel/Не открывается UserForm, кнопка в режиме редактирования. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Не открывается UserForm, кнопка в режиме редактирования. (Макросы/Sub)
Не открывается UserForm, кнопка в режиме редактирования.
Александр7034 Дата: Понедельник, 04.03.2024, 09:19 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 58
Репутация: 0 ±
Замечаний: 40% ±

Столкнулся с "непонятностью" с запуском пользовательской формы UserForm1. Изначально когда сделал, пользовательская форма открывалась с кнопки, в ней выбиралось то что нужно, все работало хорошо. Но походу выяснилось, что некоторые элементы для удобства. должны быть заранее нажаты и прописаны. К примеру, при открытии книги, должен быть нажат переключатель 1, и в поле выбора ComboBox1 должны быть прописаны строки выбора. Для этого прописал соответствующие команды при открытии книги. [vba]
Код
Private Sub Workbook_Open()
     Dim ws As Worksheet     
Set ws = ThisWorkbook.Sheets("доп")     
ws.Range("Z2").Value = True    
 InitializeWorkbook
End Sub
[/vba] И в ячейке Z2 прописывается ИСТИНА, на эту ячейку записан переключатель 1, она нужна для формул. Так после этого документ может вылететь, кнопка запуска формы не нажимается, висит в режиме редактирования. В вложеном примере оставил самое необходимое, хотелось бы понять дело в нюансах работы excel, сам то макрос простой.
К сообщению приложен файл: test2.xlsm (23.1 Kb)


Сообщение отредактировал Serge_007 - Понедельник, 04.03.2024, 09:55
 
Ответить
СообщениеСтолкнулся с "непонятностью" с запуском пользовательской формы UserForm1. Изначально когда сделал, пользовательская форма открывалась с кнопки, в ней выбиралось то что нужно, все работало хорошо. Но походу выяснилось, что некоторые элементы для удобства. должны быть заранее нажаты и прописаны. К примеру, при открытии книги, должен быть нажат переключатель 1, и в поле выбора ComboBox1 должны быть прописаны строки выбора. Для этого прописал соответствующие команды при открытии книги. [vba]
Код
Private Sub Workbook_Open()
     Dim ws As Worksheet     
Set ws = ThisWorkbook.Sheets("доп")     
ws.Range("Z2").Value = True    
 InitializeWorkbook
End Sub
[/vba] И в ячейке Z2 прописывается ИСТИНА, на эту ячейку записан переключатель 1, она нужна для формул. Так после этого документ может вылететь, кнопка запуска формы не нажимается, висит в режиме редактирования. В вложеном примере оставил самое необходимое, хотелось бы понять дело в нюансах работы excel, сам то макрос простой.

Автор - Александр7034
Дата добавления - 04.03.2024 в 09:19
Pelena Дата: Понедельник, 04.03.2024, 10:55 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19182
Репутация: 4420 ±
Замечаний: ±

Excel 365 & Mac Excel
Цитата Александр7034, 04.03.2024 в 09:19, в сообщении № 1 ()
некоторые элементы для удобства. должны быть заранее нажаты и прописаны

всё, что требуется сделать при открытии формы, надо прописать в событии инициализации формы.
Кнопку перерисовала, т.к. она у Вас превратилась в рисунок
К сообщению приложен файл: 8539366.xlsm (25.3 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
Цитата Александр7034, 04.03.2024 в 09:19, в сообщении № 1 ()
некоторые элементы для удобства. должны быть заранее нажаты и прописаны

всё, что требуется сделать при открытии формы, надо прописать в событии инициализации формы.
Кнопку перерисовала, т.к. она у Вас превратилась в рисунок

Автор - Pelena
Дата добавления - 04.03.2024 в 10:55
Александр7034 Дата: Вторник, 05.03.2024, 10:44 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 58
Репутация: 0 ±
Замечаний: 40% ±

всё, что требуется сделать при открытии формы, надо прописать в событии инициализации формы.

Ваш пример работает. Но когда в нем прописал там же, открытие пользовательской формы при открытии книги, так вообще стал вылетать с ошибкой: Path/File access error, фаил закрывается и потом восстанавливается копия. Причем первое открытие книги происходит нормально. Но если открыть закрыть пользовательскую форму и сохраниться. То на следующих открытиях эта ошибка.
[vba]
Код
Private Sub Workbook_Open()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("доп")
    ws.Range("Z2").Value = True

    ' добавил следующее
    UserForm1.StartUpPosition = 0
    UserForm1.Top = 30 + Application.Top
    UserForm1.Left = 990 + Application.Left
    UserForm1.Show
End Sub
[/vba]


Сообщение отредактировал Александр7034 - Вторник, 05.03.2024, 11:11
 
Ответить
Сообщение
всё, что требуется сделать при открытии формы, надо прописать в событии инициализации формы.

Ваш пример работает. Но когда в нем прописал там же, открытие пользовательской формы при открытии книги, так вообще стал вылетать с ошибкой: Path/File access error, фаил закрывается и потом восстанавливается копия. Причем первое открытие книги происходит нормально. Но если открыть закрыть пользовательскую форму и сохраниться. То на следующих открытиях эта ошибка.
[vba]
Код
Private Sub Workbook_Open()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("доп")
    ws.Range("Z2").Value = True

    ' добавил следующее
    UserForm1.StartUpPosition = 0
    UserForm1.Top = 30 + Application.Top
    UserForm1.Left = 990 + Application.Left
    UserForm1.Show
End Sub
[/vba]

Автор - Александр7034
Дата добавления - 05.03.2024 в 10:44
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Не открывается UserForm, кнопка в режиме редактирования. (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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