質問: エクセル 関数 別シートへの抽出 エクセル関数について質問します。 「数値の入ったセルだけを、その行ごと丸々別シートに抽出する方法」 について教えてください。 例、c列に空白セルと1、2や3など、数値の入ったセルがあります。空白セル以外の数値の入ったセルを、その行ごと別シートに抽出したい。 c3とc5に数値が入ってる→3行目と5行目を別シートに抽出する。 このようなことは関数でできるのでしょうか? マクロでないと無理でしょうか? お力をお貸しください。 よろしくお願いします。
回答: マクロの例です。 sheet1のc列の空白セル以外のデータを列ごとsheet2に転記します。 空白以外は数値しか入っていない(文字はない)と考えています。 sub example() dim c as range dim sh1 as worksheet, sh2 as worksheet set sh1 = sheets("sheet1") set sh2 = sheets("sheet2") for each c in sh1.range(sh1.cells(1, "c"), sh1.cells(rows.count, "c").end(xlup)) if c.value <> "" then sh2.rows(sh2.cells(rows.count, "c").end(xlup).row).offset(1, 0).value = sh1.rows(c.row).value end if next set sh1 = nothing set sh2 = nothing end sub