title: Deleting Rows Based on Multiple Cell Values
body: <p>I'm trying to delete rows that are empty in Column A and not empty in Column B in an Excel sheet. </p>
  
  <p>I need to keep the rows that have values in A, however I also need to keep the rows that have nothing in them (they are my spacers). </p>
  
  <p>I tried this:</p>
  
  <pre><code>Sub DoStuffIfNotEmpty()
      If Not IsEmpty(Colmuns("B").Value) Then
          ActiveCell.Columns("A").SpecialCells(xlBlanks).EntireRow.Delete
      End If
  End Sub
  </code></pre>
  
  <p>Which deleted my spacers.</p>
  
  <p>I tried this:</p>
  
  <pre><code>Sub QuickCull()
      On Error Resume Next
      Columns("A").Columns("B").SpecialCells(xlBlanks).EntireRow.Delete
  End Sub
  </code></pre>
  
  <p>Which deleted one of the rows with this criteria.</p>
  
  <p>I tried this:</p>
  
  <pre><code>Sub delete_Me()
  Dim LastRow As Long, x As Long
  LastRow = Cells(Rows.Count, "A").End(xlUp).Row
  For x = LastRow To 1 Step -1
      If Not IsEmpty(Colmuns("B").Value) And _
      Columns("A").Value Then
          Rows(x).Delete
      End If
  Next
  End Sub
  </code></pre>
  
  <p>Which does nothing.</p>