• ベストアンサー

excel ひらがな文を半角カタカナに変換したい

freetakaの回答

  • ベストアンサー
  • freetaka
  • ベストアンサー率53% (106/197)
回答No.2

であれば もう1つの方法として以下のコードを 標準モジュールへ追加記述してください Function KanConv(strText As String) As String strText = Application.GetPhonetic(strText) KanConv = StrConv(strText, vbNarrow) End Function 使用方法は一緒です =KanConv(A1) たとえばA1に入力された文字が「名無しのなな子」だった場合 「ナナシノナナコ」と表示されると思いますが 「名無しの権兵衛」だった場合は「ナナシノケンベエ」と表示されました 漢字部分はフリガナを取得するようにしていますので 必ずしも完全に一致したカタカナ変換は無理な場合がありますので その場合には手修正が必要になるかもしれません それでもよければこのユーザー定義関数でいけると思います ちょっとテストした環境がExcel2007なので 2000のほうでテストお願いします

milktea_ca
質問者

補足

ご返答、ありがとうございます!! ご指摘通りにexcel2000で、試してみたところ・・・ HiraConvは、正常なのですが、KanConvはvalueと出てしまいます。 助けてください。 本当に書かれている動作が出来ると助かります!! 度々、すみません。

関連するQ&A

  • excel ひらがな文を半角カタカナに変換したい 2

    以前にOKWaveにて質問した内容です。 http://okwave.jp/qa5273311.html ”excel2000で、ある列にひらがな入力された文があります。 違う列にそのひらがな入力された文を半角カタカナにして表記したいのですが、何か良い方法はありますか?? 関数やVBA、何でも良いので、教えてください!! ※すでに入力されているひらがな文は、CSVファイルから持ってきてます。” 頂いた、お答えで ”ユーザー定義関数を作成し利用するのがいいですね 標準モジュールへ記述してください Option Explicit Function KanConv(strText As String) As String strText = Application.GetPhonetic(strText) KanConv = StrConv(strText, vbNarrow) End Function ” との事でした。 今回の質問させていただくのは、上記で関数を作成したのですが すでに入力された文字が、全角100文字以内でないと変換されないのです。 100文字を超えると空欄になります。 文は、100文字を超えるものが出てきます。 どうか、助けてください。

  • エクセルで確定したひらがなをカタカナ半角にできますか?

    Excel2000を使用しています。 今までひらがなで入力していた部分(氏名ふりがな)を、 半角カタカナにして欲しいと言われました。 データは500件くらいあるので、できれば手入力以外の 方法で変換したいのです。 エクセル初心者で申し訳ありませんがご教授くださいますようお願いします。

  • エクセル ひらがなを半角カタカナにできますか?

    Excelで名簿を作成中です。 ひらがなを半角カタカナにする機能or関数はありますか? おわかりの方教えてくださーい!

  • エクセルでひらがな入力した列を半角カタカナに一括変換するには?

    エクセルに約500件もひらがな入力した列を、半角カタカナに一括変換するにはどうすればいいのでしょう?全角英数字を半角英数字に変換は出きるようですが、こんなこと出きるのでしょうか?

  • 半角カタカナを全角ひらがなにしたい

    EXCEL2003です。 よろしくお願いします。 今c1~c200に半角のカタカナで人のふりがなが入っています。 これをC1~C200のところに全角ひらがなに直す方法は ありますか。 どのようにしたらよいのか教えてよろしくお願いします。 全角ひらがなにする場所はD1~D200でも構いません。

  • エクセルでひらがなをカタカナに

    Excel2000を使っています。 ひらがなをカタカナに変換する関数を教えてください。

  • 半角カタカナになってします

    テーブルに入力する時フリガナは半角カタカナで大丈夫なんですが、住所や名前を入力するところまで勝手に半角カタカナになってしまいます。自動でひらがなで入力できる方法を教えてください。

  • 半角カタカナを全角カタカナに変換したい

    Windows2000/Microsoft Excel2000です。 入力されている文字列のカタカナが半角になっているのを 全角に一括変換する数式はありますでしょうか? 英数字は半角のまま残したいのですが。 JISを使うと英数字も全角になってしまいます。 ヘルプいただけると大変助かります。

  • エクセルでひらがな・漢字はそのままでカタカナを全角・英数字を半角にする方法

    エクセル2000を使っています。 会社で住所録作成を引き継ぎましたが、 一つのセルにひらがな、漢字、カタカナ、英数字 が半角・全角ごちゃ混ぜで入っているので 管理がしづらくて困っています。 例えば、 あいうアジアNET株式会社 株式会社ABC123 などなど・・・・ ひらがな・漢字はそのままで、 カタカナを全角、英数字を半角にする方法は ありませんか? 最初にASC関数を使ってみたらカタカナも半角になり、 Phonetic関数を使うと、 カタカナだけ全角になりましたが、 ひらがなまでカタカナになり・・・ JIS関数も試しましたが今度は英数字まで全角になり、 どうしたものかと困っております。 よろしくお願いします。

  • 半角カタカナになる

    windows98secondeditionを使用していますが ローマ字入力した時の文字がなぜかひらがなではなく半角カタカナ になってしまいます。 いちいち「カタカナ/ひらがな」キーを押すのは面倒なのもので なんとか直す方法を教えてください。 よろしくお願いします。