• ベストアンサー

関数かVBAで拗音促音ァィゥェォッャュョヮを変換

maverik1226の回答

回答No.1

こんばんわ こんなんで、どうでしょうか? Sub Test() '★A1セルに入力してある文字を、B1セルに変換して出力します With Sheets(1) '全角ひらがな→半角カナの場合 .Range("B1").Value = StrConv(StrConv(.Range("A1").Value, vbKatakana), vbNarrow) '全角カナ→半角カナの場合 .Range("B1").Value = StrConv(.Range("A1").Value, vbNarrow) End With End Sub

emaxemax
質問者

お礼

このサイトは半角カナが表示できないので誤解を生んだかと思います。 全角ひらがな→半角カナでも全角カナ→半角カナでもありません。 現在半角カナになっている拗音、(例:キャ・キュ・キョ の小さなャュョなど)とか促音(バットの小さな゛ッなど)を、半角のヤユヨやツに変換したいのです。 よろしくお願いします。

関連するQ&A

  • 小学生への拗音・促音の教え方

    小学1年生の息子ですが、拗音・促音の理解がうまくいかないようです。 絵や文字を見て言葉にする事は出来るのですが、書き取りが上手にできません。 何か効率のよい教え方はないですしょうか?アドバイスお願いします。

  • 拗音や促音にない文字の入力

    ゃ、ゅ、ょ、っなどは拗音、促音にあるので普通に小さい文字が入力できますが例えばサ行の小さい文字などは入力できませんか?OEや携帯のメールで・・・

  • エクセルで名寄せ

    エクセル2000です。 エクセルに過去の契約データ約1万件分が契約の日付順に打ち込まれています。 A列に契約者名、B列に契約日といった具合に1件1行で20列ほどのデータです。 新しい契約が発生すると追加し、変更があればデータを修正し、契約が終了するとそのデータに終了フラグを立てます。契約締結、変更および終了の連絡がきたらその都度入力してデータを更新します。 ところが社内の連絡が悪く、報告漏れがあったり、大幅に遅れたり、二重に報告されたりします。そのため連絡があれば、それが過去に連絡があったものかどうかを検索しなくてはなりません。 これまでの担当者は、検索用に「カナ」という列を設けて、契約者名から株式会社とかを抜いた部分を半角カタカナで入力していたようです。 ところがこれまで何人も担当が変わったのでさまざまな入力が行われていました。 たとえば長音が「ー」でなくハイフンになっていたり、拗音や促音が小さくなっていなかったり、外国法人の場合は英文だったりカタカナだったりと整合性がとれていません。 今度、この仕事をわたしが引き継ぎましたが、元データを見ただけでいやになりました。 そこで検索を簡単にするために元データのカナ表記方法を統一しようと思いました。 ところがハイフンを長音に変えるのは置換えで簡単にできますが拗音や促音の扱いをどうするかで困ってしまいました。 もともと拗音や促音は「ァィゥェォッャュョヮ」しかないのでこれを小さくない半角に変換はできますが、逆に本来小さい字(なんて呼ぶのでしょう、1/4角?)で書くべきアイウエオツヤユヨワと拗音や促音でないアイウエオツヤユヨワが1件ずつ漢字の契約者名と見比べていかないと判別できません。(Phonetic関数は使えないデータです。) これは逆行するようですが、拗音や促音は使用せず、ただの半角で統一したほうがよいのでしょうか? このような名寄せに詳しい方のご意見をお聞かせください。

  • 「拗音」(きゃ・きゅ・きょ)の教え方

    来年から小学生の息子にひらがなを教えています。 50音は読めるようになり、次に拗音(きゃ・きゅ・きょ など)を 教えようとしたところ、つまずきました。 『き』と『や』は読めるのに、『き』に小さい『や』で『きゃ』と 読むということがどうしてもわからないようです。 拗音の法則(?)をどのように教えたらいいのか、わかりません。 何か良い方法がありましたら教えてください。 よろしくお願いします。

  • 日本語の分類(促音)について少し疑問に思っていることがあるので宜しくお

    日本語の分類(促音)について少し疑問に思っていることがあるので宜しくお願いします。  小さい『や』行は拗音で小さい『つ』は促音というのは解るのですが以前は『くぁ』や『くゎ』などの文字もありそれも促音に分類されていたが今はもう使われないので『っ』だけが促音として残ったと言うように読みましたがが今でも小さい『あ』行などは使いますが促音にはならないのでしょうか?もし促音で無いならほかの呼び方があるのでしょうか?また以前『わ』行の『ゐ』は普通の『い』と小さい『ぃ』の間の音で半促音だと聞いたことがありますが検索しても半促音という言葉は見当たりませんがそういう呼び方もあったのでしょうか?また『わ』行の『ゑ』は『あ』と『え』の間の音だと聞きましたが、テレビのCMでも『ヰセキ』や『ヱビスビール』でも発音で区別されていないように思いますが違いがあるのでしょうか?  以上ゴチャゴチャして解りづらい文章になってしまいましたがお解かりになる方回答宜しくお願い致します。

  • 拗音や小さい母音の決まり

     小さい字、つまり母音(A)や拗音(B)、促音(C)ですが、「○(AやBやC)の場合、前に付く字は~でなければならない」と明確な定義があるのでしょうか?    例えば、小さい”ユ”の場合、「タチツテト」なら「チュ」はよく使われますが、「タュ」は無理だと思います。「ツュ」・「テュ」は認められるのでしょうか?「ュ」なら何段はOKで、何段は認められないとかあるのでしょうか?「イ段」は良さそうですね。  促音は全て大丈夫でしょうか?  若い女性の言葉で「ゎたし」とか(だったっけかな?)あるけど、「小さい母音」の決まりはどうでしょう?  今気付きましたが(恥ずかしい・・・)、「小さい”わ”」もあるんですね。知らなかった・・・。 

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

    表題の通りです。 先輩から引き継いだエクセルのデータが、全角カナと半角カナとの両方を、使い分けなどではなく使用しているものだったので、半角カナを全部、全角カナに変換したいと考えています。 置換機能で50音全部を置換するのは大変ですので、一度に変換する良い方法があれば教えてください。 また、全角アルファベットを、普通の英字(半角アルファベット?)にも変換したいと思っています。

  • Excelで半角カナのみを全角に変換したい

    EXCELで、半角カナのみを全角に変換する方法はありますか? JISという関数がありますが、これは英数まで全角に変換されてしまいます。

  • カナ文字一括半角変換方法

    エクセルでカナ全角入力した文章を 一括で半角に変換できる方法を教えて下さい。

  • EXCEL 関数

    全角カナ文字を半角英数に変換したい。 例えば、<キタノ>⇒<kitano>。全角カナ文字を半角カナ文字に変換するのではなく、半角英数に変換したいのです。宜しくお願いします。