[[20090806114852]]　『VLOOKUP関数』（工程）　ページの最後に飛ぶ

『VLOOKUP関数』（工程）

 工程管理をしている者ですが、下のような表で工程（PG・BC等）を管理しています。
 Ａ列には製品名、Ｂ～Ｋ列には対応する工程名が入っていて、Ｌ列に工程を連ねて
 書きたいのですが。
 VLOOKUP関数を使ってみたのですが、工程数が製品毎に違うため、
 "-"がうまくいきません。（工程がなくても"-"が入ってします）
 どなたか教えてください。
 よろしくお願いします。

    A 　   B   C   D   E   F  G ・・・L
 1  製品1　 PG  BC  TM　　　　　　　　PG-BC-TM　　　　　　　　　　　　  
 2  製品2　 PG  ED  TF  CD　　　　　　PG-ED-TF-CD　
 3  製品3　 BC  TM  CD  FF  OK　　　　BC-TM-CD-FF-OK
 4  製品4 　BC  TM　　　　　　　　　　BC-TM
 5
 6
 ・
 ・
 ・

 ご提示の例だと、こんな感じで出来ると思います。
=SUBSTITUTE(TRIM(B1&" "&C1&" "&D1&" "&E1&" "&F1&" "&G1&" "&H1&" "&I1&" "&J1&" "&K1)," ","-")

 (HANA)

 衝突ー

 vlookupではありませんが、ここで見つけて便利に使ってるマクロがあります。

 Function REPTCON(a As Range, b As String)
 '範囲を指定した文字で区切って繋げるユーザー関数

 Dim i As Range, C As String
    For Each i In a
        If i <> "" and i.RowHeight > 0 And i.ColumnWidth > 0 Then C = C & b & i.Text
    Next
    REPTCON = Mid(C, Len(b) + 1)
 End Function

 手直しするの忘れてた・・
 訂正しました。
 （12：17）

 シートタブを右クリック、コードの表示
 挿入＞標準モジュールに上のを書き込んでください。
 L列に
 =REPTCON(B1:K1,"-")
 これでいかがですか？

 （とおりすがっ太）

できました。
皆様ありがとうございました

コメント返信：

[ 一覧(最新更新順) ]

[[20090806114852]] 『VLOOKUP関数』（工程） ページの最後に飛ぶ

[[20090806114852]]　『VLOOKUP関数』（工程）　ページの最後に飛ぶ