Skip to content

Instantly share code, notes, and snippets.

@DuongAQ

DuongAQ/Xoa_Dong_Trong.bas

Created January 22, 2018 08:46
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save DuongAQ/0796bccc90b87a75004c8d4901cf7aae to your computer and use it in GitHub Desktop.
Save DuongAQ/0796bccc90b87a75004c8d4901cf7aae to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Xoa_Dong_Trong.bas
Sub Xoa_Dong_Trong() 'Xóa dòng trống ở cột A
On Error Resume Next 'Bẫy lỗi không có dòng trống
Range("A3", Range("A65536").End(xlUp)).SpecialCells(4).EntireRow.Delete
On Error GoTo 0 'Nếu xảy ra lỗi thì tới 0
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment