Excel VBA系列之NOW和TEXT函数的结合

1. 在Excel中可以通过TEXT和NOW函数结合使用得到当前时间的文本格式。

2. 在Excel VBA中如何通过代码来实现这两个函数的结合:

打开Visual Basic,添加模块和过程,称之为“test”。

3. 在过程中添加代码,将执行的结果返回到B4单元格中。

4. 在VBA中通过WorksheetFunction来找到对应的函数。

5. 在WorksheetFunction后面继续输入TEXT函数,其第一个参数为NOW函数,第二个参数为文本格式。

Sub test()

Sheet2.Range("B4") = Application.WorksheetFunction.Text(Now(), "yyyymmddhhmmss")

End Sub

6. 执行以上代码后,即可在B4单元格显示文本格式的当前时间。

7. 在VBA中这里的函数可以用另一种方式来写,就是format。

Sub test()

Sheet2.Range("B5") = Format(Now(), "yyyymmddhhmmss")

End Sub

你可能感兴趣的:(Excel VBA系列之NOW和TEXT函数的结合)