powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / При загрузке UserForm не отражается дата в Label1
7 сообщений из 7, страница 1 из 1
При загрузке UserForm не отражается дата в Label1
    #34789769
Приветствую всех!

Вопрос такой при загрузке UserForm не отражается дата в Label1. Хотя генерируется и переносится на лист после закрытия формы совершенно спокойно. Может, я что-то не так делаю? Как сделать что бы при открытии формы в Label1 показывалась сегодняшняя дата.

Private Sub Workbook_Open()

UserForm.Show

End Sub



Private Sub UserForm_Show()

UserForm.Label1.Caption = Date

End Sub
...
Рейтинг: 0 / 0
При загрузке UserForm не отражается дата в Label1
    #34789825
SkyS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попробуй загнать дату в userform_load тогда все заработает


Не откладывай на завтра то что можно сделать послезавтра :)
...
Рейтинг: 0 / 0
При загрузке UserForm не отражается дата в Label1
    #34790010
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ИМХО в VBA нет Form_Load. Есть Form_Initialize. Вот туда и нужно поместить этот код.

С уважением, Николай.
...
Рейтинг: 0 / 0
При загрузке UserForm не отражается дата в Label1
    #34792513
Alex_Lit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Знаете я попробовал и... ничего!!! Кстати меня тоже заинтересовал этот вопрос.
_____________________
Через тернии к звездам
...
Рейтинг: 0 / 0
При загрузке UserForm не отражается дата в Label1
    #34792606
Alex_Lit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сорри все получилось! =) Однако осталась загвоздка у меня UserForm называется Медиаплан

Код не отрабатывает:

Private Sub Медиаплан_Initialize()

Медиаплан.Label1.Caption = Date

End Sub

А этот код отработал корректно! Почему?


Private Sub UserForm_Initialize()

Медиаплан.Label1.Caption = Date

End Sub

_____________________
Через тернии к звездам
...
Рейтинг: 0 / 0
При загрузке UserForm не отражается дата в Label1
    #34792919
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Alex_LitСорри все получилось! =) Однако осталась загвоздка у меня UserForm называется Медиаплан

Код не отрабатывает:

Private Sub Медиаплан_Initialize()

Медиаплан.Label1.Caption = Date

End Sub

А этот код отработал корректно! Почему?


Private Sub UserForm_Initialize()

Медиаплан.Label1.Caption = Date

End Sub

_____________________
Через тернии к звездам

События в VB связываются с именем класса, а не с именем объекта.
...
Рейтинг: 0 / 0
При загрузке UserForm не отражается дата в Label1
    #34796201
Спасибо большое! Вы мне очень помогли!
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / При загрузке UserForm не отражается дата в Label1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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