数式が入ったセルで値がないときは詰めたい

質問

いつもお世話になります。
WINDOWS7 EXCELL2010です。
今回ご指導を戴きたいのは赤枠内です。

A Bは手入力します。
その結果、C D E Fの各列には下記の数式で表示されます。
例えば、　E5 E8 E9 の各列のように空白が出るので「見易く」
したいため詰めるのにどんな関数を入れればできますか。

添付画像で各列の説明です
A　手入力

B　手入力

C
=IF($B2="","",VLOOKUP($B2,一覧表!$A$2:$B$20,2,FALSE))
D
=IF(COUNTIF($B$2:B2,B2)=1,ROW(B1),"")
E
=IF(K2="","",C2)
F
=IF(L2="","",COUNTIF($C$2:$C$19,"*"&C2&"*"))

どうかよろしくお願いします。

回答No.3

K Kazz（@JazzCorp） · ベストアンサー

ＣとＤはありがたく使うとして、Ｅ，Ｆ，はイランでしょう。
Ｇ２：
=IF(COUNT(D:D)<ROW(G1),"",INDEX(C:C,SMALL(D:D,ROW(G1))+1))
Ｈ２：
=COUNTIF(C:C,G2)
以下、コピー

お礼

ご指導ご回答ありがとうございました。
この件についてはサイトなど調べて見てはといろいろしてみましたが苦労して試しました。
できずにこのサイトにお願いました。

回答No.2

keithin

こんばんは。

折角Ｄ列に行番号－１を出しているので、
Ｇ２：
=IF(ROW(G1)>COUNT($D:$D),"",INDEX(C:C,SMALL($D:$D,ROW(G1))+1))
以下コピー、右にコピー
といった具合でいいです。

＃参考
Ｄ２に
=IF(COUNTIF($B$2:B2,B2)=1,COUNT($D$1:D1)+1,"")
以下コピーしておいて
Ｇ２に
=IFERROR(VLOOKUP(ROW(G1),$D:$F,2,FALSE),"")
以下コピーとかでもいいです。

＃参考
Ｈ列は、わざわざＦ列を用意せずに直接Ｃ列とＧ列から計算してしまった方が簡単です。

お礼

ご指導ご回答ありがとうございました。
この件についてはサイトなど調べて見てはといろいろしてみましたが苦労して試しました。
できずにこのサイトにお願いました。

回答No.1

tom04

こんばんは！
作業列があるので、それを利用します。

せっかく数式をお考えのようですが、
「作業列」の数式を少し変えます。

D2セルの数式を
=IF(COUNTIF($B$2:B2,B2)=1,ROW(),"")
としてオートフィルで下へコピーしておいてください。
（列すべてを範囲指定するため）

そしてG2セルに
=IF(COUNT($D:$D)<ROW(A1),"",INDEX($C:$F,SMALL($D:$D,ROW(A1)),MATCH(G$1,$C$1:$F$1,0)))
という数式を入れ、列方向・行方向にオートフィルでコピーではどうでしょうか？m(_ _)m

お礼

ご指導ご回答ありがとうございました。
この件についてはサイトなど調べて見てはといろいろしてみましたが苦労して試しました。
できずにこのサイトにお願いました。
過去あなた様には大変お世話になりました。