phanngoctrai1981
Thành viên chính thức
- Tham gia
- 16/4/23
- Bài viết
- 60
- Được thích
- 0
Bạn định nghĩa thế nào là dòng cuối?Anh/chi xem giúp
Hiện em muốn tìm dòng cuối trong bảng dữ liệu tính từ A1:O21 (phía dưới vẫn có dữ liệu)
Kinh mong anh/chi xem file chỉ giúp.
Em cảm ơn
nếu tìm dòng cuối cho cả sheet thi em đã làm được rồi. như do yêu cầu copy dữ liệu chi lấy trong vùng từ A2:O14 và không phải lúc nào cũng là 12 vòng (có thể ít hơn) vì thế em nghĩ ra là minh phải tìm dòng cuối trong khoản đó, nhưng không biết cách làm. Nếu biết mong anh chi cho.Bạn định nghĩa thế nào là dòng cuối?
Bạn có thể cho biết bạn tìm dòng cuối trong cả trang tính thì làm như thế nào không vậy, cho mình biết với?nếu tìm dòng cuối cho cả sheet thi em đã làm được rồi. như do yêu cầu copy dữ liệu chi lấy trong vùng từ A2:O14 và không phải lúc nào cũng là 12 vòng (có thể ít hơn) vì thế em nghĩ ra là minh phải tìm dòng cuối trong khoản đó, nhưng không biết cách làm. Nếu biết mong anh chi cho.
Cảm ơn Anh rất nhiềuRange("A2:O" & Range("A2").End(xlDown).Row).Select
Function LRow(Sh As String, Optional Opt As Byte = 1) As Variant
Dim Rng As Range
Set Rng = Cells(Opt * 10, "B").CurrentRegion
With Sheets(Sh)
LRow = Rng.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row
End With
MsgBox LRow
End Function
lr = ws.Cells(Rows.Count, 1).End(xlUp).RowBạn có thể cho biết bạn tìm dòng cuối trong cả trang tính thì làm như thế nào không vậy, cho mình biết với?
Anh có thể hướng dẫn cách dùng không ạ, em thấy code nay hơi lạ (chưa biết dùng)PHP:Function LRow(Sh As String, Optional Opt As Byte = 1) As Variant Dim Rng As Range Set Rng = Cells(Opt * 10, "B").CurrentRegion With Sheets(Sh) LRow = Rng.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row End With MsgBox LRow End Function
Vấn đề là bạn tạo ra 3 bảng dữ liệu, mổi bảng có 10.0 dòng dữ liệu & cách nhau giữa các vùng là 1 dòngAnh có thể hướng dẫn cách dùng không ạ, em thấy code nay hơi lạ (chưa biết dùng)
Ôi hay quá, em cam on AnhVấn đề là bạn tạo ra 3 bảng dữ liệu, mổi bảng có 10.0 dòng dữ liệu & cách nhau giữa các vùng là 1 dòng
Vùng 1 [A1].resize(10,4)
Vùng 2: [A11].resize(10,5)
Vùng 3 [B21].resize(10,6)
Khi đó bạn có thể trãi nghiệm dòng cuối của mỗi vùng khác nhau
Em có code tìm được ô cuối dòng cuối bảng tính nè, hoặc ô gần cuối cũng tìm đượcGiả dụ bạn có 3 vùng dữ liệu phân cách nhau bỡi các dòng trống
Thì cách của bạn chỉ tìm được dòng cuối chứa dữ liệu vùng cuối mà thôi.
Dò ngang dò dọc hết bảng tính xem có dữ liệu nào nằm ở cuối cùng hàng ngang và dọc, vd ô ZZ200000 là ô cuối thì nhập code: range("ZZ200000").select nhaGiỏi thế, cho mình xin với.
Bạn học ở đâu nói mình biết với. Để mình …né!Dò ngang dò dọc hết bảng tính xem có dữ liệu nào nằm ở cuối cùng hàng ngang và dọc, vd ô ZZ200000 là ô cuối thì nhập code: range("ZZ200000").select nha
Vậy bạn hỏi thật hay hỏi chơi để còn biết đường mà trả lờiBạn học ở đâu nói mình biết với. Để mình …né!
Ô cuối dòng cuối cần gì đến Code để tìm kia chứ?Em có code tìm được ô cuối dòng cuối bảng tính nè, hoặc ô gần cuối cũng tìm được
Thì ý em là code tìm ô có dữ liệu cuối hoặc gần cuối cho ngang và dọc màÔ cuối dòng cuối cần gì đến Code để tìm kia chứ?
Dùng (xài) Code để tìm dòng cuối có dữ liệu của trang tính mà thôi.
em mất 25s để select được ô nàyThì ý em là code tìm ô có dữ liệu cuối hoặc gần cuối cho ngang và dọc mà
có code khác chỉ mất 1s để select được rồi bácem mất 25s để select được ô này