title: My offset function gets the error2042, it used to work, not it suddenly doesn't anymore..?
body: <p>I keep getting the error:</p>
  <blockquote>
  <p>c.Value = error2042</p>
  </blockquote>
  <p>Can someone help? it used to work fine, now it doesn't work anymore.</p>
  <pre><code>Sub MecCapOvertime()
      Application.ScreenUpdating = False
      
      Dim LastRow As Long  
    
      Dim c As Range
      For Each c In Range(&quot;E1:E101&quot;)
          If c.Value = &quot;MecCap&quot; Then
              c.Offset(0, -2).Copy
              c.Offset(0, -3).PasteSpecial xlPasteValuesAndNumberFormats
          End If
      Next c
      
      Range(&quot;A1&quot;).Select
   
      Application.ScreenUpdating = True
  End Sub
  </code></pre>