如何在Excel中一次查找和替換多個值?

      網(wǎng)友投稿 471 2025-04-03

      如何在Excel中一次查找和替換多個值?

      眾所周知,我們可以使用“查找和替換”功能來查找多個相同的單元格,并根據(jù)需要用值替換它們。 但是有時,您需要同時應(yīng)用多對多替換。 例如,我有一系列數(shù)據(jù),現(xiàn)在我想將所有的Apple替換為Red Apples,將Oranges替換為Green Oranges,將Bananas替換為Yellow Bananas,依此類推,如下面的屏幕截圖所示,您是否有解決此任務(wù)的好主意? Excel?

      使用VBA代碼一次查找并替換多個值

      使用VBA代碼一次查找并替換多個值

      如果您厭倦了一次又一次地查找和替換值,下面的VBA代碼可以幫助您立即用所需的文本替換多個值。

      1。 請創(chuàng)建包含原始值和新值的要使用的條件。 看截圖:

      2。 然后按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications窗口。

      3。 點(diǎn)擊 插頁 > 模塊,然后將以下代碼粘貼到“模塊”窗口中。

      VBA代碼:一次查找并替換多個值

      Sub MultiFindNReplace() Updateby Extendoffice Dim Rng As Range Dim InputRng As Range, ReplaceRng As Range xTitleId = "KutoolsforExcel" Set InputRng = Application.Selection Set InputRng = Application.InputBox("Original Range ", xTitleId, InputRng.Address, Type:=8) Set ReplaceRng = Application.InputBox("Replace Range :", xTitleId, Type:=8) Application.ScreenUpdating = False For Each Rng In ReplaceRng.Columns(1).Cells InputRng.Replace what:=Rng.Value, replacement:=Rng.Offset(0, 1).Value Next Application.ScreenUpdating = True End Sub
      Copy

      4。 然后按 F5 鍵以運(yùn)行此代碼,請在彈出的提示框中,指定要用新值替換值的數(shù)據(jù)范圍。

      5。 點(diǎn)擊 OK,并顯示另一個提示框,提醒您選擇在步驟1中創(chuàng)建的條件。請參見屏幕截圖:

      6。 然后點(diǎn)擊 OK,所有特定值均已根據(jù)需要立即用新值替換。

      相關(guān)文章:

      如何查找和替換文本框中的特定文本?

      如何在Excel中一次查找和替換多個值?

      如何在Excel中的圖表標(biāo)題中查找和替換文本?

      如何在Excel中的注釋中查找和替換文本?

      如何在Excel中一次更改多個超鏈接路徑?

      最佳辦公生產(chǎn)力工具

      將小時轉(zhuǎn)化為分鐘 Kutools for Excel!

      準(zhǔn)備好增強(qiáng)您的 Excel 任務(wù)了嗎? 利用的力量 Kutools for Excel - 您終極的節(jié)省時間的工具。 簡化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗 Excel!

      為什么需要 Kutools for Excel

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

      ??  卓越的數(shù)據(jù)處理能力:合并單元格、刪除重復(fù)項并執(zhí)行高級數(shù)據(jù)轉(zhuǎn)換 - 所有這些都不費(fèi)吹灰之力!

      ??  高效的批量操作:當(dāng)你可以聰明地工作時,為什么還要付出額外的努力呢? 輕松批量導(dǎo)入、導(dǎo)出、組合和調(diào)整數(shù)據(jù)。

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

      ???  強(qiáng)大的導(dǎo)航窗格:通過強(qiáng)大的列管理器、工作表管理器和自定義收藏夾獲得優(yōu)勢。

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

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

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

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

      版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。

      版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。

      上一篇:伙伴云CEO戴志康:為什么我們要做「頁面」?和notion有何不同?
      下一篇:項目管理軟件有哪些?及其特點(diǎn)和優(yōu)勢分別是什么?
      相關(guān)文章
      亚洲高清乱码午夜电影网| 亚洲综合激情另类专区| 亚洲AV成人一区二区三区观看 | 国产精品亚洲二区在线| 亚洲中文无码永久免| 亚洲一卡2卡4卡5卡6卡在线99| 亚洲精品中文字幕无码AV| 亚洲欧洲精品久久| 亚洲白色白色在线播放| 亚洲日韩国产精品无码av| 亚洲精品国产免费| 亚洲一区二区三区免费观看| 亚洲午夜精品在线| 亚洲中文字幕无码久久2020 | 久久久久亚洲精品美女| 亚洲电影中文字幕| 91嫩草私人成人亚洲影院| 久久精品蜜芽亚洲国产AV| 亚洲精品国产专区91在线| wwwxxx亚洲| 亚洲hairy多毛pics大全| 亚洲αⅴ无码乱码在线观看性色 | 午夜亚洲国产精品福利| 亚洲色偷偷狠狠综合网| 亚洲亚洲人成综合网络| 亚洲国产成人久久综合一 | 亚洲偷自精品三十六区| 亚洲色在线无码国产精品不卡| 亚洲国产aⅴ成人精品无吗| 亚洲精品岛国片在线观看| 怡红院亚洲怡红院首页| 久久综合九九亚洲一区| 亚洲综合在线成人一区| 亚洲人妖女同在线播放| 亚洲免费综合色在线视频| 亚洲国产av无码精品| 亚洲精品无码久久久影院相关影片| 亚洲第一精品福利| 亚洲av永久无码精品天堂久久| 亚洲精品无码久久久久秋霞| 亚洲国产一区二区三区|