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

解決済みの質問

Excelの特定のカラムの中身だけカタカナ→ひらがな変換したい

タイトルのとおりです。

Excelに住所録を入れていますが、「ふりがな」が半角カタカナ、全角カタカナ、ひらがなの混在状態となっています。
「ふりがな」のカラムだけを、半角・全角カタカナ→ひらがな変換したいのですが、良いツールはないでしょうか?

当方、Excelのマクロを組むだけの力量は持ち合わせておりません。
一旦、Excelから他のツールに書き出してから変換し、元に戻すというのでも構いません。

なお、「ふりがな」意外の欄には、カタカナのままで残しておきたいデータが入っていますので、シート全体の文字を変換されては困ります。

どなたか、アドバイスを頂ければ幸いです。

投稿日時 - 2009-09-19 10:04:26

QNo.5302041

困ってます

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

こんにちは。

マクロを組む力はなくても、貼り付けるぐらいは可能ではないでしょうか?
バージョンは分かりませんが、シートのタブを右クリックして、コードの表示から
以下のコードを貼り付けて、シートに戻れば、設定は出来上がりです。

後は、マウスで範囲を選択して、Alt+ F8 で、[TransFormChar] という名称があるはずですから、それをクリックすれば、実行されます。実行する前に、保存したり、バックアップしておくことをお勧めします。

ただし、現在は、カタカナが含まれていたら英数までも、全角に変換されてしまいます。

'---------------以下より貼り付け----------------------------

Sub TransFormChar()
  Dim mySelection As Variant
  Set mySelection = Selection
  If mySelection Is Nothing Then MsgBox "範囲を選択してください。", vbInformation: Exit Sub
  Application.ScreenUpdating = False
  For Each c In mySelection
    If StrConv(c.Value, vbWide) Like "*[ァ-ン]*" Then
      c.Value = StrConv(c.Value, vbWide + vbHiragana)
    End If
  Next c
  Application.ScreenUpdating = True
End Sub

投稿日時 - 2009-09-21 11:40:29

お礼

御親切にありがとうございます。
このコードを貼り付けるくらいなら私の実力でも何とか
なります!
早速、試してみます。ありがとうございました。

投稿日時 - 2009-09-22 06:21:39

ANo.4

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

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

回答(4)

ANo.3

WORDが同一パソコンにインストールされている前提ですが
「ふりがな」の列をクリップボードにコピー

WORDに貼り付け

WORDのメニュー[書式]→[文字種の変換]→[ひらがな]を選択

変換後の表をクリップボードにコピー

EXCELのメニュー[編集]→[形式を選択して貼り付け]→[テキスト]を選択

投稿日時 - 2009-09-20 11:32:23

お礼

御回答ありがとうございました。
このやり方は盲点でした。
これなら、素人の私でも簡単にできそうです。
早速やってみます。

投稿日時 - 2009-09-22 06:19:31

ANo.2

エクセル2007でしたらA列を選択してから「ホーム」タブの「フォント」グループにある「ふりがなの表示・非表示」ボタンの▼から「ふりがなの設定」を選択し、種類の項で[ひらがな]を選択すればよいでしょう。

投稿日時 - 2009-09-19 10:22:03

お礼

御回答ありがとうございました。
エクセルのバージョンも書かず、失礼しました。
今回お尋ねしたのは、「ふりがなの表示」ではなく、
セルに手入力した文字の変換でした。
質問の仕方が悪く、失礼しました。

投稿日時 - 2009-09-22 06:18:15

ANo.1

例えばA列に氏名などがありB1セルには=PHONETIC(A1)としてフリガナを表示させているとしたらA列を選択してエクセル2003などでは「書式」から「ふりがな」で「設定」をクリックします。
「ふりがな」のタブから種類の項で「ひらがな」にチェックをすればよいでしょう。

投稿日時 - 2009-09-19 10:16:06

お礼

早速の御回答ありがとうございました。
質問の仕方が悪かったですが、=PHONETIC(A1)ではなく
直接セルにふりがなを手入力したシートです。

投稿日時 - 2009-09-22 06:16:22

あなたにオススメの質問