Как использовать DatePicker с пользовательским форматом

Question

Я пытаюсь получить от пользователя дату и время в одном устройстве выбора даты, поэтому я пытаюсь сделать 21/06/2019 23:38 этот формат (дд / мм / гггг чч: мм)

Я использую с Microsoft Date and Time Picker версии 6.0

public Sub bTNOK_Click()
Cells(1,1).Value = Format(DTPicker1.Value, "dd/MM/yyyy hh:mm")
End Sub

public Sub UserForm_Initialize()

With DTPicker1
.Format = dtpCustom
.CustomFormat = "dd/MM/yyyy hh:mm"
End With

End Sub

о свойствах DatePicker

CustomFormat ["дд / мм / гггг чч: мм"]

Формат [3 - dtpCustom)

Значение [21/06/2019]

когда я запускаю этот параметр, значение ячейки 1,1 равно «30/12/1889 00:00», как я могу это исправить?

Answer 1

Измените это:

public Sub bTNOK_Click()
  Cells(1,1).Value = Format(DTPicker1.Value, "dd/MM/yyyy hh:mm")
End Sub

на это:

public Sub bTNOK_Click()
  Cells(1,1).Value = Format(DTPicker1.Value, "dd/MM/yyyy hh:mm")
  Cells(2,1).Value = DTPicker1.Value
End Sub

Скажите, что происходит.