如何快速刪除Excel中的其他所有行?

      網友投稿 402 2025-03-31

      如何快速刪除Excel中的其他所有行?

      如果要快速刪除Excel中的所有其他行或列,重點是如何首先快速選擇其他所有行或列,然后對它們應用刪除操作。 本文將向您展示一些棘手的事情,有關如何首先選擇每隔一行或每一列然后快速刪除它們。


      使用篩選器命令刪除Excel中的所有其他行

      使用VBA代碼刪除Excel中的所有其他行

      使用以下命令刪除 Excel 中的每隔一行或一列 Kutools for Excel

      使用篩選器命令刪除Excel中的所有其他行

      Microsoft Excel的 篩選器 命令可以幫助您快速過濾其他所有行,然后立即將其刪除,請執行以下操作:

      1。 在原始數據之外的空白列中,輸入 0,1,0,1…,0,1。 在這種情況下,我們在助手C列中輸入數字。請參見以下屏幕截圖:

      2。 選擇列C,然后單擊 篩選器 按鈕下 Data 標簽。 然后點擊C1旁邊的箭頭按鈕,然后僅檢查 0 在下面 選擇全部 選項。 看截圖:

      3。 然后所有帶有1的行都被隱藏。 用0選擇可見的行,然后單擊 首頁 > 刪除 > 刪除工作表行 刪除這些行。 然后刪除所有其他行,您需要單擊 篩選器 再次單擊按鈕僅顯示帶有1的行。請參見屏幕截圖:

      4。 最后,您可以根據需要刪除幫助程序列C。

      選擇每隔一行或第n行,每列,然后立即將其刪除

      Kutools for Excels 選擇間隔行和列 實用程序可以幫助您查找和選擇每隔一行或第n行或第n行,然后可以根據需要執行一些操作。 點擊下載 Kutools for Excel!

      使用VBA代碼刪除Excel中的所有其他行

      實際上,VBA宏也是解決此問題的不錯選擇。

      1. 按住 其他 + F11 鍵,然后打開 Microsoft Visual Basic應用程序 窗口。

      2。 請點擊 插頁 > 模塊,然后將以下宏粘貼到 模塊 窗口。

      VBA代碼:刪除所選內容中的所有其他行:

      Sub DeleteEveryOtherRow() Updateby Extendoffice Dim rng As Range Dim InputRng As Range xTitleId = "KutoolsforExcel" Set InputRng = Application.Selection Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8) Application.ScreenUpdating = False For i = InputRng.Rows.Count To 1 Step -2 Set rng = InputRng.Cells(i, 1) rng.EntireRow.Delete Next Application.ScreenUpdating = True End Sub
      Copy

      3.F5 運行此宏的鍵。 然后會彈出一個對話框,用于選擇范圍。 看截圖:

      4。 然后點擊 OK,則會立即刪除第二行中所選范圍內的所有其他行,請參見屏幕截圖:

      使用以下命令刪除 Excel 中的每隔一行或一列 Kutools for Excel

      對于Microsoft Excel的初學者來說,使用VBA宏有點復雜。 的 選擇間隔行和列 實用程序 Kutools for Excel 可以幫助您快速刪除其他所有行。

      Kutools for Excel : 帶有300多個便捷的Excel加載項,可以在30天內免費試用. 
      前往下載30天免費試用購買貝寶/ MyCommerce

      安裝后 Kutools for Excel,請執行以下操作:

      1。 選擇要刪除的所有其他行的范圍,然后通過單擊 Kutools > 選擇 > 選擇間隔行和列….

      2。 在 選擇間隔行和列 對話框中,如下圖所示指定設置,然后單擊 OK 按鈕以首先選擇其他每行。

      3。 然后,選擇中的每隔一行被選中并突出顯示。 看截圖:

      4。 然后,您可以通過單擊 首頁 > 刪除 > 刪除工作表行 刪除所有這些行。 查看屏幕截圖:

      單擊以了解有關此“選擇間隔行和列”功能的更多信息。

      使用此功能,您還可以根據需要刪除第n行或每列。

      下載并免費試用 Kutools for Excel 現在!

      演示:刪除每隔一行或一列 Kutools for Excel
      Kutools for Excel:具有300多個方便的Excel加載項,可以在30天內免費試用,沒有任何限制。 立即下載并免費試用!

      最佳辦公生產力工具

      將小時轉化為分鐘 Kutools for Excel!

      如何快速刪除Excel中的其他所有行?

      準備好增強您的 Excel 任務了嗎? 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel!

      為什么需要 Kutools for Excel

      ???  超過 300 項強大功能: Kutools 包含 300 多項高級功能,可簡化您在 1500 多種場景中的工作。

      ??  卓越的數據處理能力:合并單元格、刪除重復項并執行高級數據轉換 - 所有這些都不費吹灰之力!

      ??  高效的批量操作:當你可以聰明地工作時,為什么還要付出額外的努力呢? 輕松批量導入、導出、組合和調整數據。

      ??  可定制的圖表和報告:訪問各種附加圖表并生成富有洞察力的報告。

      ???  強大的導航窗格:通過強大的列管理器、工作表管理器和自定義收藏夾獲得優勢。

      ??  七種類型的下拉列表:通過各種功能和類型的下拉列表使數據輸入變得輕而易舉。

      ??  用戶友好:對于初學者來說輕而易舉,對于專家來說是一個強大的工具。

      立即下載,與 Excel 一起穿越時空!

      閱讀更多 免費下載... 采購... 
      Office Tab 為 Office 帶來選項卡式界面,讓您的工作更輕松
      在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。 在同一窗口的新選項卡中而不是在新窗口中打開并創建多個文檔。 每天將您的工作效率提高50%,并減少數百次鼠標單擊!
      閱讀更多 免費下載... 采購... 

      版權聲明:本文內容由網絡用戶投稿,版權歸原作者所有,本站不擁有其著作權,亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容,請聯系我們jiasou666@gmail.com 處理,核實后本網站將在24小時內刪除侵權內容。

      版權聲明:本文內容由網絡用戶投稿,版權歸原作者所有,本站不擁有其著作權,亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容,請聯系我們jiasou666@gmail.com 處理,核實后本網站將在24小時內刪除侵權內容。

      上一篇:wps表格中如何求平均數教程(wps表格如何求平均值)
      下一篇:在線微表單登錄(微信在線表單
      相關文章
      亚洲欧洲日产国码高潮αv| 亚洲成a人片在线观看日本麻豆| 亚洲国产成人无码AV在线| 亚洲精品在线播放视频| 亚洲影院在线观看| 久久亚洲国产成人精品性色| 亚洲αv久久久噜噜噜噜噜| 亚洲人成人无码网www电影首页| 中文字幕亚洲一区| 亚洲乱码中文字幕手机在线| 亚洲国产精品成人网址天堂| 伊在人亚洲香蕉精品区麻豆| yy6080亚洲一级理论| 亚洲国产成人久久综合区| 亚洲区小说区图片区| 久久久久亚洲精品男人的天堂| 亚洲中文字幕无码久久综合网| 亚洲精品色午夜无码专区日韩| 亚洲国产无套无码av电影| 亚洲av无码不卡| 亚洲一区精品中文字幕| 亚洲高清无在码在线电影不卡| 亚洲制服丝袜在线播放| 亚洲成人激情小说| 亚洲高清毛片一区二区| 国产AV无码专区亚洲AV琪琪| 亚洲精品第一国产综合境外资源 | 亚洲视频一区二区在线观看| 久久精品九九亚洲精品| 亚洲福利秒拍一区二区| 亚洲一区电影在线观看| 亚洲中文字幕无码中文字| 亚洲av日韩精品久久久久久a| 国产亚洲综合精品一区二区三区| 亚洲国产综合久久天堂| 国产亚洲综合色就色| 久久综合亚洲色HEZYO社区| 亚洲一卡2卡4卡5卡6卡在线99| 亚洲国产精华液2020| 亚洲乱码中文字幕综合234 | 亚洲精品中文字幕乱码三区 |