title: Simple VBA Code: Filling Cell with text is empty
body: <p>this is for learning purpose only. I have this code below. I want that program will go and check every cell from 1 to 999. If the cell is empty it will fill it up with text. Nothing happening with this code:</p>
  
  <pre><code>Sub Makro1()
  '
  ' Makro1 Makro
  '
  Dim iRow As Integer
  Dim iRowEmpty
  
  On Error Resume Next
  '//Your Line here which causes 1004 error
  If Err.Number &gt; 0 Then
    Debug.Print Err.Number &amp; ":" &amp; Err.Description
  End If
  
  i = 0
  iRowEmpty = Rows(i, 1)
  
  Do Until i = 999
      i = i + 1
      iRowEmpty = Rows(i, 1)
          If IsEmpty(iRowEmpty) = True Then
             iRowEmpty.Value = "Text..."
  
          End If
  Loop
  MsgBox ("The End")
  'Note: Debug shortcut keys i use in PC: Step Into (F8), Step Over (Shift + F8), Step Out (Ctrl + Shift + F8)
  
  End Sub
  </code></pre>
  
  <p>The spreadsheet has 1 column of data, in most cases every second cell is empty.</p>