powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как ускорить загрузку формы
6 сообщений из 6, страница 1 из 1
Как ускорить загрузку формы
    #34541009
abcdefg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у меня почему то формы в эксел долго загружаются,сначала появляется белый экран а потом появляется
форма ...нельзя ли это как то ускорить
все коды прописаны на форме на событие иницилизация
...
Рейтинг: 0 / 0
Как ускорить загрузку формы
    #34541059
RUSYA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дык наверное стоит код показать? Т.к. именно его придётся оптимизировать?
...
Рейтинг: 0 / 0
Как ускорить загрузку формы
    #34541398
abcdefg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Имеется форма. На форме 6 фреймов.В каждом фрейме по 3 переключателя .Каждый переключатель устанавливает в ячейку определённое число. Например в первом преключателе Код Range("A1").Value = "1" .Когда всё устанавливаю форму закрываю
кнопкой Код Unload Me.Когда открываю форму ,то на событие Initialize прописан код

Select Case Range("A1").Value
Case 1: OptionButton1.Value = True
Case 2: OptionButton2.Value = True
Case 3: OptionButton3.Value = True
Case Else
MsgBox "Где-то ошибка, однако"
End Select
И таких ещё 5 штук,ну вообщем для 18 преключателей. Например следующий
Select Case Range("A2").Value
Case 1: OptionButton1.Value = True
Case 2: OptionButton2.Value = True
Case 3: OptionButton3.Value = True
Case Else
MsgBox "Где-то ошибка, однако"
End Select
Ну и т. д.
...
Рейтинг: 0 / 0
Как ускорить загрузку формы
    #34541535
abcdefg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
abcdefgИ таких ещё 5 штук,ну вообщем для 18 преключателей. Например следующий
Select Case Range("A2").Value
Case 1: OptionButton1.Value = True
Case 2: OptionButton2.Value = True
Case 3: OptionButton3.Value = True
Case Else
MsgBox "Где-то ошибка, однако"
End Select
Ну и т. д.
Второй код будет
Select Case Range("A2").Value
Case 1: OptionButton3.Value = True
Case 2: OptionButton4.Value = True
Case 3: OptionButton5Value = True
Case Else
MsgBox "Где-то ошибка, однако"
End Select
...
Рейтинг: 0 / 0
Как ускорить загрузку формы
    #34546806
RUSYA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Странно, это фигня, я думал там какие-то сложные расчёты.. Вообщем это тормозить недолжно.

Какой офис?
Другие макросы не тормозят?
...
Рейтинг: 0 / 0
Как ускорить загрузку формы
    #34547082
abcdefg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Офис 2003. Тормозит только открытие и закрытие формы
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как ускорить загрузку формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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