title: VBA check for empty cells in column and print value
body: <p>In column J there are empty rows and rows with a value such as checked.</p>
  
  <p>I have tried to write VBA code that prints "unchecked" where there is an empty cell AND this works, but when it hits a cell with a value (checked) it stops. And it won't go down to the next cell probably because I have formulas in the cell that prints nothing if not fullfilled, but it still contains that formula. In my case I have empty cells until J7 and then it starts again at J15. But this can change from time to time regarding source data. </p>
  
  <p>The reason I want to do it like this is because I have a formula in column J that already have printed some values and then some VBA code that checks for other values in a different column and prints to column J. Column J is the filter master column sort of. So this is the way I have to do it I guess. </p>
  
  <p>My code right now is,</p>
  
  <pre><code>Sub DoIfNotEmpty()
      Dim ra As Range, re As Range
  
      With ThisWorkbook.Worksheets("Sheet1")
          Set ra = .Range("J:j25")
          For Each re In ra
              If IsEmpty(re.Value) Then
                  re.Value = "unchecked"
              End If
          Next re
      End With
  End Sub 
  </code></pre>
  
  <p>Can I print to empty cells if the cell contains a formula which in this case has an <code>if</code> statement that is not filled?</p>