Bạn nếu muốn xác định cột cuối thì làm thế nào?

Chào bạn bạn dùng hàm này nhé.

Option Explicit

Sub timdongcuoi()

    Dim dc As Long

    dc = Sheet1.Range("a" & Sheet1.Rows.Count).End(xlUp).Row

End Sub

Bạn ơi, mình hỏi về tìm CỘT CUỐI cơ.

chào bạn bạn xem code nhé

Option Explicit

Sub timcotcuoi()

    Dim lr As Long

    lr = Sheet1.Cells(1, Sheet1.Columns.Count).End(xlToLeft).Column

    MsgBox lr

End Sub

Cám ơn bạn nhé. Mình có câu hỏi sau đây nữa: Giả sử mình có một mã hàng ở một cột nào đó. Muốn xác định hàng của mã đó thì làm thế nào? 

Chào bạn bạn bắt buộc phải xác định được cột đó, hàng đó nằm ở đâu. mới có thể  tìm được mã đó

Nếu mình chỉ biết cột, còn hàng thì mình muốn tìm thì có được không? (đương nhiên là mình biết mã hàng, chẳng như "Táo". 

Chào bạn vậy rất khó tìm vì không biết ở cột nào mà tìm.

Chào bạn, Mình nói là mình đã biết mã đó ở cột nào rồi bạn ạ

chào bạn vậy bạn tìm cột cuối, dòng cuối rồi dùng hàm match tìm vị trí và lấy ra. hoặc có thể dùng vòng lặp để tìm