数量と単価を掛け算して金額を出すマクロを組んでいます。
(数量 * 単価 = 金額)
例えば、数量が5829、単価が9.98だと金額は58173.42になると思います。
(5829 × 9.98 = 58173.42)
小数点第2位までを表示させるためには、どのような書き方で表示できますでしょうか?
私のほうで色々錯誤してるのですが、小数点第2位までの表示は出来るのですが、マクロ実行後に
#####.00というように0表示になってしまいます。
上記のように「58173.42」まで出すようにしたいのですが、0表示や数値の丸め無く表示させるにはどうすればよいでしょうか。
アドバイス等くだされば幸いです。
宜しくお願いいたします。
No.3ベストアンサー
- 回答日時:
こんばんは、
不思議ですね。実際の表示される値は、幾つなのですか?
58173.00 それとも 58174.00 はたまた、58290.00
セルの書式設定とか、VBAでRound?関数とかFormat 関数とか使っていませんか?
セルの書式が標準なら、VBAで、
そのまま、Range("A1") = 5829 * 9.98
A1の値は58173.42
仮に変数に代入しているとして、すべてがVariantなら
dim val1,val2
val1=5829
val2=9.98
Range("A1") =val1(Variant/Integer)*val2(Variant/Double)()内は型
で出力できるかと
もう一つ変数を使用する場合
dim val1,val2
dim test
val1=5829
val2=9.98
test=val1*val2
testはVariant/Doubleで問題ない
Range("A1") =test
ちなみに
integerの場合 オバーフロー
long の場合 整数
58290.00の場合は、変数型がLongになっている可能性が高いので確認してください。
58173.00の場合
Round関数やROUNDDOWN関数を使用している場合は、桁数設定を確認してみてください。(Format 関数も確認)
58174.00の場合
上記同様にROUNDUP関数を確認してください。
使用していない場合は、セルの書式設定をご確認ください。
(Format 関数も確認)
回答ありがとうございます。
マクロを確認したらデータ型が定義されていませんでした。
今回、double型で定義したところ意図通り小数点第2まで表示されるようになりました。恐らく前任者が定義せずに作成していたようです。
詳細にアドバイス頂きありがとうございました。
また何かあれば宜しくお願いいたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) マクロだと数式が表示される 2 2022/09/10 14:48
- Excel(エクセル) エクセルの数式で教えてください。 3 2023/03/16 11:19
- その他(データベース) Accessフォームにて指定のフィールドの平均値を小数点第一位で表示できない 2 2022/08/30 17:19
- Excel(エクセル) エクセルの数式について教えてください。 2 2023/02/18 11:30
- Access(アクセス) Excelの質問 3 2023/02/09 14:57
- Excel(エクセル) エクセルの数式について教えてください。 2 2023/03/04 09:54
- Excel(エクセル) Excel2016 行間を詰めたい&同じカテゴリなら上位2つだけを表示したい 5 2022/06/03 12:19
- Excel(エクセル) エクセルのセルの書式設定・ユーザー定義の条件設定について 1 2022/08/17 21:56
- Excel(エクセル) 非表示にしたい行をグループ化して折り畳み 4 2022/09/17 20:17
- Excel(エクセル) 関数を教えてください。 2 2023/08/01 10:59
このQ&Aを見た人はこんなQ&Aも見ています
-
風水の観点で選ぶ観葉植物とは?置き場所や上げたい運気ごとの注意点を紹介!
観葉植物で運気をアップするコツを、風水デザイン1級建築士の福島昌彦さんに伺った。
-
VBA:小数点以下の数字を取得できる関数は?
Visual Basic(VBA)
-
ExcelVBAでテキストボックスの表示形式を小数点第二位まで表示する方法
Visual Basic(VBA)
-
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
-
4
エクセル VBA 小数点を含む数字抽出について
Excel(エクセル)
-
5
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
6
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
7
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
8
VBAで入力数値について
Visual Basic(VBA)
-
9
アクセスでの演算で少数点第1位まで表示するには。
Access(アクセス)
-
10
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
11
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
12
VBA 数式を残して値をクリアについて
Excel(エクセル)
-
13
エクセルVBAでフォームのListboxをスクロールするには?
その他(Microsoft Office)
-
14
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
15
VBAでセル入力の数式に変数を用いたい
Excel(エクセル)
-
16
【Excel VBA】指定行以降をクリアするには?
Visual Basic(VBA)
-
17
worksheetFunctionクラスのVlookupプロパティを取得できません エラーへの対応
Visual Basic(VBA)
-
18
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
19
ExcelVBAのユーザーフォームの中に線を引きたい
Visual Basic(VBA)
-
20
VBAで別モジュールへの変数の受け渡し方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【VBA】計算結果に小数点第2位...
-
MsgBoxの中にある数字や日付の...
-
時間表示で0:48:17と入力すると...
-
スリープ状態とロック状態の違...
-
UPS(無停電電源)のコンセント...
-
Apache起動エラー
-
Windowsのサービス起動エラーお...
-
ASIO4ALL(v2.9)の出力デバイ...
-
iosでpcのエロゲーを動かすアプ...
-
スイッチングハブのIPアドレス
-
ソフトのインストール不要のデ...
-
ethtoolでリンク速度変更できない
-
VectorWorksの安い入手方法を教...
-
クライアントPCのインストール...
-
パソコンの立ち上げた履歴を調...
-
中古のパソコン購入 オフィスの...
-
このようなスクリーンキャプチ...
-
IISが落ちた場合の動きについて
-
ネットワークトラブル監視ソフ...
-
拠点間WANなどでの『専用線...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【VBA】計算結果に小数点第2位...
-
チェックボックスのある行を非...
-
クリスタルレポートの改ページ...
-
MsgBoxの中にある数字や日付の...
-
時間表示で0:48:17と入力すると...
-
POIを使った書式設定
-
VBでエクセル出力の文字を太字...
-
マイナス記号を▲で表す方法
-
VBA コンボボックスの表示(日...
-
spread6.0(セル連結)
-
VBA 条件付き書式で空欄は適用...
-
EXCEL2010でRGB指定できない
-
MSAccessでODBCを介してDB接続...
-
FORMAT関数で値が変わる
-
EXCELVBAであるセルに設定され...
-
PEAR::Pagerにアンカーリンクを...
-
【JAVA】POIを使用してExce...
-
エクセルのメモについて教えて...
-
JAVAのCalendarについて質問です
-
エクセル元データの#N/Aを非表...
おすすめ情報