VBA共享代码:设置数字格式

论坛 期权论坛 期权     
简约游记   2019-7-28 09:53   5051   0
    本文关键字:数字格式(微信公众号回复本文关键字可随时查看)

    我学的不是计算机专业,只是10多年前学习了一个在Excel中使用Visual Basic for Application(简称VBA)的速成教程,所以各位大佬看到我的代码幼稚可笑,欢迎指正,但不要拍砖拍的太狠,跪谢,


'数字-分类-常规
Selection.NumberFormatLocal = "G/通用格式"

'数字-分类-数值(小数位数2位,使用千分位分隔符,负数黑色负号)
Selection.NumberFormatLocal = "#,##0.00_ "

'数字-分类-货币(小数位数2位,无货币负号,负数黑色负号)
Selection.NumberFormatLocal = "#,##0.00"

'数字-分类-会计专用
Selection.NumberFormatLocal = "_ * #,##0.00_ ;_ * -#,##0.00_ ;_ * ""-""??_ ;_ @_ "

'数字-分类-日期(类型*2001-3-14,区域设置中文(中国))
Selection.NumberFormatLocal = "yyyy-m-d"
系统提示:以星号(*)开头的日期格式响应操作系统特定的区域日期和时间设置的更改。不带星号的格式不受操作系统的影响。


'数字-分类-时间(类型*13:30:55,区域设置中文(中国))
Selection.NumberFormatLocal = "[$-F400]h:mm:ss AM/PM"
系统提示:以星号(*)开头的日期格式响应操作系统特定的区域日期和时间设置的更改。不带星号的格式不受操作系统的影响。

'数字-分类-百分比(小数位数2位)
Selection.NumberFormatLocal = "0.00%"

'数字-分类-文本
Selection.NumberFormatLocal = "@"

    以上是我常用到的,还有很多种系统预设和自定义的格式就不一一列举了,
分享到 :
0 人收藏
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

积分:18
帖子:3
精华:0
期权论坛 期权论坛
发布
内容

下载期权论坛手机APP