[[20070226221018]] 『小数点二桁の有効表示について』(団塊のオッサン) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『小数点二桁の有効表示について』(団塊のオッサン)
 小数点二桁活用で、小数点以下二桁が.00の場合はブランクにして、
 .25の場合は有効表示とする場合、どの様な関数を使えば良いでしょうか、
 教えて下さい。Excel2003・WindowsXP
 例:125.25
   125

 数式で表示させる場合には、文字フォントをそのようなものに変更する必要があると思います。
 以前にも書いたような気がしますが、ごく簡単なマクロです。
 当該範囲を選択して実行しますと、右から桁揃えして再表示できます。  (6UP)

 Sub Macro1()
 Dim R As Range
     Selection.NumberFormatLocal = "0.00"
     For Each R In Selection
     If Right(R.Text, 2) = "00" Then R.NumberFormatLocal = "0_._0_0": GoTo XX
     If Right(R.Text, 1) = "0" Then R.NumberFormatLocal = "0.0_0"
 XX: Next
 End Sub

 このマクロは、小数点以下の桁数の異なる数値を再入力した場合に
 自動的に表示が変更されるものでは、ありません。

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.