メインコンテンツへスキップ

フィルタリングされたデータのみをExcelからcsvファイルに保存/エクスポートするにはどうすればよいですか?

ご存知のとおり、ワークシートをcsvファイルとして保存するのは簡単です。 しかし、フィルタリングされたデータのみをcsvファイルとして保存しようとしたことがありますか? 通常、 名前を付けて保存 機能Excelでは、ワークシートデータ全体がcsvファイルとして保存されます。この場合、フィルター処理されたデータのみをExcelからcsvファイルに保存またはエクスポートするにはどうすればよいですか。

フィルターされたデータのみをExcelからcsvファイルに保存/エクスポートし、表示セルのみをコピーします

フィルタリングされたデータのみをExcelからVBAコードを使用してcsvファイルに保存/エクスポートします

フィルタリングされたデータのみをExcelからcsvファイルに保存/エクスポートKutoolsfor Excel


Excelでは、フィルタリングされたデータをcsvファイルに直接保存することはできませんが、回避策を講じて終了することができます。次のようにしてください。

1。 保存するフィルタリングされたデータを選択します。

2。 次に、をクリックします ホーム > 検索と選択 > 特別に行く、スクリーンショットを参照してください:

docはフィルタリングされたデータをcsv1として保存します

3。 の中に 特別に行く ダイアログボックスで、 目に見える細胞のみ オプション、スクリーンショットを参照してください:

docはフィルタリングされたデータをcsv2として保存します

4。 次に、をクリックします OK ボタンをクリックし、フィルタリングされたデータをコピーして新しいワークシートに貼り付けると、フィルタリングされたデータのみが新しいワークシートに貼り付けられます。

5。 これで、この新しいワークシートをcsvファイルとして保存できます。クリックしてください File > 名前を付けて保存、で 名前を付けて保存 ダイアログボックスで、このファイルの名前と場所を指定し、を選択します CVS(カンマ区切り) タイプとして保存 ドロップダウンリスト、スクリーンショットを参照してください:

docはフィルタリングされたデータをcsv3として保存します

6。 次に、をクリックします Save このフィルタリングされたデータを保存すると、いくつかの警告メッセージが表示されます。をクリックしてください OK > はい メッセージを閉じると、フィルタリングされたデータのみがcsvファイルとして選択したディレクトリに保存されます。

docはフィルタリングされたデータをcsv4として保存します

1

docはフィルタリングされたデータをcsv5として保存します


上記の方法を使用するのは非効率的な方法かもしれません。ここでは、フィルタリングされたデータをcsvファイルにすばやく便利にエクスポートするのに役立つVBAコードを作成できます。

1。 を押し続けます Altキー+ F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2に設定します。 OK をクリックします。 インセット > モジュール、次のマクロをに貼り付けます モジュール 窓。

VBAコード:フィルター処理されたデータのみをExcelからcsvファイルに保存/エクスポート

Sub Macro1()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    Dim xFileName As String
    Dim xWb As Workbook
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select the filtered range", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xRg = xRg.SpecialCells(xlCellTypeVisible)
    If xRg Is Nothing Then Exit Sub
    xFileName = Application.GetSaveAsFilename(, "CSV Files (*.csv), *.csv", , "please specify the file name")
    If xFileName = "" Then Exit Sub
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    xRg.Copy
    Set xWb = Application.Workbooks.Add
    xWb.ActiveSheet.Paste
    xWb.SaveAs Filename:=xFileName, FileFormat:=xlCSV, CreateBackup:=False
    xWb.Close False
    Application.ScreenUpdating = xUpdate
End Sub

3。 次に、 F5 このコードを実行するためのキーを押すと、プロンプトボックスが表示され、csvファイルとしてのみ保存するフィルタリングされたデータを選択するように通知されます。スクリーンショットを参照してください。

docはフィルタリングされたデータをcsv6として保存します

4。 次に、をクリックします OK ボタンをクリックすると、別のボックスがポップアップ表示され、csvファイルのファイル名と場所を指定するように通知されます。スクリーンショットを参照してください。

docはフィルタリングされたデータをcsv7として保存します

5。 そして、 Save ボタンをクリックすると、フィルタリングされたデータのみがcsvファイルとして保存されます。


Kutools for Excel 便利なツールが含まれています-範囲をファイルにエクスポート、選択したセルの範囲をcsv、pdf、テキスト、その他の書式設定ファイルにエクスポートまたは保存するのに役立ちます。

Kutools for Excel : 300以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます.

インストールした後 Kutools for Excel、次のようにしてください。

1。 エクスポートするフィルタリングされたデータを選択します。

2に設定します。 OK をクリックします。 クツールズプラス > インポート・エクスポート > 範囲をファイルにエクスポート、スクリーンショットを参照してください:

3。 の中に 範囲をファイルにエクスポート ダイアログボックスで、保存するファイル形式を選択します。 ファイル形式、次にクリックします docはフィルタリングされたデータをcsv10として保存します ボタンをクリックして、エクスポートされたファイルを保存するフォルダを選択します。スクリーンショットを参照してください。

docはフィルタリングされたデータをcsv9として保存します

4。 次に、をクリックします Ok ボタンをクリックすると、エクスポートしたファイルの名前を入力するように促す別のプロンプトボックスが表示されます。スクリーンショットを参照してください。

docはフィルタリングされたデータをcsv11として保存します

5。 そして、 Ok、および選択したフィルタリングされたデータのみが、必要に応じてcsvファイルとして保存されています。

  今すぐExcel用のKutoolsをダウンロードして無料トライアル!


Kutools for Excel:300以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます。 今すぐダウンロードして無料トライアル!

最高のオフィス生産性向上ツール

人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト 工具 (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 工具 (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 工具 (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット 工具 (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

kteタブ201905


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank you for saving me with this info!! Greetings from Mexico
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations