如何在Excel的單元格中給某些單詞上色或突出顯示?

      網友投稿 573 2025-03-31

      如何在Excel的單元格中給某些單詞上色或突出顯示?

      如果一個單元格包含多個單詞,如何僅在該單元格中突出顯示某個單詞? 以及如何在多個單元格中突出顯示該特定單詞呢? 本文將提供一種實現方法。

      使用VBA代碼為單個單元格/多個單元格中的某些單詞著色

      使用VBA代碼為單個單元格/多個單元格中的某些單詞著色

      以下VBA代碼可以幫助您突出顯示所選內容中的特定單詞。 請執行以下操作。

      1.選擇范圍,其中包含要突出顯示某些單詞的單元格。 然后按 其他 + F11 同時打開 Microsoft Visual Basic應用程序 窗口。

      2.在開幕 Microsoft Visual Basic應用程序 窗口中,單擊 插頁 > 模塊。 然后將VBA代碼復制并粘貼到“代碼”窗口中。

      VBA代碼:在Excel中的單元格中為某些單詞著色

      Sub HighlightStrings() Dim xHStr As String, xStrTmp As String Dim xHStrLen As Long, xCount As Long, I As Long Dim xCell As Range Dim xArr On Error Resume Next xHStr = Application.InputBox("What is the string to highlight:", "KuTools For Excel", , , , , , 2) If TypeName(xHStr) <> "String" Then Exit Sub Application.ScreenUpdating = False xHStrLen = Len(xHStr) For Each xCell In Selection xArr = Split(xCell.Value, xHStr) xCount = UBound(xArr) If xCount > 0 Then xStrTmp = "" For I = 0 To xCount - 1 xStrTmp = xStrTmp & xArr(I) xCell.Characters(Len(xStrTmp) + 1, xHStrLen).Font.ColorIndex = 3 xStrTmp = xStrTmp & xHStr Next End If Next Application.ScreenUpdating = True End Sub
      Copy

      3。 按 F5 鍵來運行代碼。 而在 Kutools for Excel 對話框中,請輸入您將在單元格中突出顯示的特定單詞,然后單擊 OK 按鈕。 看截圖:

      然后,您可以在選定的單元格中立即看到指定的所有單詞都顯示為紅色,如下圖所示。

      相關文章: 如果Excel中另一列中的值存在或等于該值,如何突出顯示單元格? 如何在Excel中比較兩個字符串的相似性或突出顯示差異? 如何使工作表標簽名稱等于Excel中的單元格值? 如何在Excel中根據單元格顏色更改值? 在Excel中單擊或選擇單元格時如何更改單元格顏色?

      最佳辦公生產力工具

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

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

      為什么需要 Kutools for Excel

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

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

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

      如何在Excel的單元格中給某些單詞上色或突出顯示?

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

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

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

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

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

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

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

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

      上一篇:WPS表格中如何繪制斜線表頭(wps表格繪制表格斜線表頭)
      下一篇:excel工程項目進度表(excel做項目進度表)
      相關文章
      亚洲国产精品无码久久九九大片 | 亚洲精品国产摄像头| 亚洲男人第一无码aⅴ网站| 亚洲美女自拍视频| 久久久亚洲精品蜜桃臀| 亚洲狠狠成人综合网| 亚洲国产成人久久综合碰碰动漫3d | 亚洲成在人线中文字幕| 中文字幕精品亚洲无线码一区应用| 亚洲中文字幕精品久久| 亚洲成色在线综合网站| 亚洲av无码不卡私人影院| 久久亚洲最大成人网4438| 亚洲av网址在线观看| 亚洲一区二区三区免费| 亚洲综合精品第一页| 亚洲美女人黄网成人女| 亚洲精品成人片在线播放 | 亚洲人成网站在线播放影院在线| 亚洲精品视频免费观看| 亚洲日韩国产欧美一区二区三区 | 在线观看亚洲一区二区| 亚洲区小说区图片区QVOD| 国产精品自拍亚洲| 亚洲天堂免费在线| 亚洲精品在线电影| 久久精品亚洲视频| 激情综合色五月丁香六月亚洲| MM1313亚洲精品无码久久| wwwxxx亚洲| 亚洲欧洲国产综合| 亚洲av日韩av不卡在线观看| 亚洲尤码不卡AV麻豆| 亚洲成年人啊啊aa在线观看| 亚洲精品国产高清在线观看| 亚洲人成网站18禁止久久影院| 亚洲最大的成网4438| 亚洲国产精品无码AAA片| 国产亚洲精品无码专区 | 精品亚洲国产成AV人片传媒| 亚洲国产精品久久久天堂 |