用vba改变日期显示的问题

weide_yang

求助，可以用代码实现日期显示样式的改变吗？有请老师赐教，谢谢！

swl4561255

1. Sub test()
   
2. Range("B4:B8").NumberFormat = "yyyymmdd"
   
3. End Sub

复制代码

weide_yang

谢谢lswl4561255老师赐教！但请老师原谅，我还没有表达完全我想要改变日期显示的目的：要用改变后显示的字符来命名当前工作表，例如，将当前工作表以b4单元格的值来命名，就是：20240222, 老师现在提供的日期显示格式还不能用作工作表的命名，还望老师再指导，谢谢！

swl4561255

1. Sub test()
   
2. ar = [A4].End(4).Row
   
3. For i = 4 To ar
   
4.   Range("B" & i).NumberFormatLocal = "yyyymmdd"
   
5. Next
   
6. ActiveSheet.Name = Application.Text(Range("B5"), "yyyymmdd")
   
7. End Sub
   

复制代码

weide_yang

非常感谢lswl4561255老师赐教！就是这个效果了！