） 最悪、専用マクロを作ろうかと思います。 E2をコピーします。 ［可視セルの選択］ボタンが右側に表示されたことを確認したら、［OK］ボタンをクリックして閉じます。 AutoFilter 1, Cells i, 6 ''新規シート挿入 ''挿入したシートの名前を変更 ''データのコピー Next i End Sub ここまでは悩まずに書けると思います。 １．E列に連番 縦方向に1,2,3,･･･ を記入します。 シート名を変更するのは、挿入した新しいシートです。 AutoFilter 1, "田中" Range Range "A2" , LastCell. AutoFilter 1, "田中" Sheets "Sheet1". マクロは、次の流れです。
もっと列を特定するには、Columns 2 とかColumns "B" や、Range "B:B" などの書き方がありますが、今回はEntireColumnを使うと便利です。 もちろん、可視セル（Alt＋セミコロン；）を選択して塗りつぶしをしても構いません。 なので、ここではコピー元を「どこのセルからどこのセルまで」ではなく「 ひとかたまりのセル範囲全部」と指定します。
もっと確認事項等アドバイスありがとうございます。 RemoveDuplicates 1, xlYes End Sub あとは、このF列の名前を使って、オートフィルタの絞り込みを行います。 フィルタの対象ではないE列以降も非表示になります（参考：）。 行や列を非表示にした場合、範囲選択をすると非表示になっているセルも含まれます。 B列を再表示する• 解説 E5をコピーします。 折りたたんだデータを展開してすべてのデータを表示します。
もっとxls] に同じように書けば、全体のブックに設定されます。 ［ 可視セルの選択］ボタンを探して、選択後、中央の［追加］ボタンをクリックします。
もっとA ベストアンサー 2 のpascal3141さんへ ＞ActiveSheet. これ本当にできますか？ 違う部分も取り込んでしまうのですが… フィルタをかけているのが他の列だとできないのでしょうか。 オプションの詳しい内容は、AGGREGATE関数の使い方の記事をご覧ください。
もっと