半角カタカナ

■動機エクセルVBAで半角カタカナを全角に変換したい。条件は下記。・半角英数は半角のままとする。・濁点は、ｶﾞ（２字）→ガ（1字）とする。・濁点は、ｶﾞ（２字）→カ゛（２字）は不可。サイトを探したが見つからない、上記条件を満たさない、コードが難しいやら長いやら、解説も難解長文。素人の自分にはもっと短くて分かり易いコードが欲しい。低速でも構わない。力技で解決した。改行ナシなら僅か9行。調整も容易。---------------------------------------S

・半角^[-~｡-ﾟ]*$・全角（半角ではないで判定）^[^-~｡-ﾟ]*$・半角数字^[0-9]*$・半角英字（大文字、小文字）^[a-zA-Z]*$・半角英数字^[0-9a-zA-Z]*$・漢字^[一-龠]*$・全角ひらがな（長引音「ー」含む）^[ぁ-んー]*$・全角カタカナ（長引音「ー」含む）^[ァ-ヶー]*$・半角カタカナ^[ｱ-ﾝ

【要約】問題点：Windows11でQRコードの半角カナが文字化けする。原因：新しいMicrosoftIMEだと文字化けする。対策：「以前のバージョンのMicrosoftIMEを使う」をオンにする。エクセルで作ったQRコード【概要】エクセルで作ったQRコードをリーダーで読んでみると半角カタカナが文字化けします。ネットで調べても「ShiftJISやUTF-8がどうのこうの」という情報ばかりで解決に結びつきません。いろいろと試してみると以下の状況が分かりました。（使