求助！关于使用vba进行日期格式转换的请教

工具/材料：Microsoft Office Excel2007版，Excel表格。

1、首先双击打开Excel表格。

2、其次在Microsoft Office Excel2007版界面上，选中底部工作表，右键点击“查看代码”。

3、接着在d出的VBA窗口中，输入日期格式转换的代码“Private Sub dateTra() Dim datetime datetime = "2020/2/13" MsgBox (Format(datetime, "YYYY-MM-DD")) End Sub

”。

4、其次在d出的VBA窗口中，点击工具栏里的三角形图标。

5、最后在Microsoft Office Excel2007版界面上，d出提示框，成功显示日期格式转换。

在VBA中，可以使用Format方法将日期以指定的格式存入TextBox中。例如，可以使用以下代码将当前日期存入TextBox：TextBox1.Value = Format(Date,"yyyy-mm-dd")，其中yyyy表示4位数年份、mm表示2位数月份、dd表示2位数日期。

vba使用当前日期的方法是利用excel内置函数实现的。

1、excel中函数date的使用方法：

2、在vba中，需要先定义一个变量，然后把date赋值：

dim cuDate as string

cuDate = date

这样变量cuDate就获取到了date的值。

3、运行结果：

Sub test()

Dim cuDate As String

cuDate = Date

MsgBox cuDate

End Sub

---