Skip to content

Instantly share code, notes, and snippets.

@DuongAQ

DuongAQ/LocTrung04.bas

Created February 12, 2018 03:24
Show Gist options
  • Save DuongAQ/eb43ef39862e46753066945510a417c4 to your computer and use it in GitHub Desktop.
Save DuongAQ/eb43ef39862e46753066945510a417c4 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
LocTrung04.bas
Sub LocTrung04()
'Xác định dòng cuối trong bảng dữ liệu
Dim DongCuoi As Long
DongCuoi = Sheet1.Cells(Rows.Count, 1).End(xlUp).Row
'Loại bỏ giá trị trùng trong bảng, gồm 2 cột A và B, từ dòng 1 tới dòng cuối chứa dữ liệu
ActiveSheet.Range("A1:B" & DongCuoi).RemoveDuplicates Columns:=1
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment