バリアントの丸め

Question

1桁に四捨五入された数値は、依然として多くの桁でExcelに書き込まれます。例えば

：

dim myvar as variant 
dim mysingle as single 
dim myrange as range 

mysingle = 4567.23494376 
myvar = round(mysingle,1) 

myrange = "A1" 
myrange.value = myvar 

私はmyvarを書いているにもかかわらず、細胞は4567.2を表示するものの、セルをクリックすると、すべての桁で全体の値を示し、A1のセルに1桁に丸められてきました数式バーの仮数の右側に移動します。

この現象が起こるはずですか？

Answer 1

てみmyvar = WorksheetFunction.Round(mysingle, 1)

代わりのmyvar = round(mysingle,1)

---

Roundが値を返すながらも、@YowE3K

WorksheetFunction.Round常にタイプVariant/Doubleの値を返すことによって提供以下の情報を参照してください。 input parameter（）と同じタイプのこの場合は0）。

Answer 2

シングルを使用すると、ほとんど常に悪い考えです - Excelはダブルスを使用しています - ダブルスにシングルを変換すると、トラブルにつながる - このコードは、二重のために期待どおりに動作しますが、ラウンド

Sub roundit() 
Dim myvar As Variant 
Dim myDouble As Double 
Dim mySingle As Single 
myDouble = 4567.23494376 
mySingle = 4567.2 
myvar = Round(myDouble, 1) 

Range("a1").Value = myvar 
Range("a2").Value = mySingle 
End Sub 

を介さずに、単一のあなたの予想外の答えを与えます