title: VBA Excel How to insert new column before cell.value = "" for Each cel
body: <p>I have a table with 40 cells that contains value "total" now I have to insert new column before every cell that contains Total. Please help I'm desperate. This is what I came with so far.. I don't know how to order it to do it throughout all "2:2", meaning after you find first Total go on do that until empty cell. I've tried with <code>Do Until IsEmpty(Active.Cell)</code> but it does nothing for me. HELPP :(</p>
  
  <pre><code>Dim INC As Range
  Set INC = Range("2:2").Find("Total")
  If INC Is Nothing Then
    MsgBox "Total column was not found."
    Exit Sub
  Else
    Columns(INC.Column).Offset(, 0).Resize(, 1).Insert
  End If
  </code></pre>