VBA WORD-日期/时间选择器-长日期代码

我已经创建了一个用户表单并添加了一个日期/时间选择器控件

日期时间选择器命名为：

CDOBtextbox

并填充名为

CDOB

它当前将日期填充为

DD-MM-YYYY

，但我希望它将书签填充为

D-MMMM-YYYY

我知道日期/时间选择器有一个

3-dtp自定义

格式，但我不知道如何为我的生活设置自定义格式

---

如果有人认为他们可以提供帮助和/或需要更多信息，请询问-一直在寻找答案（很抱歉，我不熟悉整个编码过程）

CustomFormat

DateTime Picker的属性区分大小写

---

这是错误的：

DD-MM-YYYY

这是正确的：

dd-MM-yyyy

---

在VBA中

Private Sub UserForm_Click()
    DTPicker1.Format = dtpCustom
    DTPicker1.CustomFormat = "dd MM yyyy"
    DTPicker1.Value = Date
End Sub

---

使用Format函数：Format（DateTime.Now，“D MMMM YYYY”）谢谢Cyboashu，真不敢相信我错过了属性中的customformat选项-已将该格式更改为

D MMMM YYYY

，但是，当我使用code

Private Sub-UserForm\u Click（）TextBoxCDOB.Format=dtpCustom TextBoxCDOB.customformat=“D MMMM YYYY”时TextBoxCDOB.Value=Date End Sub

它仍然将书签填充为

dd MM yyyy

-有什么建议吗？需要查看从日期选择器更新图书标记的代码。

Private Sub CommandButtonOk_Click（）Application.screenUpdate=False和ActiveDocument调用UpdateBookmark（“CDOB”，TextBoxCDOB.Value）以Application.screenUpdate=True卸载我的End Sub结束

调用UpdateBookmark（“CDOB”，Format（TextBoxCDOB.Value，“d MMM yyyy”）

aaaaaa你是一个传奇！！！！！你现在正式成为我最好的朋友-谢谢@cyboashu！！！！我是否需要保留

Private子用户表单_Click（）TextBoxCDOB.Format

code？？？