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