文字列の分解

質問

1つのセルに入力された文字列を分解したいのです。
例えばφ20 ＋0.010/＋0.001と有る場合別のセルにφ20、＋0.020、＋0.001と分解したいのです。
=MID(C1,1,FIND(" ",C1)-1)
=MID(C1,FIND(" ",C1)+1,6)
=MID(C1,FIND("/",C1)+1,FIND("/",C1))
としているのですが、文字列に”　”や”/”がない場合は#VALUE!となり表示出来ませんし、＋0.010の部分の桁が増減すると上手く表示が出来なく成ります。
何かいい方法は無いでしょうか？

回答No.5

maron--5

#4のmaronです
★B1の式を右と下にコピーしてください

回答No.4

maron--5

>文字列に”　”や”/”がない場合は#VALUE!となり表示出来ません
>＋0.010の部分の桁が増減すると上手く表示が出来なく成ります。
◆とりあえず、上の問題はクリアしています
　　　　　　　　A　　　　　　　　　　　　　B　　　　　C　　　　　　　D
1　　φ20 ＋0.010/＋0.001　　　φ20　　　＋0.010　　　＋0.001
2　　φ20＋0.010＋0.00234　　　φ20　　　＋0.010　　　＋0.00234

B1=TRIM(INDEX(MID(SUBSTITUTE(SUBSTITUTE($A1,"/",),"＋",REPT(" ",50)&"＋"),ROW($1:$50)*50-49,50),COLUMN(A1)))

回答No.3

grumpy_the_dwarf

要するに、φの後に数値, 正負符号付き数値, 正負符号付き数値って分け
ればいいんでしょ。「データ」→「区切り位置」で、スペースとスラッ
シュを区切りに指定するって手口はどうでしょうね。

スペースやスラッシュが無い場合ってのがどういう状態で、どういう風に
区切りたいのか不明なんだけど、大量にあるのならExcelに執着するのは
やめて、正規表現の使えるエディタで一気に整形してCSVにでもして読み
込み直すのが手っ取り早くて好きです。愛用のJEditは、
{φ[\d\.]+}.*{[＋ー\+\-][\d\.]+}.*{[＋ー\+\-][\d\.]+}を\1,\2,\3に
置換しろといえばスペースやスラッシュが欠落してたり符号が1バイトと
2バイトごちゃごちゃだったりしても、全部きれいに分離したCSVを作って
くれます。

回答No.2

imogasi

FIND関数は探索した文字が無いときはＩＳＥＲＲＯＲで捉えます。
ーー
次の２点を明確に区別して
(区切りの問題）
第２と第３の区切りが、実例では良くわかりません。スペースですか
第１はスペース
第２は/
または/+か？
ーー
（有無を判別する問題）
有無の捉えるのは
第１はシータ
第２はスペース＋「＋」
第３は/+
かな。ＩＦのネストでややこしくなるが、関数で不可能ではない。
しかし、小生なら、ＩＦのネストと、関数の文字数が増えるのが嫌いで、ＶＢＡでユーザー関数を作るのが好みかな。

回答No.1

mshr1962

下記のようにすれば#VALUE!と桁の増減に対処できます。
C2=MID(C1,1,FIND(" ",C1&" ")-1)
C3=MID(C1,LEN(C2)+2,MAX(FIND("/",C1&"/")-LEN(C2)-2,0))
C4=RIGHT(C1,MAX(LEN(C1)-FIND("/",C1&"/"),0))