Excel2002 セルに全角で「０．５０」を入力した時に、自動的に半角へ変換し「0.50」と表示させる方法はあるのでしょうか。※セルを数値形式にして、小数点以下の桁数を２桁に設定すれば可能ですが、小数点以下の桁数が３桁の時もあるので悩んでいます。また、末尾のゼロが表示されなくてはなりません。文字列に設定し、半角で入力すれば良いのですが、事情により不可能です。

希望しているのに合っているかは分かりませんが……

セルの書式で「0.00#」で設定すれば、小数点１桁の場合は末尾に０がついて２桁になりますし、３桁入力にも対応できますよ。

Re:希望しているのに合っているかは分かりませんが……

おお！ありがとうございます！
条件にぴたり、完璧です！

Re:希望しているのに合っているかは分かりませんが……

まず文字列でセル定義しておいてから、次のようなマクロを実行すれば
入力した状態に反映した表示が可能になります
例ではA1〜２０のみ

For I = 1 To 20
AP = Cells(I, 1).Value
AT = InStr(1, AP, ”.”)
AQ = Len(AP) - AT
Range(”A” + Mid$(Str$(I), 2, Len(Str$(I)) - 1)).Select
Cells(I, 2).Value = AT
If (AT = 0 Or AQ = 0) Then
Selection.NumberFormatLocal = ”0”
Else
Selection.NumberFormatLocal = ”0.” + String$(AQ, ”0”) + ”_ ”
End If
Cells(I, 1).Value = AP
Next

1時間はあきらめるの早いです(笑)

Re(2):希望しているのに合っているかは分かりませんが……

勉強になりました。
ありがとうございます。

ちゃんとした回答をしていない時はコメントにすればよかったですね。
すみません〜。

Re(2):希望しているのに合っているかは分かりませんが……

>1時間はあきらめるの早いです(笑)

急ぎだったので終了してしまいました(^^;

実は上司が、「半角に切り替えるの面倒くさい」というわがままを言い出しまして、だめもとで質問した次第です。
そんな方法はないだろうという私の先入観もあったので、早めに打ち切ってしまいました。

マクロはいろいろなわがままが叶えられそうですね(^^;
この機会に勉強したいと思います。ありがとうございました。