Q&A
>takitoさん
わかりやすく解説していただきありがとうございました。自分では理解・解釈の追いつかない表現だったので助かりました。
Excelで、セルに小数点2桁以上入力された場合は条件付き書式でセルを赤くしたいのですが、数式がわかりません。
ぜひ、宜しくお願いします。
インターネット検索で近しいものは見つけられたのですが、解説もなく・・・
=LEN(TEXT(MOD(A1,1)"."&REPT("#",3)))-1
解釈できたのは、MOD関数でA1セルのあまりを取得して、
あまりの中で、小数点（.）以下3桁を指定している・・・？
ようには見えるのですが、他の関数が何をやっているかもわからず。
上手い具合に、自分で編集することもできない状況です。
回答3件
0
ベストアンサー
簡単な判別方法としては「１００倍して１０で割った余りを求める」です。
例①：１ × １００ ÷ １０ ＝ １０あまり０
例②：１．５ × １００ ÷ １０ ＝ １５あまり０
例③：１．０５ × １００ ÷ １０ ＝ １０あまり５
例④：１．００５ × １００ ÷ １０ ＝ １０あまり０．５
つまりあまりが０なら小数点１桁以内、０以外は２桁以上とわかります。
余りを求めるにはMOD関数を利用します。
例えばA1セルを１００倍して１０で割った余りを求めるなら=MOD(A1*100,10)という式になります。
これが０でないときという条件になるので、例えばA1セルの条件付き書式に=MOD(A1*100,10)<>0とすると目的の条件付き書式になると思います。
お試しください。
余談ですが、例えば小数点以下３桁の判断の場合は１０００倍した値を１０で割った値で判断することになります。
このようにセルの値に１０のｎ剰を掛けた値に対して１０で割った余りを求めることになりますので、判定する少数桁数が変動するようでしたら=MOD(A1*10^2,10)<>0としたほうが桁数調整しやすいかもしれません。
参考までに。
（追記）
追記分を見落としておりました。
=LEN(TEXT(MOD(A1,1),"."&REPT("#",3)))-1について、解説はほとんどtakitoさんがしてくれている通りだと思います。
ただ、この式で注意しなければいけないのは小数点以下３桁目までしか見ないということです。
試しに1.0005などをこの式にかけてみるとわかりますが、小数部.0005は.000までしか判断材料とならないため.###書式により0に変換されます。
※書式変換の際に少数以下４桁目の丸め処理もしてくれているので、.0006なら.001の扱いとなって3桁と返してくるんですけどね(^-^;
小数桁数がどれくらいまであるのか把握できているのであれば#の数を増やすことで対応できますが、根本的な解決にはならないですね。
というわけで、ご利用に際は注意が必要です。
投稿2017/12/06 07:06
編集2017/12/07 00:50
総合スコア3020
0
=LEN(TEXT(MOD(A1,1)"."&REPT("#",3)))-1
TEXT関数が成立していない（カンマが無い）のでその点を修正
LEN(TEXT(MOD(A1,1),"."&REPT("#",3)))-1
これがやろうとしていることは
MOD関数を使って整数１で割って余りを出す → 小数点以下を抽出
TEXT関数で".###"の書式にあてはめる → 小数点以下４桁目以降をカット
LEN関数で全体長さから小数点（.）の1文字分を差し引く → 最終の長さが求まる（０～３）
です
これで小数点以下桁数が３以上のものは「３」となります
以上で理解できそうでしょうか？
投稿2017/12/06 07:19
総合スコア3116
0
文字列としてはどうでしょうか?
例えば"3.281" だと
小数点の位置を割り出す。
その後、そこから次の位置 ( pos + 1 )から 最後までを取得し、
その桁数が2以上なら セルを赤くする...
みたいにすればいいのでは?
もし、一般ユーザみたいにExcel本体のっていう意味なら
「Excel 小数点」で検索した結果、
がヒットしました。
これらはどうでしょうか?
これを赤くするなら、
はどうでしょうか?
小数点があるやつになっていますが、
条件の項目を見ると
= A1 - INT(A1) > 0
となっています。
INT() はたぶん整数値に変換するやつだと思います。
で、これを 小数点2以降ってしたいのですよね。
小数点2以降ってことは...
再度、質問内容を読み返したところ、
"=LEN(TEXT(MOD(A1,1)"."&REPT("#",3)))-1"
とありますね。
でしょうか。
たぶん、
"."&REPT("#",3)
の部分は 文字列の連結かなと。
VBAでは
"Hello " & "VBA"
のようにすれば
"Hello VBA" みたいになります。
その意味で、
小数点プラス数値( ワイルドカードって言う感じ? ) と、MODで割り出した値をつけて
MODで割り出した数値 + "." + ワイルドカード的なもの
を文字列 ( TEXT() ) として固めて、その長さ ( LEN() ) の長さから -1 している
のだと思います。
投稿2017/12/06 06:14
編集2017/12/06 07:15
総合スコア4962
> BeatStarさん
ご回答ありがとうございます。
考え方はそのイメージでいけると思うのですが、
いかんせん関数に不慣れなもので、数式がわからなくて・・・
ん?
数式ってどういうことでしょうか?
使い方ってこと?
条件付き書式にて使用する数式です。
「数式を使用して、書式設定するセルを決定」にて、
小数3桁以上のセルの書式設定を行いたいと思うのですが、
その数式がなかなか上手くいかない状況です。
もしかして、VBAじゃなくて Excel本体のやつ!??
カテゴリにはExcelってあるけど、この掲示板?ってプログラミング用だからVBAかと思った...
Excel自体のなら、ここではあまり質問しないほうがいいかも。
勘違いされるし。
メインの回答に返信用を追記しました。
横から失礼しますm(__)m
VBAタグとExcelタグは別に用意されていますので、今回はVBAは使わずワークシート関数とシート上の機能だけで実現したいのだと思いますよ。
jawaさん。
かもしれませんね。
ですが、最初マジでVBAの方だと思ったので...
>BeatStarさん
勘違いさせてしまい申し訳ないです。
jawaさんのおっしゃる通り、Excelのワークシート関数及びシート機能を用いての実現を目指しておりました。
次からは質問の仕方を考えて質問させていただきますね。
ありがとうございました！
>jawaさん
私の記載漏れによって生じた勘違いでしたが、コメントありがとうございました。
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2017/12/07 01:19
2017/12/11 10:16
2017/12/14 04:27