- ベストアンサー
Excelの特定のカラムの中身だけカタカナ→ひらがな変換したい
タイトルのとおりです。 Excelに住所録を入れていますが、「ふりがな」が半角カタカナ、全角カタカナ、ひらがなの混在状態となっています。 「ふりがな」のカラムだけを、半角・全角カタカナ→ひらがな変換したいのですが、良いツールはないでしょうか? 当方、Excelのマクロを組むだけの力量は持ち合わせておりません。 一旦、Excelから他のツールに書き出してから変換し、元に戻すというのでも構いません。 なお、「ふりがな」意外の欄には、カタカナのままで残しておきたいデータが入っていますので、シート全体の文字を変換されては困ります。 どなたか、アドバイスを頂ければ幸いです。
- みんなの回答 (4)
- 専門家の回答
質問者が選んだベストアンサー
こんにちは。 マクロを組む力はなくても、貼り付けるぐらいは可能ではないでしょうか? バージョンは分かりませんが、シートのタブを右クリックして、コードの表示から 以下のコードを貼り付けて、シートに戻れば、設定は出来上がりです。 後は、マウスで範囲を選択して、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
その他の回答 (3)
- takana_
- ベストアンサー率44% (21/47)
WORDが同一パソコンにインストールされている前提ですが 「ふりがな」の列をクリップボードにコピー ↓ WORDに貼り付け ↓ WORDのメニュー[書式]→[文字種の変換]→[ひらがな]を選択 ↓ 変換後の表をクリップボードにコピー ↓ EXCELのメニュー[編集]→[形式を選択して貼り付け]→[テキスト]を選択
お礼
御回答ありがとうございました。 このやり方は盲点でした。 これなら、素人の私でも簡単にできそうです。 早速やってみます。
- KURUMITO
- ベストアンサー率42% (1835/4283)
エクセル2007でしたらA列を選択してから「ホーム」タブの「フォント」グループにある「ふりがなの表示・非表示」ボタンの▼から「ふりがなの設定」を選択し、種類の項で[ひらがな]を選択すればよいでしょう。
お礼
御回答ありがとうございました。 エクセルのバージョンも書かず、失礼しました。 今回お尋ねしたのは、「ふりがなの表示」ではなく、 セルに手入力した文字の変換でした。 質問の仕方が悪く、失礼しました。
- KURUMITO
- ベストアンサー率42% (1835/4283)
例えばA列に氏名などがありB1セルには=PHONETIC(A1)としてフリガナを表示させているとしたらA列を選択してエクセル2003などでは「書式」から「ふりがな」で「設定」をクリックします。 「ふりがな」のタブから種類の項で「ひらがな」にチェックをすればよいでしょう。
お礼
早速の御回答ありがとうございました。 質問の仕方が悪かったですが、=PHONETIC(A1)ではなく 直接セルにふりがなを手入力したシートです。
お礼
御親切にありがとうございます。 このコードを貼り付けるくらいなら私の実力でも何とか なります! 早速、試してみます。ありがとうございました。