title: How to store a cell address to variable VBA
body: <p>I am writing a simple macro to compare a modified value (on one sheet) to its original value (on another sheet) after a change is made. If they are different values, I want the both of these cells to be given a yellow fill. </p>
  
  <p>However, I have been getting a type mismatch error when trying to store the address of the target cell. As I understand it, Target.Address returns a string. Setting Location = Target gives location the value of the target, not its address. How can I reference the same address of the target on the original sheet when changes are made?</p>
  
  <pre><code>Dim Location as Range
  
  Private Sub Worksheet_Change(ByVal Target As Range)
  
  Set Location = Target.Address
  
  If Target.Value = Sheets("Original").Range("Location").Value Then
     Target.Interior.Pattern = xlNone
     Sheets("Original").Range("Location").Interior.Pattern = xlNone
  
  Else
     Target.Interior.Color = 255
     Sheets("Original").Range("Location").Interior.Color = 65535
  
  End If
  
  End Sub
  </code></pre>
  
  <p>Thanks for any help!</p>