セルの書式設定

質問

エクセルのセルの書式設定の表示形式で、
下3桁を切捨てて、なくすことは可能ですか？
456789→456としたいわけです。

これが無理なら、小数点以下を「切り捨て」にする
表示形式はありますか？456.789→456

あくまで、「セルの書式設定の表示形式」で行いたいです。
数式での設定は、すべてのセルに書いたりして作業が
煩雑になるからです。

自分でやってみると、セル内を四捨五入することは可能ですが、
「切捨て」の設定ができません。
456789を456（もしくは456.789を456でもいい）にできず、
457になってしまうのです。

回答No.1

g00g0g00 · ベストアンサー

「セルの書式設定」では不可能だと思います。

ユーザー定義で色々試してみましたが、全部丸まってしまいますねー。

数式を使いましょう。
同じような質問があったので、ＵＲＬ貼っときます。

>数式での設定は、すべてのセルに書いたりして作業が
>煩雑になるからです。
セルを、びーってひっぱれば、それだけで済みますよ。
もし他のセルを参照していたりするなら、「$」も忘れずに。

参考URL：

http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q139334558

お礼

ありがとうございます。
書式では無理そうですね。
実際には、そのセルにいろんな足し算、引き算を入れて、
それらと切り捨ての関数を合わせて式を作ることになるので、
できなくはないけど、少々面倒なんですよね。

回答No.8

MarcoRossiItaly

No.7 です、度々すみません。No.7 に載せた FIXED 関数の数式だと、四捨五入になっていますね。切り捨てにするには、こうすればいいですね。

=fixed(int(a1/10^3),0)&" 千円"

お礼

どうもありがとうございます。
表示形式の設定でできたらよかったんですけど、
無理みたいなので、式を使うしかないかな。

回答No.7

MarcoRossiItaly

知る限り、切り捨てができる表示形式というのは、ありません。

もしも切り捨てではなく、四捨五入でも構わないという場合は、次の書式記号をユーザー定義の種類ボックスに入力します。

●「123456789」→ 「123457」というふうに「,」を入れない場合
　0,

●「123456789」→「123,457」というふうに「,」を入れる場合
　#,##0,

＞数式での設定は、すべてのセルに書いたりして作業が煩雑になるからです。

必要になる数式はごく簡単なものなので、オートフィルを使って全てのセルに入力すれば、一瞬で終わると思いますが、ただ、書式と数式には、もっと大きな違いがあると思います。

書式の場合、見かけだけ 1,000 で割った数になっているだけで、実際にセルに入力されている数値は、1,000 で割られる前の数です。一方、ワークシート上の数式あるいはマクロでデータを処理すると、値そのものが 1,000 で割った数に変化します。

それを踏まえて、必要な数式は次のとおり。

=int(a1/10^3)
あるいは
=rounddown(a1/10^3,)

こうして得られた値に「,」を入れる場合は、「#,##0」のユーザー定義書式をセルに設定してください。上で説明した書式記号とはわずかに異なっているので、ご注意。

また、数式で処理した値に「,」を入れ、なおかつその後ろに「千円」などと付加したい場合は、次式。

=fixed(a1/10^3,0)&" 千円"

FIXED 関数は「,」を付けてくれますが、数値を文字列にしてしまいます。でも「千円」などをくっ付ける場合、どのみち全体では文字列になるので、FIXED が便利です。

なお数式を使わずに 1,000 で割った数に「,」と「千円」を同時に付加して表示することは、ユーザー定義書式だけでも可能です。ただ、その場合は上で説明したとおり、セルに入力されているのは 1,000 で割られる前の数のままですから、そのセルを別の場所に値複写したりすると「千円」はペーストされないので、「円」なのか「千円」なのかよく分からなくなります。

データをそういうふうに扱うと人為的なエラーの原因になり得るので、個人的には好まないんですよね。上に示した FIXED の数式で得られた文字列は、よそに値のみ貼り付ければ、勿論「千円」もくっ付いてきますので、事情が異なります。

回答No.6

KURUMITO

表示形式を操作することだけでは難しいですね。通常は四捨五入されてしまいますね。
関数を使わずに元のセルのままの状態でお望みのようにするためには次のようにすればよいでしょう。
例えばお示しの456789の数値などがA1からA10セルに入力されているとします。そこで下3桁を切り捨てた状態で表示させるとしたら次のようにします。
どこか関係のないセルに500と入力します。そのセルをコピーしてからA1セルからA10セルを選択して右クリックし、「形式を選択して貼り付け」をクリックします。
「形式を選択して貼り付け」で演算の項から「減算」にチェックをしてOKします。
A1セルからA10セルを選択して「セルの書式設定」の「表示形式」のタブから「ユーザー設定」を選び種類の窓には　0, と入力します。これでお望みの表示形式のデータが表示されますね。

回答No.5

web2525

セルの高さが1行分、数値6桁なら

セルの書式設定で【配置】⇒折り返して全体を表示するにチェック
ここで一旦【OK】

再度セルの書式設定【表示形式】⇒【ユーザー定義】
###【Ctrl】+【j】###
と入力

これで表示上は上位3桁で改行が入って下位3桁の表示になるので、セルの高さを調整することで
上位3桁しか表示されなくなります
（高さを変えると改行された状態で6桁全て表示されますが）

回答No.4

tsubuyuki

失礼しました。

「１２３４５６」だとわかりづらいですね。

「４５６７８９」だと、添付図のように出ます。

回答No.3

tsubuyuki

例えば・・・ですが・・・

セルの初期設定で、配置タブの「折り返して全体を表示」にチェック
表示形式タブ「ユーザー設定」で、少々ややこしいですが

　　　#（ここでＣｔｒｌ＋Ｊ）,##0

全角で表現すると「＃（Ｃｔｒｌ＋Ｊ），＃＃０」です。
括弧（）内は、キーボード操作で。
Ｃｔｒｌ＋Ｊを打つと、入力欄が空白になりますが、気にせずに後半を続けてください。
入力欄の中では

　　　＃
　　　，＃＃０

こんな感じに２行になっているはずです。

これで行高を調整して、誤魔化せたりしませんかね？

でも、基本はＲＯＵＮＤＤＯＷＮ関数で別なセルに表示するモノ・・だと思いますよ。

回答No.2

tom04

こんにちは！
実データが変わってもよいのであれば・・・

VBAになってしまいますが、一例です。
とりあえずA列にデータを入力するとします。

画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面に
↓のコードをコピー＆ペーストしてA列にデータを入力してみてください。

Private Sub Worksheet_Change(ByVal Target As Range) 'この行から
If Application.Intersect(Target, Range("A:A")) Is Nothing Or Target.Count <> 1 Then Exit Sub
If IsNumeric(Target) Then
Application.EnableEvents = False
If InStr(Target, ".") > 0 Then
Target = Int(Target)
Else
Target = Int(Target / 1000)
End If
Application.EnableEvents = True
End If
End Sub 'この行まで

※　コード内の
＞Range("A:A")　部分が対象範囲となりますので、
実際のレイアウトに合わせてみてください。

こんなんではどうでしょうか？m（_ _）m

お礼

ありがとうございます。
なんか難しいですね。