[[20170421141124]]　『カッコ内のみ半角にする』（もりお）　ページの最後に飛ぶ

『カッコ内のみ半角にする』（もりお）

文章の途中で入るカッコの中の文字が「カナ英数字」のいずれかの場合のみ、カッコ内を半角表示したいのですが。
ASCを使用すると全て半角になってしまうので。。。

例

空調機Ｂタイプ（リモコンＡＲＣ４７６Ａ２０）

空調機Ｂタイプ（ﾘﾓｺﾝARC476A20）

＜使用 Excel：Excel2013、使用 OS：Windows7 ＞

 元の文字列がA1セルにあるとして。
 =IFERROR(LEFT(A1,FIND("（",A1))&ASC(REPLACE(LEFT(A1,FIND("）",A1)-1),1,FIND("（",A1),""))&REPLACE(A1,1,FIND("）",A1)-1,""),A1)
 ではどうか。
（ねむねむ） 2017/04/21(金) 14:33

あ、被った。

括弧の中身を別セルにして管理してあれば楽だと思うのですが。

 =LEFT(A1,SEARCH("（",A1))&ASC(MID(A1,SEARCH("（",A1)+1,SEARCH("）",A1)-SEARCH("（",A1)-1)&RIGHT(A1,LEN(A1)-SEARCH("）",A1)+1))
（???） 2017/04/21(金) 14:33

 必ず例のように 文字（文字） になっているのが前提ですが
 =IFERROR(LEFT(A1,FIND("（",A1))&ASC(MID(A1,FIND("（",A1)+1,FIND("）",A1)-FIND("（",A1)-1))&"）",A1)
（bi） 2017/04/21(金) 14:57

（ねむねむ）様、他の方もありがとうございました。
出来ました！
が、聞いたついでで申し訳けないですが、カッコの前後の文字が半角になっていた場合もありまして。。。
半角の場合は全角にしつつ、カッコ内のカナ英数字のみ半角にしたいです。
自分でみなさんの数式にJISを付けたりしましたが、無理でした。すみません！

例

空調機Bﾀｲﾌﾟ（リモコンＡＲＣ４７６Ａ２０）

空調機Ｂタイプ（ﾘﾓｺﾝARC476A20）

（もりお） 2017/04/21(金) 15:20

 単なる対症療法なので長くなったが。
 =IFERROR(LEFT(A1,FIND("（",SUBSTITUTE(A1,"(","（"))-1)&"（"
  &ASC(REPLACE(LEFT(A1,FIND("）",SUBSTITUTE(A1,")","）"))-1),1,FIND("（",SUBSTITUTE(A1,"(","（")),""))&"）"
  &REPLACE(A1,1,FIND("）",SUBSTITUTE(A1,")","）")),""),A1)
（ねむねむ） 2017/04/21(金) 15:47

私の例だと、括弧より前、括弧内、括弧より後と、3つに分けてから連結しているだけなので、前後はJIS関数で全角にするだけ。
=JIS(LEFT(A1,SEARCH("（",A1)))&ASC(MID(A1,SEARCH("（",A1)+1,SEARCH("）",A1)-SEARCH("（",A1)-1)&JIS(RIGHT(A1,LEN(A1)-SEARCH("）",A1)+1)))
（???） 2017/04/21(金) 16:25

 ああ、すまない。
 質問を「カッコが全角・半角の場合がある」と読み違えていた。

 （ねむねむ） 2017/04/21(金) 15:47
 の式は無視してくれ。
（ねむねむ） 2017/04/21(金) 16:29

例示のように、必ず括弧で終わるようならば、もう少し短くできます。
=JIS(LEFT(A1,SEARCH("（",A1)))&ASC(MID(A1,SEARCH("（",A1)+1,SEARCH("）",A1)-SEARCH("（",A1)-1)&"）")
（???） 2017/04/21(金) 16:29

 =IFERROR(JIS(LEFT(A1,FIND("（",A1)))&ASC(REPLACE(LEFT(A1,FIND("）",A1)-1),1,FIND("（",A1),""))&JIS(REPLACE(A1,1,FIND("）",A1)-1,"")),A1)
 で。
（ねむねむ） 2017/04/21(金) 16:32

コメント返信：

[ 一覧(最新更新順) ]

[[20170421141124]] 『カッコ内のみ半角にする』（もりお） ページの最後に飛ぶ

[[20170421141124]]　『カッコ内のみ半角にする』（もりお）　ページの最後に飛ぶ