[[20100705195117]]　『VBAでROUND関数を使う』（ﾋﾛﾐ）　ページの最後に飛ぶ

『VBAでROUND関数を使う』（ﾋﾛﾐ）

 VBAでROUND関数を使いたいのですが、うまく結果を出せなかったので
 修正点を教えてください。

 仕事で使っているのですが、ｴｸｾﾙのｼｰﾄに落としたﾃﾞｰﾀは、
 少数点以下が10桁くらい続いてます。
 もともと数値が入っているｾﾙと同じｾﾙに、ROUND関数で小数点第3位を四捨五入
 した数値を返したいのです。

 数値も表示も少数点第2位にしたいので、以下の式を組んだのですが、
 表示しか変わりませんでした。
 この式も、どこかのサイトでみつけたのですが、戻れなくなってしまいました。。。

　With Cells(行番号, 6).Value _

  = Application.WorksheetFunction.Round(CDbl(Cells(行番号, 6).Value), 2)
  End With
  With Cells(行番号, 6).Select
  Selection.NumberFormatLocal = "#,##0.00_ "
  End With

 アドバイスよろしくお願いします。

 こうでしょうか？

     With Cells(行番号, 6)
        .Value = Application.WorksheetFunction.Round(CDbl(Cells(行番号, 6).Value), 2)
        .NumberFormatLocal = "#,##0.00_ "
    End With
 (kei)

 できました☆Keiさん、ありがとうございます!!
 (ﾋﾛﾐ)

コメント返信：

[ 一覧(最新更新順) ]

[[20100705195117]] 『VBAでROUND関数を使う』（ﾋﾛﾐ） ページの最後に飛ぶ

[[20100705195117]]　『VBAでROUND関数を使う』（ﾋﾛﾐ）　ページの最後に飛ぶ