ここから本文です

VBA Formatについて

koz********さん

2010/2/815:54:50

VBA Formatについて

Sub test()

Dim strA As String
strA = "10.8"

Dim varB As Variant
varB = Format(strA, "##.#00")

Dim dblC As Double
dblC = Format(strA, "##.#00")

End Sub


結果
strA "10.8"
varB "10.800"
dblC 10.8

やりたいこと
dblCの値を、10.800としたい

博識な方、知恵をお貸し下さいませ。

補足keijitenさん

早速の回答ありがとうございます。
無理なんですか。。他の手があれば助言お願いします。

経緯
最終的にdblCの値を使用して演算させようとしています。
10.800として使用したいのですが、10.8となってしまうので思うような結果がえられません。

例)「10.123<10.800」としてくても、「10.123>10.8」となってしまうため

閲覧数:
402
回答数:
1
お礼:
100枚

違反報告

ベストアンサーに選ばれた回答

kei********さん

編集あり2010/2/816:34:59

こんにちは~^^

そりゃ無理な話ですわ^^;
変数dblCをVariant型にしておけば
別だけどね^^;


で、、、
何故そんなことをしたいのでしょうか???



<補足に対して>
文字列10.8と数値10.8では全く別物ですからね^^;

Sub Sample()
Const A As String = "10.800"
Const B As String = "10.9"
Dim varA As Variant
Dim varB As Variant
varA = Val(A)
varB = Val(B)
Debug.Print varA < varB
End Sub

質問した人からのコメント

2010/2/15 08:38:01

降参 勉強になりました。
思うような動作になるように、違った視点で考えてみます。

ありがとうございます。

この質問につけられたタグ

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる