一系列 Microsoft 試算表軟體,具有可用來對資料進行分析、製圖及通訊的工具。
感謝您的回覆。
對於這種情況,我們可以通過使用一個更加複雜的條件格式化規則,結合Excel的VBA(Visual Basic for Applications)來實現。在這裡,主要的思路是使用VBA來循環檢查每個單元格,並根據需要更改其顏色。我的測試結果如下圖所示。
以下是步驟:
- 打開Excel文件,然後按 Alt + F11 打開VBA編輯器。
- 插入一個新的模塊:在VBA編輯器中,點擊“插入”->“模塊”。
- 在新的模塊中粘貼以下代碼: Sub ColorAlternate() Dim ws As Worksheet Dim rng As Range Dim cell As Range Dim currentColor As Long Dim lastValue As String Dim currentValue As String ' 設定工作表和範圍 Set ws = ThisWorkbook.Sheets("Sheet1") ' 請確保工作表名稱正確 Set rng = ws.Range("B2:B" & ws.Cells(ws.Rows.Count, "B").End(xlUp).Row) ' 初始化變量 currentColor = xlNone ' 初始無顏色 lastValue = rng.Cells(1, 1).Value ' 循環遍歷範圍內的每個單元格 For Each cell In rng currentValue = cell.Value If currentValue <> lastValue Then If currentColor = xlNone Then currentColor = RGB(255, 255, 0) '黃色 Else currentColor = xlNone End If End If cell.Interior.Color = currentColor lastValue = currentValue Next cell End Sub
- 運行宏:關閉VBA編輯器,返回Excel,按 Alt + F8,選擇“ColorAlternate”,然後點擊“運行”。
這個宏將遍歷B列中的每個單元格,並根據當前單元格與上一單元格的值是否相同來更改填充顏色。這樣,相同內容的單元格將保持相同顏色,而內容不同的單元格將交替顏色。
請確保將程式碼中的工作表名稱與欄位名稱修改為您實際的工作表名稱與欄位名稱。
祝您一切順利!
伊恩 - MSFT | 微軟社區支援專員