Tìm hiểu tham số option base trong code lọc duy nhất!

[ThuNghi]

Tôi dùng Excel 2007 và có lưu lại 1 macro về lọc duy nhất (RemoveDuplicates) theo code sau:

Option Explicit
''Option Base 1'
Dim endR As Long, myRng As Range
Sub RemoveDuplicates()
Sheet1.Select
endR = Cells(65000, 1).End(xlUp).Row
Set myRng = Range(Cells(1, 1), Cells(endR, 2))
With myRng
  .RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
End With
Set myRng = Nothing
End Sub

Nhưng khi tôi chọn Option Base 1 thì code báo lỗi tại dòng

.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes

Mặc định Option Base 0 thì không sao.
Vậy có cách gì dùng code trên mà vẫn dùng Option Base 1 được không.
Xin cám ơn!

 

[nguyentuhp]

Option Base 1
' LBound của mảng là 1
....
 Columns:=Array(1, 2)
' Nhưng thằng này nó hiểu mặc định Lbound của nó bắt đầu là 0
-> 2 thằng này đá nhau nên báo lỗi, Tôi nghĩ không có cách nào dùng được, nếu bắt buộc phải dùng Option Base 1 thì bạn nên chuyển sang module khác.