title: VBA subtracting address
body: <p>I was just wondering will it be possible to subtract something from an address? I mean like data.Address -1?</p>
  
  <p>I have here a code that would return the address of a cell based on a keyword. what I wanted to do is after finding the keyword (and its address), I would like to subtract 1 from it so that the keyword I am trying to find wont be deleted.</p>
  
  <pre><code>Set ws = Sheets("Target")
  
  lastRow = ws.Range("A" &amp; Rows.Count).End(xlUp).row
  
  wordSearch = "data"
  
  Set aCell = ws.Range("A1:A" &amp; lastRow).Find(What:=wordSearch, LookIn:=xlValues, _
  LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlDown, _
  MatchCase:=False, SearchFormat:=False)
  
  Sheets("Target").Range("A1:" &amp; aCell.Address).Select
  Application.CutCopyMode = False
  Selection.delete Shift:=xlUp
  </code></pre>