Jak usunąć cały wiersz, jeśli tylko ostatnia komórka zawiera dane - excel, vba, excel-vba

Jestem nowy w programowaniu makr VBA Excelaktualnie pisze kod, aby usunąć cały wiersz, jeśli tylko ostatnia komórka zawiera dane, na przykład, jeśli komórki A1, B1, C1, D1, E1 są puste i H1 ma jakiekolwiek dane, niż chcę usunąć cały wiersz. Próbowałem z funkcją countA, ale się nie udało. Uprzejma pomoc

Odpowiedzi:

Jeśli "H1" jest zawsze Twoją ostatnią komórką, spróbuj tego:

If Range("H1").Value = "" then
Range("H1").EntireRow.Delete
End if

jeśli przejdziesz przez to z pętlą:

If Range("H" & row & "").Value = "" then
Range("H" & row & "").EntireRow.Delete
End if