Отобразить даты :начало месяца и дату СЕГОДНЯ на форме

Вход

Регистрация

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

= Мир MS Excel/Отобразить даты :начало месяца и дату СЕГОДНЯ на форме - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отобразить даты :начало месяца и дату СЕГОДНЯ на форме (Макросы/Sub)

Отобразить даты :начало месяца и дату СЕГОДНЯ на форме

parovoznik

Дата: Вторник, 04.02.2020, 23:13 | Сообщение № 1

Группа: Проверенные

Ранг: Обитатель

Сообщений: 442

Репутация: 26 ±

Замечаний: 0% ±

Excel 2013

Здравствуйте!
Есть пользовательская форма с двумя датами :начало месяца и дата СЕГОДНЯ .
При инициализации формы отображаются 2 даты в полях текстбоксов : начало месяца и дата СЕГОДНЯ.
Загрузку дат произвел через лист. Но при инициализации неверно отображается формат дат. Как исправить?
Возможно есть вариант отобразить даты без листа,программно ?

Прилагаю файл пример

К сообщению приложен файл: 9591124.xlsm (22.5 Kb)

Ответить

gling

Дата: Среда, 05.02.2020, 00:37 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2524

Репутация: 678 ±

Замечаний: 0% ±

2010

Здравствуйте. А может так попробовать[vba]

Код

Private Sub UserForm_Initialize()
Me.txt_НачальнаяДата = "01." & Format(Date, "MM.YYYY")
Me.txt_КонечнаяДата.Value = Format(Date, "DD.MM.YYYY")
End Sub

[/vba]

ЯД-41001506838083

Ответить

parovoznik

Дата: Среда, 05.02.2020, 11:51 | Сообщение № 3

Группа: Проверенные

Ранг: Обитатель

Сообщений: 442

Репутация: 26 ±

Замечаний: 0% ±

Excel 2013

gling, все работает. Вам большущее спасибо! hands

Ответить

Страница 1 из 1
1