|
|
|
При загрузке UserForm не отражается дата в Label1
|
|||
|---|---|---|---|
|
#18+
Приветствую всех! Вопрос такой при загрузке UserForm не отражается дата в Label1. Хотя генерируется и переносится на лист после закрытия формы совершенно спокойно. Может, я что-то не так делаю? Как сделать что бы при открытии формы в Label1 показывалась сегодняшняя дата. Private Sub Workbook_Open() UserForm.Show End Sub Private Sub UserForm_Show() UserForm.Label1.Caption = Date End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.09.2007, 00:49 |
|
||
|
При загрузке UserForm не отражается дата в Label1
|
|||
|---|---|---|---|
|
#18+
Попробуй загнать дату в userform_load тогда все заработает Не откладывай на завтра то что можно сделать послезавтра :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.09.2007, 04:42 |
|
||
|
При загрузке UserForm не отражается дата в Label1
|
|||
|---|---|---|---|
|
#18+
ИМХО в VBA нет Form_Load. Есть Form_Initialize. Вот туда и нужно поместить этот код. С уважением, Николай. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.09.2007, 09:37 |
|
||
|
При загрузке UserForm не отражается дата в Label1
|
|||
|---|---|---|---|
|
#18+
Знаете я попробовал и... ничего!!! Кстати меня тоже заинтересовал этот вопрос. _____________________ Через тернии к звездам ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.09.2007, 18:54 |
|
||
|
При загрузке UserForm не отражается дата в Label1
|
|||
|---|---|---|---|
|
#18+
Сорри все получилось! =) Однако осталась загвоздка у меня UserForm называется Медиаплан Код не отрабатывает: Private Sub Медиаплан_Initialize() Медиаплан.Label1.Caption = Date End Sub А этот код отработал корректно! Почему? Private Sub UserForm_Initialize() Медиаплан.Label1.Caption = Date End Sub _____________________ Через тернии к звездам ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.09.2007, 19:13 |
|
||
|
При загрузке UserForm не отражается дата в Label1
|
|||
|---|---|---|---|
|
#18+
Alex_LitСорри все получилось! =) Однако осталась загвоздка у меня UserForm называется Медиаплан Код не отрабатывает: Private Sub Медиаплан_Initialize() Медиаплан.Label1.Caption = Date End Sub А этот код отработал корректно! Почему? Private Sub UserForm_Initialize() Медиаплан.Label1.Caption = Date End Sub _____________________ Через тернии к звездам События в VB связываются с именем класса, а не с именем объекта. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.09.2007, 00:54 |
|
||
|
|

start [/forum/topic.php?fid=60&msg=34789825&tid=2163417]: |
0ms |
get settings: |
7ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
55ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
55ms |
get tp. blocked users: |
1ms |
| others: | 211ms |
| total: | 364ms |

| 0 / 0 |
