Excel VBA：用户表单中的日期格式答案

【问题标题】：Excel VBA: date format in user formExcel VBA：用户表单中的日期格式
【发布时间】：2015-06-16 15:32:15
【问题描述】：

我的用户表单中有各种文本框，其中包含从我的工作表中提取的日期，但所有日期都是美国格式 (m/d/yyyy)。

我正在使用ControlSource 属性来复制日期，例如：

ControlSource='SKU Data'!N2

有没有办法重新格式化日期，使它们显示为d/m/yyyy？

工作表中的日期已经格式化为d/m/yyyy.

【问题讨论】：

Format(（无论你的价值是什么）, "dd/mm/yyyy")
谢谢，我试过这个格式，但是没有用。奇怪的是，我的用户表单文本框日期之一是可以的。可能是工作表上的格式影响了文本框格式吗？
为了清楚起见，上面的代码行将以您想要的格式返回日期，但实际上不会将其粘贴到电子表格的任何位置。您需要告诉代码它的去向。例如：ThisWorkbook.Sheets(1).Cells(1,1).Value = Format(1/13/1987, "dd/mm/yyyy")

【解决方案1】：

使用字符串s：

Sub dural()
    txt = "12/25/2014"
    a = Split(txt, "/")
    txt = a(1) & "/" & a(0) & "/" & a(2)
    MsgBox txt
End Sub

【讨论】：