EXCELで大文字から小文字へ変換したい

質問

ＥＸＣＥＬ２０００の住所録データを筆王の住所録へ変換しているのですが、うまくいきません。(-_-;)それは、郵便番号と電話番号が大文字（全角）になっていて、筆王の郵便番号の桁数でいくと半角で１０桁となっています。ＥＸＣＥＬのデータが大文字のため入りきれないのです。ＥＸＣＥＬの大文字数字（全角）をどうにかして小文字数字（半角）にできないものか？データが多いもので、悩んでいます。どなたかお助けくださいませm(__)m

回答No.2

dejiji- · ベストアンサー

エクセル上でセルを追加し関数で半角に変換は？
＝ＡＳＣ（元セル）
これで全角から半角になりますが。

お礼

明快なご回答有難うございます。まさか半角にできる関数があるとは思いませんでした。(^.^)

回答No.4

kbonb

こんにちは

　セル範囲あるいは列を選択してから以下のマクロを実行します。

Sub ToHankaku()
　Dim c As Range
　Dim Rng As Range

　Set Rng = Intersect(ActiveSheet.UsedRange, Selection)
　If Rng Is Nothing Then Exit Sub

　Application.ScreenUpdating = False
　　For Each c In Rng
　　　If Not (c.HasFormula) Then
　　　　c.Value = StrConv(c.Value, vbNarrow)
　　　End If
　　Next
　Application.ScreenUpdating = True
End Sub

　なお、以下は全角に変換するマクロです。

Sub ToZenkaku()
　Dim c As Range
　Dim Rng As Range

　Set Rng = Intersect(ActiveSheet.UsedRange, Selection)
　If Rng Is Nothing Then Exit Sub

　Application.ScreenUpdating = False
　　For Each c In Rng
　　　If Not (c.HasFormula) Then
　　　　c.Value = StrConv(c.Value, vbWide)
　　　End If
　　Next
　Application.ScreenUpdating = True
End Sub

　マクロについては、以下のページがご参考になるのでは？

【エクセル技道場】－マクロ
http://www2.odn.ne.jp/excel/waza/macro.html

参考URL：

http://www2.odn.ne.jp/excel/waza/macro.html

お礼

貴重なすばらしいご回答有難うございました。でも恥ずかしながら、私はマクロの使い方さえ知らないものですから、せっかく送ってくださって申し訳ございませんm(__)m

回答No.3

kaduki

私はエクセル2000ではないのですが、いつもは以下の方法でやっています。

別のセルに関数ASCで半角に変換
↓
関数の入ったセルをコピーして、貼り付けたいセルの上で右クリック「形式を選択して貼り付け」で「値」を選びます。

他にも方法があるのかどうかわかりませんが…。

お礼

明快なご回答有難うございます。まさか半角にできる関数があるとは思いませんでした。(^.^)

回答No.1

kazmisa

こんにちは
エクセルの郵便番号のセルをすべて選択して「Ｃｔｒｌ」＋「Ｈ」で置換えをする。１（全角）を1（半角）へ置き換える。
これを０から９までやる。
いかがでしょう？
「半角と全角を区別する」のチェックボックスにチェックが入っていることを確認してください。

お礼

明快なご回答有難うございます。いろんな方法があるものですね。(^.^)