làm sao để xác định dòng của activecell trong một range (1 người xem)

[SoiBien]

Giả sử em có một tbl = range("A11:A15") {"A","B","C","D","E"}
dùng set rcell = tbl.find ("B")

làm sao em lấy được row của rcell = 2 (row của rcell trong tbl)

loại trừ cách dùng rcell.row - tbl.cells(1,1).row

hoặc đại khái như là muốn xoá tbl.EntireRow

 

[ndu96081631]

Giả sử em có một tbl = range("A11:A15") {"A","B","C","D","E"}
dùng set rcell = tbl.find ("B")

làm sao em lấy được row của rcell = 2 (row của rcell trong tbl)

loại trừ cách dùng rcell.row - tbl.cells(1,1).row

hoặc đại khái như là muốn xoá tbl.EntireRow

Thế dùng hàm MATCH thì sao?

 

[SoiBien]

em dùng find vì không muốn dùng vòng lặp for each,
em sợ match lại phải for ?

 

[ndu96081631]

em dùng find vì không muốn dùng vòng lặp for each,
em sợ match lại phải for ?

Ủa! Có For.. Next gì đâu

Sub Test()
  Dim tbl As Range
  Set tbl = Range("A11:A15")
  MsgBox WorksheetFunction.Match("B", tbl, 0)
End Sub

 

[SoiBien]

ý em là : xoá hết các dòng có text = "B"

 

[ndu96081631]

ý em là : xoá hết các dòng có text = "B"

Vậy thì có thể AutoFilter điều kiện = "B" rồi xóa, nếu đang dùng code trên Excel
Ngược lại, For.. Next trên Array là nhanh nhất

 

[SoiBien]

vậy chắc em dùng luôn cái này

with tbl
.rows(rcell.row -.cells(1,1).row+1).delete
end with