[已解决]VBA 怎样设置单元格属性

杨晨

请问我下面的操作为什么不行？应该怎样写才能改变单元格格式？

wb.Sheets(1).range("k2:k4").Format = "百分比"

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2012-9-6 13:24

Range.NumberFormatLocal 属性
以采用用户语言字符串的形式返回或设置一个 Variant 值，它代表对象的格式代码。
语法

表达式.NumberFormatLocal

表达式   一个代表 Range 对象的变量。

说明


Format 函数使用的格式代码字符串与 NumberFormat 和 NumberFormatLocal 属性使用的格式代码字符串不同。


示例


本示例以用户语言显示 Sheet1 上的单元格 A1 中的数字格式。

Visual Basic for Applications
MsgBox "The number format for cell A1 is " & _
    Worksheets("Sheet1").Range("A1").NumberFormatLocal

跳转到最佳答案楼层

gaoshuichang1

把Format去掉或换成.value

hwc2ycy

Range.NumberFormatLocal 属性
以采用用户语言字符串的形式返回或设置一个 Variant 值，它代表对象的格式代码。
语法

表达式.NumberFormatLocal

表达式   一个代表 Range 对象的变量。

说明


Format 函数使用的格式代码字符串与 NumberFormat 和 NumberFormatLocal 属性使用的格式代码字符串不同。


示例


本示例以用户语言显示 Sheet1 上的单元格 A1 中的数字格式。

Visual Basic for Applications
MsgBox "The number format for cell A1 is " & _
    Worksheets("Sheet1").Range("A1").NumberFormatLocal

hwc2ycy

自已录一个设置单元格自定义格式的宏，就知道如何写了。

hwc2ycy

.NumberFormatLocal = "0.00%"
这是设置百分比格式，2位小数位。

杨晨

吼啊，吼啊，吼 啊，向高手致敬！[em17]