Tìm vị trí dòng cuối có dữ liệu (Giá trị) (1 người xem)

[chicpt]

Nhờ các bác chỉ hộ Code xác định dòng cuối của vùng dữ liệu có chứa giá trị và gán cho nó 1 BIẾN để mình dùng tiếp cho đoạn Code sau.

........
With .Range("BIEN")
.Resize(s, 14) = arrKQ
End With
..........
Mục đích : Dùng lệnh trên để ghi dòng dữ liệu tại dòng kế tiếp. Thân

========================
HLMT: [WARNING1]Lần sau nên post bài cho đúng box nha bạn.[/WARNING1]

 

[vu_tuan_manh_linh]

Giả sử tìm dòng cuối chứa dữ liệu tại cột B

Range("B65536").End(xlUp).Row

(65536 là số dòng max của excel 2003)

 

[chicpt]

Cảm ơn vu_tuan_manh_linh

 

[SA_DQ]

        On Error Resume Next
        Last =Rrng.Find(What:="*", After:=rng.Cells(1), Lookat:=xlPart, _
                        LookIn:=xlFormulas,  SearchOrder:=xlByRows, _
                        SearchDirection:=xlPrevious, MatchCase:=False).Row
        On Error GoTo 0