title: Run-Time error '424' : Object Required in Excel VBA
body: <pre><code>Sub Calculate()
      Dim i As Integer
      Dim v As Integer
      Dim d As Integer
      i = expression.Ceiling(Worksheets(&quot;Calculator&quot;).Cells(10, 4).Value / 7, 1)
      v = Worksheets(&quot;Calculator&quot;).Cells(13, 4).Value
      d = Worksheets(&quot;Data&quot;).Cells(i, 2).Value - Worksheets(&quot;Calculator&quot;).Cells(10, 4).Value
      Do Until v &gt;= Worksheets(&quot;Calculator&quot;).Cells(16, 4).Value
           v = v + Worksheets(&quot;Data&quot;).Cells(i, 2).Value
           d = d + 7
           i = i + 1
      Loop
      Worksheets(&quot;Calculator&quot;).Cells(10, 6).Value = d
  End Sub
  
  </code></pre>
  <p>In this code I try to get the value in Cell D10 divide it by 7 and get its ceiling but it says the error in the title and highlights this line. Can someone help me out? This is my first time using code in Excel but I had experience with other languages such as Lua, C++ and I don't understand what's wrong.</p>