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 に答える