根据值给数字格式选择

Question

我每天都在尝试使用Excel扩展名创建一个small-helpfull宏，该宏应该根据值赋予单元格格式。

Sub decimals()
    ScreenUpdating = False
    If Selection.Value > 0.99999999 Then
        Selection.NumberFormat = "#,#00"
    Else
        Selection.NumberFormat = "0.00"
    End If
End Sub

该代码适用于一个单元格选择，但不适用于某个范围，我想它缺少一些循环吗？例如？

Answer 1

如果是多单元格选择，则this比较将无法正常工作。

也许尝试这样的事情：

Selection.Value