英数字のみ全角から半角に変換

Excelで、全角のカタカナ・スペースはそのまま全角で、アルファベット・数字を全角→半角させるにはどうすればいいですか？（なのでASC()関数は使えません）

例えば、以下のような感じです。
A1:ヤ　１Ｒ → B1:ヤ　1R
A2:Ａ　タ４ → B2:A　タ4

よろしくお願いします。

No.4 回答者： goomania 回答日時： 2023/07/30 00:57

>全角のカタカナ・スペースはそのまま全角で、アルファベット・数字を全角

>→半角させる

とのご希望ですので、四則演算記号の+-*/は全角のままでよいという前提です。

No.3さんの回答にある
https://www.officeisyours.com/entry/2022/04/05/0 …
に掲載されている数式を古いバージョンでも使えるようにしてみましたが、殆ど力業です。
A列に変換すべき文字列があり、B列に変換結果を表示するとして、

=CONCAT(IF(EXACT(UPPER(MID(A1,COLUMN(INDIRECT("R1C1:R1C"&LEN(A1),0)),1)),LOWER(MID(A1,COLUMN(INDIRECT("R1C1:R1C"&LEN(A1),0)),1)))*ISERROR(VALUE(MID(A1,COLUMN(INDIRECT("R1C1:R1C"&LEN(A1),0)),1))),MID(A1,COLUMN(INDIRECT("R1C1:R1C"&LEN(A1),0)),1),ASC(MID(A1,COLUMN(INDIRECT("R1C1:R1C"&LEN(A1),0)),1))))･･････①

①の数式をB1セルに記述し、スピル機能のないバージョンの場合は、CTRL+SHIFT+ENTERで確定して配列数式としたうえで、下方向へコピーすれば、期待した結果になると思います。

スピル機能が有効なバージョンの場合は、①の数式を記述し、下方向へコピーするだけでOKです。

No.3 回答者： fujillin 回答日時： 2023/07/28 15:34

こんにちは

最近のバージョンなら関数でも可能みたいです。
https://www.officeisyours.com/entry/2022/04/05/0 …

No.2 回答者： mimon01 回答日時： 2023/07/28 15:08

私も、その問題に遭遇して調べたことがありますが、Excelだけで完結させるにはVBAで一文字ずつチェックするプログラムを組む必要があるという結論に達し、.csv形式で保存したものをテキストエディタで開いて全角⇔半角一括変換しました。

今、フリーソフトでその機能があるエディタとしては、サクラエディタが挙げられます。
https://sourceforge.net/projects/sakura-editor/

No.1 回答者： kairou 回答日時： 2023/07/28 15:05

下記が参考になるでしょう。

https://cs.sharp.co.jp/faq/qa?qid=108541

自分は 半角にする部分が 少ないので、
その都度 全角→半角 の切り替えで やってます。