微信公众号 【EXCEL880】 QQ群【341401932】
课程咨询 加我微信EXCEL880B 试学网址http://v.excel880.com
课程咨询 加我微信EXCEL880B 试学网址http://v.excel880.com
代码运行结果:
代码截图:
代码文本:
Public Sub 技巧()
Dim myRange As Range
Set myRange = Range("A1") '指定任意的单元格
MsgBox "单元格" & myRange.Address & "的格式为:" & myRange.NumberFormatLocal
Set myRange = Nothing
End Sub
注释:
myRange.Address在此处指的是所选单元格地址;
NumberFormatLocal指的是自定义单元格格式;
Set myRange = Nothing是运行完后会自动释放变量。
有不懂的小伙伴们可以重新温习前面的VBA哦,最基础的课程都在不远的前方~!
VBA编辑神器放送
VBA编程懒人神器推荐 VBA代码助手 可以极大提高编程速度,降低编程门槛欢迎使用
VBA密码破解 VBA代码对齐 VBA代码混淆保护加密 代码库输入提示 VBA模块隐藏
下载链接:http://excel880.com/blog/archives/11297