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

©著作权归作者所有,转载或内容合作请联系作者
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。

推荐阅读更多精彩内容