No.1
- 回答日時:
小数点以下を0で埋めて良いのであれば、簡単にできますね。
[書式]→[セル]→[表示形式]で
数値を選んで、小数点以下の桁数を必要な量設定するだけです。
これ以外の方法は
上記小数がA1,A2,A3に入力されて
B1に
=REPT(" ",10-FIND(".",A1))&A1
をコピペして、B1セルをコピーして、B2、B3にペーストして見てください。
必要に応じて、真ん中あたりの10の数値を増やしたり減らしたりしてください。
尚、これらの方法はプロポーショナルフォントではうまくいきませんので、MS PゴシックとかからMS ゴシックに変更してください。
ありがとうございます。
試してみましたが、小数点がないとエラーが発生したので次のように改良してみました。
REPT(" ",10-IF(ISERROR(FIND(".",A2)),LEN(A2)+1,FIND(".",A2)))&A2
これも、いい方法ですね。
No.4ベストアンサー
- 回答日時:
この件は、整数のときでも「少数点」を表示してもいいか、それとも表示したくないのか
で回答が変わってくるかと思います。
勿論、数値を表示しているセルそのものの表示のこととします。
前者は、書式をユーザー定義で #,##0.??? とすれば可能ですが、整数の場合は、
123. のようになってしまうと思います。
整数の場合 少数点を表示せず、しかも桁をキチット揃えるには、
VBAを使わないと出来ないかと思います。 (Excel2000)
但し、文字列で処理しますので、この値を参照して計算式を設定している場合は、
Value関数で数値に変換する必要があります。
これで宜しかったら、標準モジュールに下記コードを貼り付けて、範囲を指定後
Alt+F8でこのマクロを実行してみてください。
Sub 数値桁揃え3()
'指定セル範囲を少数3桁で位置を揃えて表示。整数は少数点無し
Dim R As Range
Selection.Font.Name = "MS ゴシック"
Selection.NumberFormatLocal = "@"
Selection.HorizontalAlignment = xlRight
For Each R In Selection
If IsNumeric(R) And Not IsEmpty(R) Then
R.Value = Fix(R.Value * 1000) / 1000
If R.Value - Int(R.Value) = 0 Then '整数
R.Value = Format(Trim(Val(R.Value)), "#,##0") & Space(4)
ElseIf R.Value * 10 - Int(R.Value * 10) = 0 Then
R.Value = Format(Trim(R.Value), "#,##0.0" & Space(2))
ElseIf R.Value * 100 - Int(R.Value * 100) = 0 Then
R.Value = Format(Trim(R.Value), "#,##0.00 ")
Else
R.Value = Format(Trim(R.Value), "#,##0.000")
End If
End If
Next R
End Sub
ありがとうございます。
整数の場合は、小数点を表示しないようにするにはVBAを使うしかないのですか。
うーん、ちょっと、大変ですね。
ご回答を参考に挑戦してみます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) 英数字のみ全角から半角に変換 4 2023/07/28 14:48
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/02 10:20
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
- Visual Basic(VBA) 指定列最終行までのスペースを改行するVBAについて 2 2022/06/01 19:50
- Excel(エクセル) Excelの複数置換はSUBSTITUTEを重ねるしかない? 9 2022/05/08 11:25
- Visual Basic(VBA) VBA 「,」・空白・カタカナ等の複数条件のマクロ 2 2023/08/23 11:57
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
- Visual Basic(VBA) 指定した文字から指定した文字のスペースまでを削除するVBAの構文について 6 2022/07/24 22:20
- Visual Basic(VBA) エクセルの数式で教えてください。 1 2023/07/31 15:49
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
PowerPointの表内のカンマ
-
エクセルの計算式でコンマを付...
-
エクセルでleft関数の結果が表...
-
エクセル 数式の無効化
-
エクセル 0.1と0.10
-
エクセルでオートサムを使った...
-
16桁以上の「0」に変換されてし...
-
エクセル 平均年齢
-
エクセルに計算式が入らない!
-
エクセルの画面上にテキストBOX...
-
エクセルで「-3E+06」と...
-
エクセルで、50銭以下切捨て...
-
セル上に表示された見かけ上の...
-
エクセルの計算結果に+(プラス...
-
エクセル 常に桁区切りにしたい
-
エクセルで深夜勤務の時間計算
-
EXCEL計算式が入っているセルを...
-
エクセルで桁を揃えるために0を...
-
エクセルで文字を両端揃えにし...
-
エクセルで囲み線で出来ますか?
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
PowerPointの表内のカンマ
-
エクセルの計算式でコンマを付...
-
エクセルでleft関数の結果が表...
-
16桁以上の「0」に変換されてし...
-
エクセルで「-3E+06」と...
-
エクセルでオートサムを使った...
-
エクセル 数式の無効化
-
セル上に表示された見かけ上の...
-
エクセルで、50銭以下切捨て...
-
エクセルの画面上にテキストBOX...
-
エクセルで囲み線で出来ますか?
-
Excelの表示形式で切り捨て
-
エクセルでの『セルの書式設定...
-
Excelで小数点を表示しつつ、桁...
-
excelでセルに「1000」と入力し...
-
エクセル 常に桁区切りにしたい
-
エクセルで小数点以下の表示桁...
-
Excelで、小数点以下を自動省...
-
エクセルの計算結果に+(プラス...
-
エクセル 平均年齢
おすすめ情報