返回列表 上一主題 發帖

[發問] 如何將儲存格內某幾個特定文字用顏色標出標出

[發問] 如何將儲存格內某幾個特定文字用顏色標出標出

如何在設定格式化的條件下用公式儲存格內某幾個特定文字用顏色標出標出

回復 1# wendy


    格式化條件做不到
學海無涯_不恥下問

TOP

回復 2# Hsieh

要如何做處理呢?  用函數嗎?

TOP

回復 3# wendy


    手動選取字元變色或使用VBA達成
學海無涯_不恥下問

TOP

回復 4# Hsieh

有可能在儲存格格式 類別 自訂內作設定嗎?

TOP

回復 5# wendy


    不行,你將要改顏色的字元選取
按下文字顏色就行了
學海無涯_不恥下問

TOP

回復 6# Hsieh


    知,, 所以還是要回歸到最沒有效率的方法了!!

TOP

回復 7# wendy


    例如渠部資料要讓"CHANGE COLOR"字串變紅色其餘則維持自動
執行以下程式
  1. Sub Ex()
  2. Dim A As Range
  3. For Each A In Cells.SpecialCells(xlCellTypeConstants)
  4.   A.Font.ColorIndex = -4105 '自動字型顏色
  5.   If InStr(A, "CHANGE COLOR") > 0 Then
  6.      For i = 1 To Len(A)
  7.         If Mid(A, i, Len("CHANGE COLOR")) = "CHANGE COLOR" Then
  8.         A.Characters(i, Len("CHANGE COLOR")).Font.ColorIndex = 3
  9.         i = i + Len("CHANGE COLOR") - 1
  10.         End If
  11.      Next
  12.   End If
  13. Next
  14. End Sub
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 脾氣嘴巴不好,心地再好也不能算是好人。
返回列表 上一主題