如何转换日期以正确显示用户表单?

时间:2019-05-22 19:16:39

标签: excel vba date userform date-formatting

在新记录中输入日期时,“已转移日期”字段的格式为mm / dd / yyyy。当显示相同的提交日期时,它将显示为字符串“ 42353”,而不是“ 12/15/2015”。

当前代码示例=

Private Sub Will18_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If Will18 = vbEmptyString Then Exit Sub

    If IsDate(Will18) Then
        txtDateTxfr = Format(Will18, "mm/dd/yyyy")
    Else
        MsgBox "Please enter a valid date mm/dd/yyyy", vbCritical
    End If
End Sub

希望3个字段中的日期显示为“收到的日期”,“删除的日期”和“转移的日期”显示为“ mm / dd / yyyy”而不是字符串值。

0 个答案:

没有答案