Range("D13:O19", C13, C14).Select
Selection.NumberFormatLocal = “0.00_”
Range("D" & (iRow+2) & ":O" & (iRow+8) & ",C" & (iRow + 2) & ",C" & (iRow + 3) ).Select
设置Range格式为数字
原文：http://www.cnblogs.com/sylar-liang/p/5569024.html
