【Excel2007】カラムとデータの不揃い解消

質問

エクセルが得意な方、是非助けてください！

現在、エクセル上に、いわゆるデータベースのような
カラム→データという表があります。

通常であれば、年齢のカラムには20とか24とか入るかと思いますが、
現在あるデータは年齢に性別の男性とか女性が入っていたり、
職業に年齢が入っていたりなど、カラムとデータがちぐはぐに
なっている状態です。

これをカラム＝データになるようにするにはどのような方法が
ございますでしょうか。

＜カラム＞
年齢 性別 職業
＜データ＞
20歳 男性 会社員
主婦 30歳 女性
女性 医者 40歳

上記表のイメージが数千件あるため、
なかなか手作業では厳しい状態です。

ちなみに、データはある程度規則性があるので、
多くても職業のカラムで20種類程度で収まります。
性別は2種類、年齢は5歳刻みのデータとして
保持しています。

回答No.2

mt2008 · ベストアンサー

失礼！
E2セルの式は↓にしてください
=""&IF(ISNUMBER(1*LEFT(A2,1)),A2,IF(ISNUMBER(1*LEFT(B2,1)),B2,IF(ISNUMBER(1*LEFT(C2,1)),C2,"")))

回答No.7

tom04

No.3・6です。

投稿後もう一度補足を読み返してみると
＞カラム数及びデータ種類・・・

データ種類は前回回答した通りなのですが、「列」が増える！というコトは
他の条件（たとえば住所・電話番号等）が増えるという意味でしょうか？

そうであれば増えるデータ次第で使いない数式になってしまう可能性があります。
具体的な例が判れば、回答もしやすいのですが・・・

※　場合によってはマクロで処理する必要があるかもしれません。m(_ _)m

回答No.6

tom04

No.3です。

補足の件に関して・・・
＞この関数2種は、カラム数及びデータ種類（例えば会社役員、主婦、無職など）が増えた場合でも
＞同じ関数で対応可能なのでしょうか？？

前回の数式は同じ行に必ず「○歳」・「男性（女性）」・「職業」の3種類のセルが
必ずある！という前提です。
その大前提さえ間違っていなければ
G列の数式は「○歳」と「男性（女性）」のセル以外を表示していますので、
仮に「職業」が何百種類あっても問題ありません。

G列の数式は
E・F列に表示されている以外のセルを表示するようにしています。m(_ _)m

回答No.5

mt2008

連続して失礼しました。
ANo.4の投稿は別質問と混ざって、誤って投稿してしまいましたので無視して下さい。

回答No.4

mt2008

「男沢」とか「女川」の様に「男」や「女」で始まる苗字の人が居たらごめんなさい。
その場合は名前が性別に分類されてしまいますが、レアケースという事で手でなおしてください。

回答No.3

tom04

こんばんは！
一例です。

↓の画像のような配置とします。
（E・F列は一つの数式で処理できるように、2行目に「歳」・「性」という文字を入れています）
これはその文字が含まれているセルを選択するためです。

画像ではE3セルに
=IFERROR(INDEX($A3:$C3,,SUMPRODUCT(ISNUMBER(FIND(E$2,$A3:$C3))*COLUMN($A3:$C3))),"")
という数式を入れ隣りのF3セルまでフィルハンドルでコピー！
G3セルに
=IFERROR(INDEX(A3:C3,,SUMPRODUCT((A3:C3<>E3)*(A3:C3<>F3)*COLUMN(A3:C3))),"")
という数式を入れ、
最後にE3～G3セルを範囲指定　→　G3セルのフィルハンドルで下へコピー！
これで画像のような感じになります。m(_ _)m

補足

tom04さん

早々の回答ありがとうございます！！

１点教えてください。

この関数2種は、カラム数及びデータ種類（例えば会社役員、主婦、無職など）が増えた場合でも
同じ関数で対応可能なのでしょうか？？

よろしくお願いします！！

回答No.1

mt2008

データが本当にこの3種類なら……

1文字目が数字のセルを年齢。「男」または「女」で始まるセルが性別。それ以外が職業……としました。
添付の図では、以下の様な式を入れています。

E2セル：=""&IF(ISNUMBER(1*LEFT(A2,1)),A2,IF(ISNUMBER(1*LEFT(B2,1)),B2,C2))
F2セル：=IFERROR(INDEX(A2:C2,MATCH("男*",A2:C2,0)),"")&IFERROR(INDEX(A2:C2,MATCH("女*",A2:C2,0)),"")
G2セル：=SUBSTITUTE(SUBSTITUTE(A2&B2&C2,E2,""),F2,"")

お礼

mt2008さま
ご連絡が遅くなりまして、すみません。

早々にご回答をいただきまして、ありがとうございました！
非常に参考になり、大変助かりました。

取り急ぎ、厚く御礼まで。