如何根據其他單元格的內容格式化/着色單元格

Question

我正在嘗試自動化 Excel 工作簿，以幫助節省制定員工工作計划的時間。 我有兩張床單。 Sheet1 包含一個簡單的表格，用於創建該月的預定時間表（第一列是員工姓名，頂行是日期，每天都標有“WORKING”、“ON CALL”、“OFF”等），另一張表包含一個帶有顏色代碼的表格，用於跟蹤隨着時間的推移，日程表的實際保存情況。 我需要 Sheet2 根據在 Sheet1 上手動計划的時間表更新顏色代碼，這樣我就可以減少公司手動對單元格進行顏色編碼的時間。

我不想使用條件格式，因為我相信你不能覆蓋它給一個單元格的格式（如果員工打電話而不是在他預定的工作日上班，並且在 Sheet2 上這需要記錄- 使用不同的顏色代碼）。 我只需要幫助找出一些可以幫助加快速度並減少公司手動顏色編碼單元格浪費的宏。

這次我不想錄制宏，因為每次更新/制定時間表時，名稱和工作天數可能/將不同。

Answer 1

這是你可以做的事情。

右鍵單擊工作表 1 選項卡並選擇“查看代碼”復制並粘貼此代碼。

將工作表 1 中 A 列中的單元格更改為 A、B 或 C，然后轉到工作表 2 並查看發生了什么。

 Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target = "A" Then Sheets("Sheet2").Range(Target.Address).Interior.ColorIndex = 3
        If Target = "B" Then Sheets("Sheet2").Range(Target.Address).Interior.ColorIndex = 4
        If Target = "C" Then Sheets("Sheet2").Range(Target.Address).Interior.ColorIndex = 5
    End If
End Sub