EXCEL如何顯示表格顏色？

Question

匿名

請教，如圖格式向下排列？

鎖定的問題。此問題已從 Microsoft 支援服務社群移轉。您可以對其是否有幫助進行投票，但無法對問題新增註解或回覆，或進行追蹤。

0 則留言

由問題作者接受的回答

匿名

感謝您的回覆。

對於這種情況，我們可以通過使用一個更加複雜的條件格式化規則，結合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 | 微軟社區支援專員

0 則留言

7 個其他答案

Answer 1

您好，

透過我的測試，使用公式只能實現一部分效果，無法達到您想要的全部效果，因此我給出VBA的方法。

根據您提出的需求，Excel需要對行中的每條內容進行識別並以此改變填充色，因此使用公式實現起來較為困難。

此VBA的方式使用起來並不複雜並且十分有效，如果您確實需要實現此功能，請您參考以上的VBA的方法。

此外我們期待您對我們的服務進行反饋，如果您覺得我們的回覆有幫助到您。您可以在上條提供方案的回覆下點擊是或否以幫助我們改善我們的服務。

感謝您的反饋，有任何問題隨時聯繫我們。

伊恩 - MSFT | 微軟社區支援專員

Answer 2

匿名

謝謝你的code，如果Excel本身的公式/功能做到，我是想用非VBA的解決方法。

0 則留言

Answer 3

匿名

謝謝你回答，

以上只是部分數據，因數量眾多，須要隔類標示顏色，不可能手動設定或改變它們，但未知是否有方法？

0 則留言

Answer 4

您好 W.K. LI

歡迎來到微軟社區。

根據您提供的信息，您想要在 Excel 中給表格添加填充色。我會盡力幫助您。

首先，如果您想要實現您提供的圖中的效果，您可以按照以下步驟操作：

接下來，您可以重複以上步驟，為 “C”、“E” 和 “G” 的單元格添加相應的填充色。

另外，您還可以使用另一種方法：在為一個單元格添加完樣式後，將鼠標移動到該單元格的右下角，然後拖動小正方形到其他單元格，以將該單元格中的樣式應用到其他單元格。

如果您有其他需求，或者需要更詳細的幫助，請隨時告知。我們會繼續為您提供支持！

祝您一切順利！

伊恩 - MSFT | 微軟社區支援專員