title: Run-time error '1004' when attempting to insert date
body: <p>I have this script, I keep getting an error: <code>Run-time error '1004': Method 'Range' of object _'Worksheet' failed</code></p>
  
  <p>Here is the script:</p>
  
  <pre><code>Option Explicit
      Sub ONJL()
  
      Dim lastrow As Long
      Dim wsRD As Worksheet 'Raw Data
  
      Set wsRD = Sheets("Raw Data")
  
          With wsRD
              Application.ScreenUpdating = False
              lastrow = wsRD.Range("J:J").End(xlUp).Offset(1, 0)
              wsRD.Range("J" &amp; lastrow).Value = "=Today()"
          End With
  
      End Sub
  </code></pre>
  
  <p>I thought this is how  you are meant to look up last row, and then paste today's date on the last cell?</p>