• 締切済み

小数点表示で。

TAGOSAKU7の回答

  • TAGOSAKU7
  • ベストアンサー率65% (276/422)
回答No.2

訂正です 0.3456を小数点第２位で計算するとき １０００倍 → 345.6 ０．５をたす → 356.1 整数のみ取得 → 356 １０００で割る → 0.356 の部分は 0.3456を小数点第２位で計算するとき １０００倍 → 345.6 ０．５をたす → 346.1 整数のみ取得 → 346 １０００で割る → 0.346 です。

sakky_t
質問者

お礼

いつもありがとうございます。 少数表示なりました。 ただMe.Label1.Caption = funcRound(a, 2) では エラーになりました。 Me.Label1.Caption = Round(a, 2) にするとうまくいきました。

この回答がついた質問に戻る
回答 全件
0.3456を小数点第１位で計算するとき １０倍 → 3.456 …
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • エクセル2010　小数点を切り捨てたい！

    少し前に同じ質問をしたのですが、ミスがあったのでもう一度投稿します。すみません、、 A1に2.54という数字があるとしたらB1に2.5を入れたいです。小数点第２は四捨五入します。 四捨五入した数字を使ってまた別の計算をしたいのですが、このときに2.54ではなく2.5の数字を使います。なので、四捨五入した数字を表示するだけではなく2.5という数字に変えたいです。 C1に2.5があったら、B1+C1＝5.0となるようにしたいです。 できれば数式を入力して解決したいですが、超簡単なマクロでしたらわかりますのでマクロでも問題ありません。もし初心者には理解が難しいマクロでしたら簡単な解説をつけていただけると超助かります。 またマクロで回答いただいた場合はいろいろと質問させていただくかもしれませんがよろしくお願いします。

  • ＶＢＡ　小数点の割り算

    お世話になります。 以下のように計算をしたいのですが。 Dim A_DATE As Single Dim B_DATA AS Single Dim C_DATA AS Single A_DATA = 69.63 B_DATA = 1651.8 C_DATA = A_DATA / B_DATA とすると C_DATAには希望は0.04214・・・・ がセットされてほしいのですが、 4.2154・・・となってしまうのです。 変数の指定の仕方がおかしいのか、 割り算の仕方がおかしいのかよく分かりません。 よろしくお願いします。

  • EXCELで小数点以下を四捨五入しない方法

    EXCELで例えば、A1セルに7320000　B1セルに156　C1セルに26と入力してA1/B2*C1とすると電卓では、121.9999と続きますが、EXCEL計算では122.0000と勝手に四捨五入されてしまいます。四捨五入されず、実際の121.99999で表示させるにはどうすれば宜しいでしょうか？

  • 小数点以下表示

    averageで計算した値を表示したところ、 勝手に四捨五入されてしまいました 小数点第二位まで表示したいので どなたかよろしくお願いいたします<m(__)m> Option Explicit Public Sub 平均() Const SH_NAME As String = "VBA" Dim art As String Dim i Dim ws As Worksheet Dim endrow As Long Dim msg As String Dim writerow As Integer Dim target As Range Dim ActCell As Variant Dim Result As Integer Set ws = ThisWorkbook.Worksheets(SH_NAME) writerow = 2 art = InputBox("日付を入力してください") With ws endrow = .Cells(Rows.Count, 2).End(xlUp).Row For i = 2 To endrow If art = .Range("A" & i) Then If target Is Nothing Then Set target = Range("D" & i) Else Set target = Union(target, Range("D" & i)) End If Else If InStr(msg, .Range("A" & i)) = 0 Then msg = msg & .Range("A" & i) & vbCrLf End If End If Next i If msg <> "" Then MsgBox msg End If target.Select ActCell = Selection.Address Result = Application.WorksheetFunction.Average(.Range(ActCell)) Range("F39").Value = Result Range("F39").NumberFormatLocal = "0.00" End With End Sub

  • Excelで小数点以下を切り捨てて表示するには？

    こんにちは。 ちょっと急ぎで知りたいのですが、Excel2000で計算式を入力したところ、 自動的に小数点以下が四捨五入されて表示されます。 小数点以下は、切り捨てて表示もしないようにしたいのですが、 どのようにすればよいのでしょうか？ 基本的なことですみません・・・ 具体的には・・・ A1に　48.85 B2に　250 C3に　=SUM(A1*B1)　と入力してあります。 C3は現在、12,213と表示されていますが、 12,212にしたいのです。 できればC列すべてそのように設定したいのですが・・・ よろしくお願い致します。

  • 小数点４桁での四捨五入がうまくいきません

    エクセルで次のような計算をさせます。 A2 に1.8、B2に0.075、C2に0.075、 D2に= A2*B2*C2 、E2に=roundup(D2,4) D2の計算結果は　0.010125 です。小数点第5桁目の値を参照して第４桁目で四捨五入したいのですが、roundupでは0.0102、rounddownでは0.0101です。 表示させたいのは0.0101です。この場合、rounddownを使えば問題ないのですが、逆にrounddownだと小数点以下４桁目の四捨五入がうまくいかない場合もあります。 例えば　A3に2.7　B3に0.08、C3に0.08 があり、E3にすべての値を掛けた結果を表示させると0.01728となります。 =roundup(E3,4)では0.0173となり、rounddownでは0.0172となります。この場合はroundup関数の結果である0.0173が求める数値です。 A列、B列,C列に任意の数字が入り、E列に４桁目で四捨五入した正確な値を求めたいのですが、なにか良い方法はないでしょうか。 VBAを使っても構いません。ちなみにこれは木材の材積計算に使用する目的です。 よろしくお願いします。

  • VBの小数点周り

    以前から思っていたのですが、VBの小数点ってあやしくないですか？ 変な現象を見つけたので、知っている方がいたら教えていただきたいのです。 小数点以下、四捨五入をしようと思い、 c = fix(val(a)+val(b)) という、式に対して、a = 20,b = 76.80 と、入れたところ、c = 1536 となるはずなのですが、返ってきた値は c = 1535 でした。 fixかけてるのに、値が減ってしまうなんてことがあるのでしょうか？？ 意味不明な現象に戸惑っております。

  • Excel97小数点以下の表示

    いつもお世話になってます。 小数点以下の表示についてご存知の方がいらしたら教えてください。 x=round(a/b,0)とします。 0.5＞ｘ＞0 の四捨五入して0になる場合は0を表示させたいのですが x=0 のときは値を表示させたくないときはどのような書式設定をすればよいのでしょうか。よろしくお願いします。

  • VB6.0での小数点の扱いについて

    現在、VB6.0を使用しており、小数点の扱いに困っています。 Sub Keisan() Dim A As String Dim B As String Dim C As String A = 1.29033 B = 1.91458 C = CStr(A + CDec((B - A) / 6) * 3) MsgBox C End Sub 上記のプログラムを実行すると、 「1.602455000000001」と表示されますが、 電卓を用いて計算すると、 「1.602454998・・・」となり、微妙に誤差が出てしまいます。 小数点を整数にして計算→元の桁数に戻す、という 処理を行うと、誤差なく求めることが出来ましたが、 「もっとスマートなコードにして」と言われてしまいまして どうしたものかと思っております。 この誤差を解決する方法は無いでしょうか？

  • PostgreSQLで小数点以下を処理する関数はありますか？

    update a_tbl set b_fld=a_fld * 1.05; とした場合にb_fldがintegerの場合どうなるのでしょうか？ SQL分で、切り上げ、切捨て、四捨五入は可能でしょうか？ また、Cygwin版のPostgreSQLでVisualBasicのクライアントプログラムから利用できるのでしょうか？

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する
質問する