Excel で高度なフィルタを使用してデータを別のシートにコピーする方法

• 「高度なフィルタ」 という名前の新しいダイアログ ボックス

• 3 番目に、[別の場所にコピー] オプションをオンにします。 .
• 次に「リスト範囲」をクリックします 入力ボックスをクリックして、「実際のシート」 という名前のシートに移動します .

• 次に、範囲 (B4:D15) を選択します .

• (B4:D15) の範囲であることがわかります 「リスト範囲」で選択されている 入力ボックスでは、値は次のようになります。

リスト範囲: 「実際のシート」!$B$4:$D15

• その後、「高度なフィルタ」 で次の値を設定します ダイアログボックス-

基準範囲:「実際のシート」!$F$9:$F$11

コピー先:「シートのコピー」!$B$4

• 次に、OK を押します .

• 最後に、上記のアクションにより、強調表示されたすべての行が 「実際のシート」 という名前のシートからコピーされていることがわかります 「シートのコピー」 という名前のシートに .

続きを読む:Excel で高度なフィルターを使用してデータを別のシートにコピーする VBA

類似の読み方:

• 条件範囲にテキストが含まれている場合に Excel で高度なフィルターを使用する方法
• Excel の高度なフィルター:「次を含まない」を適用 (2 つの方法)
• Excel で一意のレコードのみに高度なフィルターを使用する方法
• 高度なフィルターを使用して Excel で空白セルを除外する方法 (3 つの簡単なトリック)
• 条件付きの高度なフィルターの Excel VBA の例 (6 つの条件)

2. VBA コードで高度なフィルターを適用してデータを別のワークシートにコピー

高度なフィルタを適用できます VBA で データを別のシートにコピーするコード。基本的にこの方法では、前のタスクをもう一度実行しますが、今回は Advanced は使用しません。 データ からのオプション タブ。その代わりに、 VBA を適用します。 高度なフィルター オプションの機能を有効にするコード。

VBA で高度なフィルタ オプションを適用する手順を見てみましょう。 データを別のワークシートにコピーするコード。

手順:

• まず、シート 「Copy Sheet-2」 を選択します 、どこにデータをコピーしますか。
• 次に、右クリックします シートで [[コードを表示]] オプションを選択します .

• 次に、空白の VBA モジュールが表示されます。
• 空白のモジュールに次のコードを挿入します:

Sub Advance_Filter_to_Copy_to_Another_Sheet()
Dim Str As String
Dim Address As String
Dim Rg As Range
Dim CRg As Range
Dim SRg As Range
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Please select the filter range:", "Copy to Another Sheet", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
Set CRg = Application.InputBox("Please select the criteria range:", "Copy to Another Sheet", "", , , , , 8)
If CRg Is Nothing Then Exit Sub
Set SRg = Application.InputBox("Please select the output range:", "Copy to Another Sheet", "", , , , , 8)
If SRg Is Nothing Then Exit Sub
Rg.AdvancedFilter xlFilterCopy, CRg, SRg, False
SRg.Worksheet.Activate
SRg.Worksheet.Columns.AutoFit
End Sub

• ここで F5 を押します キーを押すか、 実行 をクリックします コードを実行します。

• 上記の操作により、「別のシートにコピー」 という名前の新しいダイアログ ボックスが開きます .

• その後、入力ボックスをクリックします。 「VBA」 という名前のシートに移動します 範囲 (B4:D15) を選択します .
• OK を押します .

• その後、別のダイアログ ボックスが表示されます。そのダイアログ ボックスの入力ボックスに基準範囲の値を挿入する必要があります。基準を挿入するには、入力ボックスをクリックして、シート名 VBA を選択します そのシートから範囲 (F9:F11) を選択します .
• 上記のアクションにより、入力ボックスに値が次のように表示されます:

VBA!$B$4:$D$15

• OK を押してください .

• 出力範囲のダイアログ ボックスがもう 1 つ表示されます。
• セル B4 を選択 データをコピーしたいシートから。これにより、値 $B$4 が挿入されます 入力ボックスに
• OK を押します

• 最後に、強調表示されたすべての行を別のシートにコピーします。

詳細:詳細フィルターを適用して Excel の別の場所にコピーする方法

結論

結論として、この記事は 高度なフィルタ の使用方法の概要です。 Excel の高度なフィルターでデータを別のシートにコピーします。最良の結果を得るには、ダウンロードして、この投稿に添付されている練習用ワークブックを使用して練習してください。ご不明な点がございましたら、下にコメントを残してください。私たちのチームは、できるだけ早く返信するよう努めます。将来的には、よりユニークな Microsoft Exce に注目してください l ソリューション。

関連記事

• Excel で複数の条件を使用した高度なフィルター (15 の適切な例)
• 動的高度フィルター Excel (VBA &マクロ)
• VBA で高度なフィルタを使用する方法 (ステップバイステップのガイドライン)
• Excel の基準範囲を使用した高度なフィルター (18 アプリケーション)
• Excel の高度なフィルターが機能しない (2 つの理由と解決策)