title: Can't find the root of this vba object oriented error
body: <p>I developed a simple code that graphs the temperature distribution in a plain wall for uni dimensional heat equation, it looks something like this: </p>
  
  <p><a href="https://i.stack.imgur.com/D2SkI.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/D2SkI.png" alt="T(x)"></a></p>
  
  <p>by refining the time value a better approximation of the problem for steady state is obtained. The problem is that if I enter a <code>j &gt; 15000</code> I get an application oriented error and i don't know how to fix this. </p>
  
  <p>Code looks like this:</p>
  
  <pre><code>Sub wi_ins()
  
  Dim wall, ds, results As Worksheet
  Dim i As Integer
  Dim T, j, jota As Double
  
  Set wall = Sheets("WITH INSULATOR")
  Set ds = Sheets("DATA SPREAD 2")
  Set results = Sheets("RESULTS 2")
  
  ds.UsedRange.ClearContents
  
  With ds
      Lw = wall.Cells(20, 9).Value
      Li = wall.Cells(19, 13).Value
      n = wall.Cells(19, 9).Value
      n2 = wall.Cells(18, 13).Value
  
      Text = wall.Cells(22, 9).Value
      Tint = wall.Cells(23, 9).Value
  
      jota = wall.Cells(14, 20).Value
  
      .Range(.Cells(1, 1), .Cells(n - 1, 1)).Value = Text
      .Range(.Cells(n, 1), .Cells(n + n2 - 1, 1)).Value = Text
  
      .Range(.Cells(1, 1), .Cells(1, jota)).Value = Text ' &lt;--- //this is where the error appears
      .Cells((n - 1 + n2), 1).Value = Tint
      '... rest of code below
  </code></pre>
  
  <p>As you can see I simply take j and paste <code>T.ext</code> within a range. if "jota" is bigger than 15000 it just won't work</p>