title: Delete entire row in Excel VBA
body: <p>I written below code to delete rows with no values in columns A , F and G.</p>
  
  <pre><code>Sub DeleteRawBlank()
  
    Dim Cnt As Long
    Dim RowCnt As Integer
  
    RowCnt = Worksheets("Raw").UsedRange.Rows.Count
  
    Worksheets("Raw").Activate
  
    For Cnt = RowCnt To 2 Step -1
     If Trim(Worksheets("Raw").Cells(Cnt, "A").Value) &lt;&gt; "" And  
        Trim(Worksheets("Raw").Cells(Cnt, "F").Value) &lt;&gt; "" And 
        Trim(Worksheets("Raw").Cells(Cnt, "G").Value) &lt;&gt; "" Then
           Rows(Cnt).Delete
     End If
   Next Cnt
  End Sub
  </code></pre>
  
  <p>But it does not work . Any help please</p>