みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

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

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

投稿日時 - 2002-12-21 12:17:15

QNo.432796

すぐに回答ほしいです

質問者が選んだベストアンサー

エクセル上でセルを追加し関数で半角に変換は?
=ASC(元セル)
これで全角から半角になりますが。

投稿日時 - 2002-12-21 12:25:00

お礼

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

投稿日時 - 2002-12-23 10:00:44

ANo.2

このQ&Aは役に立ちましたか?

1人が「このQ&Aが役に立った」と投票しています

回答(4)

ANo.4

こんにちは

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

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

投稿日時 - 2002-12-21 12:52:55

お礼

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

投稿日時 - 2002-12-23 09:59:04

ANo.3

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

別のセルに関数ASCで半角に変換

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

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

投稿日時 - 2002-12-21 12:26:35

お礼

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

投稿日時 - 2002-12-23 10:00:24

ANo.1

こんにちは
エクセルの郵便番号のセルをすべて選択して「Ctrl」+「H」で置換えをする。1(全角)を1(半角)へ置き換える。
これを0から9までやる。
いかがでしょう?
「半角と全角を区別する」のチェックボックスにチェックが入っていることを確認してください。

投稿日時 - 2002-12-21 12:22:47

お礼

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

投稿日時 - 2002-12-23 10:01:37

あなたにオススメの質問