[[20190417140819]]　『法人格を表す文字を削除』（ピート）　ページの最後に飛ぶ

『法人格を表す文字を削除』（ピート）

半角カナで

例）　ｻﾝﾌﾟﾙｵｰﾌﾟﾝ(ｶ → ｻﾝﾌﾟﾙｵｰﾌﾟﾝ

      ｶ)ｱﾝﾄﾞﾚｺｰﾎﾟﾚｲﾄ → ｱﾝﾄﾞﾚｺｰﾎﾟﾚｲﾄ
      ｷｬﾀﾋﾟｰｵｰﾝ(ﾄﾞ   → ｷｬﾀﾋﾟｰｵｰﾝ

のように変えていきたいのですが、一つ一つSUBSTITUTEで
やっていくしかないですかね・・・

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

 先頭→法人格)
 最後→(法人格
 のパターンであれば
 元がA1セルだとして
 =REPLACE(LEFT(A1,IFERROR(FIND("(",A1)-1,LEN(A1))),1,IFERROR(FIND(")",A1),0),"")
 ではどうか？
（ねむねむ） 2019/04/17(水) 14:26

ねむねむさん
ありがとうございます！

途中で(ｶﾌﾞ)なども見つかったのですが、追加で可能ですか！？
（ピート） 2019/04/17(水) 14:56

うまく動きました！！
しかし

 ｱﾝﾄﾞﾚ(ｶﾌﾞ)ｺｰﾎﾟﾚｲﾄ → ＿＿＿＿＿＿＿＿＿＿＿
の場合などが空白になってしまったのですが
（ピート） 2019/04/17(水) 15:02

 =IF(SUM(COUNTIF(A1,{"*(*","*)*"})),REPLACE(A1,IFERROR(FIND("(",A1),1),IFERROR(FIND(")",A1)-IFERROR(FIND("(",A1)-1,0),LEN(A1)),""),A1)
 ???????????H
 榎爪?(玉?)紺累擴??猶歡湍紺累擴????????B
（ねむねむ） 2019/04/17(水) 15:16

 おっと、文字化け部分は
 アンドレ（カブ）コーポレイトはアンドレコーポレイトとなる。
 で。

（ねむねむ） 2019/04/17(水) 15:19

ねむねむさん
早急な対応ありがとうございます！！
うまくはめられました！！

（カブ）の部分はどこの関数できえるようになっているんですか？！
（ピート） 2019/04/17(水) 15:26

 基本はREPLACE関数で消している。
 REPLACE(文字列,開始位置,文字数,置き換え文字)
 という構文で文字列内の開始位置から文字数を置き換え文字で置き換える関数だが、
 置き換え文字を""とすることで 開始位置から文字数を削除することができる。

（ねむねむ） 2019/04/17(水) 15:35

 それを使って、(の位置から)までの文字数を消している。
 で、(がない場合（先頭にある場合）は1文字目から)までを、)がない場合（最後にある場合）は(以降を消すようにしている。
 で(も)もない場合は元の値をそのまま表示している。
（ねむねむ） 2019/04/17(水) 15:37

ねむねむさん
ありがとうございます！
丁寧に教えてくださり勉強になりました！
色々と活用できるように頑張ります！

もう一つ聞きたいのですが
（株）→株式会社
　?梶@→株式会社

 (有) →有限会社
  ?求@→有限会社
等の略称を↑のように直す場合は今度こそSUBSTITUTEで
いかないといけませんか・・・？何度もすいません！

文字化け部分は（株）・(有)
の環境依存文字になっています。
（ピート） 2019/04/17(水) 15:41

 初めのものは()だけで判定していたが今度は()内で判断しないとならないので
 SUBSTITUTEのネストということになるかと。
（ねむねむ） 2019/04/17(水) 15:52

ねむねむさん

ありがとうございます！
地道にSUBSTITUTEしていこうと思います！！！
（ピート） 2019/04/17(水) 15:57

コメント返信：

[ 一覧(最新更新順) ]

[[20190417140819]] 『法人格を表す文字を削除』（ピート） ページの最後に飛ぶ

[[20190417140819]]　『法人格を表す文字を削除』（ピート）　ページの最後に飛ぶ