使用数字格式将小数位移到右侧

时间:2015-04-03 16:18:36

标签: excel excel-vba vba

我在Excel中有一个图表,我想改变我的值:

0.9
0.8
0.7
0.6
0.5

为:

90
80
70
60
50

是否有通过使用格式代码格式化数字来执行此操作?你能在格式代码中将数字乘以100吗?百分比格式可行,但我不想在最后使用%。我尝试从格式代码中删除%,但这不起作用。

2 个答案:

答案 0 :(得分:1)

假设我们有一个简短的常量表,如:

enter image description here

我们要更改格式。选择单元格并运行此短宏:

Sub FakeFormat()
    Dim DQ As String, mesage As String
    Dim r As Range
    DQ = Chr(34)
    For Each r In Selection
        v = 100 * r.Value
        mesage = DQ & v & DQ
        r.NumberFormat = mesage & ";" & mesage & ";" & mesage & ";"
    Next r
End Sub

生产:

enter image description here

注意

这只是格式更改,基础值仍然小于 1

答案 1 :(得分:0)

您只需添加辅助列即可。例如,在新列put = A1 * 100中并将其复制下来。让图表使用这个新的帮助列而不是原始列,以使值基于。