Страницы: 1
RSS
Дата из календаря в ячейку., Проблема с установкой даты в ячейку.
 
Добрый день. Прошу помочь найти ошибку с отображением в ячейки даты установленной в календаре.  
 
как вариант
 
Спасибо, но нужно чтоб дата вписывалась в ячейку листа
Изменено: Umnius - 22.04.2020 21:34:52
 
Код кнопки ОК
Код
Private Sub Cmd_Select_Click()
    'Команда - закончить выбор даты и закрыть форму
    SelectedDate = CDate(DateValue(dt_1))
    ActiveCell = SelectedDate 'Добавлено Ю.М.
    Unload Me
End Sub
 
Юрий М, Спасибо.
 
Юрий М, подскажите как отобразить время ?
Изменено: Umnius - 22.04.2020 22:38:12
 
Если "определённая" ячейка - это А1, то замените ActiveCell на range("A1")
 
Юрий М, В форме присутствует время, как его отобразить на листе ?
 
Юрий М, написал
Цитата
Код кнопки ОК
Подскажите, а где эта кнопка?
 
Код
Range("A1") = Format(dt_1, "dd.mm.yyyy hh:mm")
 
Цитата
Kuzmich написал:
а где эта кнопка?
На форме календаря.
 
Юрий М, Еще раз спасибо, все работает.
 
Юрий М,
Цитата
На форме календаря.
У меня отображается такая форма и кнопки ОК нет
 
Kuzmich, файл из #2 ))
 
Юрий М,
Спасибо. А в примере #1 объявлены
Код
Public Str As Long
Public Stlb As Long

но в коде нигде не используются, такое впечатление,
что не хватает какого-то модуля.
Страницы: 1
Наверх