VBA格式化字符串VBA函数Format及工作表函数Text.docVIP

VBA 格式化字符串 vba函数Format 及工作表函数Text VBA 的 Format 函数与工作表函数 TEXT 用法基本相同，但功能更加强大，许多格式只能用于VBA 的 Format 函数，而不能用于工作表函数 TEXT ，以下是本人归纳的几点用法，希望对学习VBA有所裨益。Format(值,格式（可选参数)一、数字格式：1、General Number：普通数字，可以用来去掉千位分隔号和无效 0 。如：Format(1,234,567.80, General Number)=1234567.82、Currency：货币类型，可添加千位分隔号和货币符号，保留两位小数点。如：Format(1234567, Currency)=1,234,567.003、Fixed：格式为带两位小数的数字。如：Format(123456, Fixed)=123456.004、Standard：标准，即带千位分隔号和两位小数。如：Format(123456, Standard)=123,456.005、Percent：带两位小数点的百分数。如：Format(123456, Percent)=12345600.006、Scientific：科学记数法。如：Format(1234567, Scientific)=1.23E+067、Yes/No：当数值为非 0 数字时返回 Yes ，否则返回 No 。如：Format(-3.14, Yes/No)=Yes Format(0, Yes/No)=No8、True/False：当数值为非 0 数字时返回 True ，否则返回 False 。与第7点类似，这里不再举例。9、On/Off：当数值为非 0 数字时返回 On ，否则返回 Off 。与第7点类似，这里不再举例。10、或省略：返回原值，但去除了小数点前后的无效 0 。如：Format(0.1030, )=.10311、0：占位格式化，不足位时补足 0 。如：Format(123, 0000)=0123 Format$(12.3, 0.00)=12.3012、#：占位格式化，不足位时不补足 0 。如：Format(123, #)=12313、%：转化为百分数，一个%代表乘以 100 。如：Format(1.23, 0.00%)=123.00% Format(1.23, 0.00%)=12300.00%14、：强制显示某字符。如：Format$(12.34, RMB .00)=RMB 12.3415、;（分号）：分段显示不同格式比如要把正数显示为“正”，负数显示为“负”，0显示为“零”，参数为正;负;零如：Format$(123, 正;负;零)=正第1段为正数格式，第2段为负数格式，第3段为0格式。二、日期和时间格式：1、固定格式参数General Date：基本类型如：Format(2010-5-1 9:8:5, General Date)=2010/5/1 9:08:05Long Date：操作系统定义的长日期如：Format(2010-5-1 9:8:5, Long Date)=2010年5月1日Medium Date：中日期如：Format(2010-5-1 9:8:5, Medium Date)=10-05-01Short Date：操作系统定义的短日期如：Format(2010-5-1 9:8:5, Short Date)=2010-5-1Long Time：操作系统定义的长时间如：Format(2010-5-1 9:8:5, Long Time)=9:08:05Medium Time:带AM/PM（上午/下午）的12小时制，不带秒如：Format(2010-5-1 9:8:5, Medium Time)=09:08 上午Short Time：24时制的时间，不带秒如：Format(2010-5-1 9:8:5, Short Time)=09:082、自定义格式C：格式化为国标的日期和时间如：Format(2010-5-1 9:8:5, c)=2010/5/1 9:08:05y:一年中的第几天（1-366）如：Format(2010-5-1 9:8:5, y)=121yy：两位数的年份(00-99)如：Format(2010-5-1 9:8:5, yy)=10yyy：上面的 yy 与 y 结合在一起如：Format(2010-5-1 9:8:5, yyy)=10121 Format(2010-5-1 9:8:5, yy年第y天)=10年第121天yyyy：四位数的年份(0100-9999)如：Format(2010-5-1 9:8:5, yyyy)=2010d：一个月中的第几天（1-31）如：Format(2010-5-1 9:8:5, d)=1dd：与 d 相同，但不足两位时补足 0如：Format(2010-5-1 9:8:5, dd)=01ddd：三个英文字母表示的星期几如：Format(2010-5-1 9:8:5, ddd)=Satdddd：英文表示的星期几如：Format(2010-5-1 9:8:5, dddd)=Saturdayddddd：显示标准日期如：Format(2010-5-1 9:8:5, ddddd)=2010/5/1dddddd：长日期如：Format(2010-5-1 9:8:5, dddddd)=2010年5月1日w：一个星期中的第几天（始于周日，周日为1）如：Format(2010-5-1 9:8:5, w)=7ww：一年中的第几周如：Format(2010-5-1 9:8:5, ww)=18m：月份数(当用于时间时，也可以表时为分钟)如：Format(2010-5-1 9:8:5, m)=5mm：当小于10时带前导0的月数(当用于时间时，也可以表示为两位数的分钟数）如：Format(2010-5-1 9:8:5, mm)=05mmm：三个英文字母表示的月份数如：Format(2010-1-1 9:8:5, mmm)=Janmmmm：英文表示的月份数如：Format(2010-1-1 9:8:5, mmmm)=Januaryq：一年中的第几季(1-4)如：Format(2010-5-1 9:8:5, q)=2aaa：中文表示的周几如：Format(2010-5-1 9:8:5, aaa)=周六aaaa：中文表示的星期几如：Format(2010-5-1 9:8:5, aaaa)=星期六h：小时数（0-23）如：Format(2010-5-1 9:8:5, h)=9h：两位数表示的小时数如：Format(2010-5-1 9:8:5, hh)=09n：分钟数(0-59)如：Format(2010-5-1 9:8:5, n)=8nn：两位数表示的分钟数(00-59)如：Format(2010-5-1 9:8:5, nn)=08s：秒数（0-59）如：Format(2010-5-1 9:8:5, s)=5ss：两位数表示的秒数（00-59）如：Format(2010-5-1 9:8:5, ss)=05ttttt:标准时间，当小时数小于10时不带0，与 h:mm:ss 或 h:nn:ss 相同如：Format(2010-5-1 9:8:5, ttttt)=9:08:05AM/PM：显示当前为AM或PM如：Format(2010-5-1 11:59:59, AM/PM)=AM Format(2010-5-1 12:0:0, AM/PM)=PMA/P：显示当前为A或P与 AM/PM 一样，这里不再举例。说明：可以多种格式联合使用，如：Format(2010-5-1 9:8:5, dddddd aaaa)=2010年5月1日 星期六三、文本格式：匹配位置插入格式化文本，如：在abcde前插入文本X，代码为：Format(abcde, X)=Xabcde在abcde第1位字符后面插入文本X，代码为：Format(abcde, X)=aXbcde在abcde第2位字符后面插入文本X，代码为：Format(abcde, X)=abXcde在abcde第3位字符后面插入文本X，代码为：Format(abcde, X)=abcXde当点位符比原文本字符串多时，刚在相应位置上添加空格，如：Format(abc, X)=XabcFormat(abc, X)=XabcFormat(t, a)=at（空格空格at）与!配合可从后面截取一段文本，如：截取abcde后面1个字符文本，代码为：Format(abcde, !)=e截取abcde后面2个字符文本，代码为：Format(abcde, !)=de截取abcde