関数で少数点以下の値のみ表示したい

質問

A列　　　　　　B列　　　
【０．３】　　　　　【３】
【１１．１】　　　　【１】
【１．１３】　　　　【１３】
【１２】　　　　　　【０】

上記のように、A列に入力されている値の少数点以下の数値を、B列に表示するようにしたいです。
(少数点以下の数値がない場合は【０】を表示)
どのような関数を組めば出来ますでしょうか？よろしくお願い致します。

回答No.3

bunjii · ベストアンサー

>どのような関数を組めば出来ますでしょうか？
A列の値が小数点以下何桁を処理するか決めないと正確な処理になりません。
また、幾つかの関数を組み合わせますので、作業用のセルを使うことで分かり易くすべきでしょう。
例えばC列にA列の数値を文字列に変換した値を算出し、D列に小数点以下の部分をC列の文字列から切り分ければ、B列にD列の文字列を数値に置き換えられます。

C1=TEXT(A1,"#.#######")
D1=MID(C1,FIND(".",C1,1)+1,LEN(C1))
B1=IF(T(D1)="",0,VALUE(D1))

お礼

ありがとうございました。

回答No.2

keithin

=SUBSTITUTE(ROUND(A1-INT(A1),8),".","")*1
など。

＃こういった計算をするとエクセルの計算誤差（浮動小数点誤差）によって意図しない結果が現れる場合があるので，気をつけて確認してみてください。

お礼

ありがとうございました。

回答No.1

NNori

小数部分だけとりだして文字列にして小数点より右を表示する。

dim s as string
dim p as integer
dim ret as string
s = string( x - int(x))
P = instr(s,".")
if p > 0 then
ret = mid( s , p + 1 )
else
ret = "0"
end if

しかし、０．１０ のときは １０
０．１のときは １
と表示されちゃって、なんか意味がない（使い道がない）ような気がしますね。

お礼

ありがとうございました。