2012-03-16 80 views

回答

7

除非标题是一个数字,你不需要这样做,我不这么认为。数字格式不会影响文本(至少不会太多)。但这里有一个办法:

With ThisWorkbook.Sheets("Sheet1") 
    .Columns(3).Resize(.Rows.Count - 1, 1).Offset(1, 0).NumberFormat = "#,##0" 
End With 
0

或者

Sheets("Sheet1").Range(cells(2,3), cells(2,3).end(xldown)).NumberFormat = "#,##0" 

这将选择不整列,但是从你的第一个至最后一个非空行。如果您的第一行和最后一行之间有空单元格,但这不是一个合适的解决方案。