エクセル(EXCEL)で先頭セルに何か記入されていればその行を出力なにも記入無ければ出力無しにしたい

どのような関数式を使えばできるのかどなたか教えてください！

イメージはこのような感じです！
よろしくお願いします。

質問者からの補足コメント

• 追記：Sheet1に左の表を記入していきもし番号の列に記入されれば別シートのSheet2に番号が記入されている行を自動で判別して右の表に記入していくような関数式を教えていただきたいです。

    補足日時：2018/05/16 10:51

No.3 回答者： tom04 回答日時： 2018/05/16 16:35

こんにちは！

↓の画像のような配置になっているとします。
Sheet2のA2セルに
=IFERROR(INDEX(Sheet1!A$3:A$1000,SMALL(IF(Sheet1!$A$3:$A$1000<>"",ROW($A$3:$A$1000)-2),ROW(A1))),"")

配列数式なのでCtrl＋Shift＋Enterで確定！（←必須★）し
フィルハンドルで列・行方向にコピーしています。m(_ _)m

No.2 回答者： AC1954 回答日時： 2018/05/16 11:34

マクロで良ければ以下でどうでしょうか？

Sub Hensyuu()
Dim I, N As Integer
Worksheets("Sheet1").Select
Rows(2).Copy
Sheets("Sheet2").Rows(2).PasteSpecial
I = 3
N = 3
Do
If Range("A" & I) > 0 Then
Rows(I).Copy
Sheets("Sheet2").Rows(N).PasteSpecial
N = N + 1
End If
I = I + 1
If Range("B" & I) > 0 Then
Else: Exit Do
End If
Loop
End Sub

この回答へのお礼

関数式でやりたいです。

お礼日時：2018/05/16 11:56

No.1 回答者： AC1954 回答日時： 2018/05/16 10:38

フィルター機能ではダメでしょうか？　印字も空白行なしで出来ます。

空白を除いて別の場所に置きたい場合はコピーペースで出来ます。

この回答へのお礼

有難うございます

お礼日時：2018/05/16 11:55