エクセルexcelで桁を減らして表示したい

質問

エクセルのデータとして、すでに「4,000」とか「10,887」等の正数の数値が入力されているセルの内容を、十の位までは入れないで、「40」や「108 (or 四捨五入で109)」等に置き換えたい場合、いちばん簡単なやり方はなんでしょうか？

回答No.3

Qtaro35 · ベストアンサー

ＲＯＵＮＤ関数が簡単かと・・
セルＢ１に「10,887」の元データが入力されている場合
セルＣ１に「=ROUND(B1,-2)/100」と記述すればＯＫです。
「=ROUND(B1,-2)」で百の位で丸めたあと「/100」で余計な数字を除きます。

お礼

ＲＯＵＮＤ関数って使ったことなかったです。
試してみます。ありがとうございます！

回答No.4

nishi6

置き換えたいセルがどう配置されているか分からないので、私ならこうします・・・
数値入力したセルを『全て』100の位に四捨五入します。ご参考に。

標準モジュールに貼り付けます。

Sub TestRound2()
　　Dim rg As Range
　　ActiveSheet.Cells.SpecialCells(xlCellTypeConstants, 1).Select

　　For Each rg In Selection
　　　　rg = Application.Round(rg / 100, 0)
　　Next
End Sub

お礼

詳細な説明、ありがとうございます！
エクセルも奥が深いですね～。

回答No.2

comv

こんにちは！

表示だけでなく置き換えちゃってよろしいのであれば

・空いてるセルに１００と入力　コピー
・置き換えたいセル範囲を選択　編集　形式を選択して貼り付け
　数式　除算
－－－－－－－－－－－－－－－
◆切捨てでよろしいのであれば
除算した後　選択状態のままで
・編集　置換
　　検索文字列　.*
　　置換文字列　空欄
－－－－－－－－－－－－－－－－－－
◆四捨五入であれば
・選択されたままの状態で　書式設定　表示形式　数値
　桁数０　ＯＫ
・ツール　オプション　計算　「表示桁数で計算」をチェックＯＫ
（処理後は「表示桁数で計算」のチェックを外して下さい）
－－－－－－－－－－－－－－－－－－
　でＯＫです。

試してみて下さい！

お礼

タイプ別にくわしく説明していただき、ありがとうございます！

回答No.1

mamorukatou

単純に元の数字を100で割るというのはどうでしょう？
元の数字が入っている列は、列幅0にしておけば表示も印刷もされません。

お礼

おお、目からウロコです。なんだか難しく考えすぎていました。
ありがとうございます。