亞寵展、全球?qū)櫸锂a(chǎn)業(yè)風(fēng)向標——亞洲寵物展覽會深度解析
323
2024-01-15
如何將僅已過濾的數(shù)據(jù)從Excel保存/導(dǎo)出到csv文件？
如何將僅已過濾的數(shù)據(jù)從Excel保存/導(dǎo)出到csv文件？
眾所周知，我們很容易將工作表另存為csv文件。 但是，您是否曾經(jīng)嘗試過將僅過濾后的數(shù)據(jù)另存為csv文件？ 通常， 另存為 功能在Excel中會將整個工作表數(shù)據(jù)另存為csv文件，在這種情況下，如何將僅已過濾的數(shù)據(jù)從Excel保存或?qū)С龅絚sv文件？
僅使用“復(fù)制可見”單元格將過濾后的數(shù)據(jù)從Excel保存/導(dǎo)出到csv文件
使用VBA代碼僅將已過濾的數(shù)據(jù)從Excel保存/導(dǎo)出到csv文件
僅將過濾后的數(shù)據(jù)從 Excel 保存/導(dǎo)出到 csv 文件 Kutools for Excel
僅使用“復(fù)制可見”單元格將過濾后的數(shù)據(jù)從Excel保存/導(dǎo)出到csv文件在Excel中，您可能不會將過濾后的數(shù)據(jù)直接保存到csv文件中，但是可以通過一種變通方法來完成它，請執(zhí)行以下操作：
1。 選擇要保存的過濾數(shù)據(jù)。
2。 然后點擊 首頁 > 查找和選擇 > 去特別，請參見屏幕截圖：
3。 在 去特別 對話框，選擇 僅可見細胞 選項，請參見屏幕截圖：
4。 然后點擊 OK 按鈕，然后將篩選后的數(shù)據(jù)復(fù)制并粘貼到新工作表中，并且只有篩選后的數(shù)據(jù)已粘貼到新工作表中。
5。 現(xiàn)在，您可以將此新工作表另存為csv文件，請單擊 文件 > 另存為在 另存為 對話框，為此文件指定名稱和位置，然后選擇 CVS（逗號分隔） 來自 保存類型 下拉列表，請參見屏幕截圖：
6。 然后點擊 優(yōu)惠 要保存此過濾數(shù)據(jù)，則會彈出一些警告消息，請單擊 OK 和 是 關(guān)閉消息，然后僅將過濾后的數(shù)據(jù)另存為csv文件到您選擇的目錄中。
使用VBA代碼僅將已過濾的數(shù)據(jù)從Excel保存/導(dǎo)出到csv文件通過使用上述方法，這可能是一種低效的方法，在這里，我可以創(chuàng)建一個VBA代碼，以幫助您將過濾后的數(shù)據(jù)快速方便地導(dǎo)出到csv文件。
1。 按住 Alt + F11鍵 鍵打開 Microsoft Visual Basic應(yīng)用程序 窗口。
2。 點擊 插頁 > 模塊，然后將以下宏粘貼到 模塊 窗口。
VBA代碼：僅將過濾后的數(shù)據(jù)從Excel保存/導(dǎo)出到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
Copy
3。 然后按 F5 鍵以運行此代碼，并彈出一個提示框，提醒您選擇要另存為csv文件的過濾數(shù)據(jù)，請參見屏幕截圖：
4。 然后點擊 OK 按鈕，然后彈出另一個框，提醒您為csv文件指定文件名和位置，請參見屏幕截圖：
5。 然后點擊 優(yōu)惠 按鈕，僅將過濾后的數(shù)據(jù)另存為csv文件。
僅將過濾后的數(shù)據(jù)從 Excel 保存/導(dǎo)出到 csv 文件 Kutools for ExcelKutools for Excel 包含一個有用的工具-將范圍導(dǎo)出到文件，它可以幫助您將一系列選定的單元格導(dǎo)出或保存為csv，pdf，文本和其他格式的文件。
Kutools for Excel : 帶有300多個便捷的Excel加載項，可以在30天內(nèi)免費試用.前往下載30天免費試用購買貝寶/ MyCommerce
安裝后 Kutools for Excel，請執(zhí)行以下操作：
1。 選擇要導(dǎo)出的過濾數(shù)據(jù)。
2。 點擊 Kutools 加 > 進出口 > 將范圍導(dǎo)出到文件，請參見屏幕截圖：
3。 在 將范圍導(dǎo)出到文件 對話框中，選擇要保存的文件格式。 文件格式，然后點擊 按鈕選擇一個文件夾來保存導(dǎo)出的文件，請參見屏幕截圖：
4。 然后點擊 Ok 按鈕，并彈出另一個提示框，提醒您輸入導(dǎo)出文件的名稱，請參見屏幕截圖：
5。 然后點擊 Ok，并且僅根據(jù)需要將選定的過濾數(shù)據(jù)另存為csv文件。
下載并免費試用 Kutools for Excel 現(xiàn)在 ！
演示：僅將過濾后的數(shù)據(jù)從 Excel 保存/導(dǎo)出到 csv 文件 Kutools for ExcelKutools for Excel：具有300多個方便的Excel加載項，可以在30天內(nèi)免費試用，沒有任何限制。 立即下載并免費試用！
最佳辦公生產(chǎn)力工具
將小時轉(zhuǎn)化為分鐘 Kutools for Excel!
準備好增強您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時間的工具。 簡化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗 Excel！
為什么需要 Kutools for Excel
??? 超過 300 項強大功能: Kutools 包含 300 多項高級功能，可簡化您在 1500 多種場景中的工作。
?? 卓越的數(shù)據(jù)處理能力：合并單元格、刪除重復(fù)項并執(zhí)行高級數(shù)據(jù)轉(zhuǎn)換 - 所有這些都不費吹灰之力！
?? 高效的批量操作：當(dāng)你可以聰明地工作時，為什么還要付出額外的努力呢？ 輕松批量導(dǎo)入、導(dǎo)出、組合和調(diào)整數(shù)據(jù)。
?? 可定制的圖表和報告：訪問各種附加圖表并生成富有洞察力的報告。
??? 強大的導(dǎo)航窗格：通過強大的列管理器、工作表管理器和自定義收藏夾獲得優(yōu)勢。
?? 七種類型的下拉列表：通過各種功能和類型的下拉列表使數(shù)據(jù)輸入變得輕而易舉。
?? 用戶友好：對于初學(xué)者來說輕而易舉，對于專家來說是一個強大的工具。
立即下載，與 Excel 一起穿越時空！
閱讀更多
免費下載... 采購...
Office Tab 為 Office 帶來選項卡式界面，讓您的工作更輕松
在Word，Excel，PowerPoint中啟用選項卡式編輯和閱讀，發(fā)布者，Access，Visio和Project。
在同一窗口的新選項卡中而不是在新窗口中打開并創(chuàng)建多個文檔。
每天將您的工作效率提高50％，并減少數(shù)百次鼠標單擊！
閱讀更多
免費下載... 采購...
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。
相關(guān)文章
