title: If a cell with fill color X is changed to no fill color then return the cell fill color to X
body: <p>I have a table in Excel that contains dates. The table's records are linked to a calendar (on another sheet) so that if you click on a date in the table you will be taken to that date's cell in the calendar. On my calendar sheet I have the following VBA that changes the fill color of the active cell of that sheet to yellow.</p>
  
  <pre><code>Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      Application.ScreenUpdating = False
      Dim cell As Range
      'Turn off ScreenUpdating (speeds up code)
      Application.ScreenUpdating = False
      'Loop through each cell in the ActiveSheet
      For Each cell In ActiveSheet.UsedRange
          'Check for a specific fill color
          If cell.Interior.Color = RGB(255, 255, 0) Then
              'Remove Fill Color
              cell.Interior.Color = xlNone
          End If
      Next cell
      ' Highlight the active cell
      Target.Interior.ColorIndex = 6
      Application.ScreenUpdating = True
  End Sub
  </code></pre>
  
  <p>If a user activates another cell on the calendar sheet, that originally contained a fill color, it will clear out that cell's original color.</p>
  
  <p>I would like cells on the sheet that are to be changed by this code from fill color X (purple, in my case) to no fill color, instead remain the fill color X as set by the user.</p>
  
  <p>I basically need fill color layers in Excel.</p>