2

我正在用 excel 编写一个应用程序,可以帮助您学习完成平方过程。如果变量是整数,我希望将单元格格式化为数字,如果不是,则格式化为分数。

If h = (Int(h)) Then
Range("D1").Select
Selection.NumberFormat = "Number"
Else
Range("D1").Select
Selection.NumberFormat = "?/?"
End If

此代码由于某种原因不起作用,给我以下错误:

无法设置 Range 类的 NumberFormat 属性

我还有其他方法可以做到这一点吗?

4

1 回答 1

2

尝试:

If h = (Int(h)) Then
Range("D1").Select
Selection.NumberFormat = "0"
Else
Range("D1").Select
Selection.NumberFormat = "# ?/?"
End If

但是,如果将整数格式化为分数,它仍将显示为整数(即​​“1”,因为分数仍为“1”)。那么,为什么不将其格式化为分数呢?

于 2012-10-23T19:35:17.977 回答