Tìm record cuối cùng trong 1 sheet!!!

Liên hệ QC

adamexcel

Thành viên mới
Tham gia
24/7/08
Bài viết
3
Được thích
0
Chào cả nhà!!! e là thành viên mới, và e cũng chỉ mới học về exel.. e có một câu hỏi nhỏ xin hỏi các pro. ( xin admin bỏ qua nếu là câu hỏi có rùi nha hay là hơi ...////////////)

Số là e một workbook có một sheet để nhập thông tin(sheet1) và một sheet để xuất theo mẫu đã xác định trước(Sheet 2). Vậy xin hỏi các pro là làm cách nào cho sheet 2 sẽ xuất những thông tin ở row cuối cùng của sheet 1( tức là row mới vừa nhập vào)

mong các pro giúp đỡ!! +-+-+-+
 
Giả sử cột A làcột có đầy đủ dữ liệu trên tất cả các dòng (vì có thể có những ô trống):
countA(A:A) sẽ cho con số chỉ số dòng cuối. Giả sử được 100.
Như vậy bên sheet2 sẽ phải dùng indirect.
Thí dụ thay vì =sheet1!A100 sẽ phải viết =Indirect("Sheet1!A"&CountA(Sheet1!A:A))
 
Một chút cải tiến để có thể kéo thả ở bất cứ nơi đâu bên sheet2 mà vẫn lấy được dòng cuối bên sheet1 =INDIRECT("Sheet1!"&ADDRESS(COUNTA(Sheet1!A:A),COLUMN(),4)) Thân.
 
Lần chỉnh sửa cuối:
Giả sử cột A làcột có đầy đủ dữ liệu trên tất cả các dòng (vì có thể có những ô trống):
countA(A:A) sẽ cho con số chỉ số dòng cuối. Giả sử được 100.
Như vậy bên sheet2 sẽ phải dùng indirect.
Thí dụ thay vì =sheet1!A100 sẽ phải viết =Indirect("Sheet1!A"&CountA(Sheet1!A:A))
Để áp dụng cho dòng liên tục hoặc không liên tục, em thường dùng cách sau :
Sheet1.Range("A65536").End (xlUp)......

TDN
 
Chào cả nhà!!! e là thành viên mới, và e cũng chỉ mới học về exel.. e có một câu hỏi nhỏ xin hỏi các pro. ( xin admin bỏ qua nếu là câu hỏi có rùi nha hay là hơi ...////////////)

Số là e một workbook có một sheet để nhập thông tin(sheet1) và một sheet để xuất theo mẫu đã xác định trước(Sheet 2). Vậy xin hỏi các pro là làm cách nào cho sheet 2 sẽ xuất những thông tin ở row cuối cùng của sheet 1( tức là row mới vừa nhập vào)

mong các pro giúp đỡ!! +-+-+-+

Thử dùng với File này xem được không?
xls.gif
Dong cuoi.xls (30.0 KB)​
 
Lần chỉnh sửa cuối:
Boyxin xem lại thử xem, mình thấy hình như không thỏa yêu cầu, nó chỉ Show dòng 28 thôi hà.

TDN

Hi, bác giúp em cái vụ chọn sheet2 thì code tự cập nhật (có lần đọc ở GPE rồi mà giờ lần không thấy)

Em mới tập, nên => Dùng tạm cái này cũng được
 

File đính kèm

  • Dong cuoi.xls
    30 KB · Đọc: 27
Lần chỉnh sửa cuối:
To Boyxin:
PHP:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
    EndRow
Else
    EndRow
End If
End Sub
If hay Else cũng đều chạy EndRow, vậy thì không cần If nữa:
PHP:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    EndRow
End Sub

Tuy nhiên mỗi lần nhúc nhích là 1 lần chạy code, ta sửa lại (theo ý chọn sheet2 thì code tự cập nhật):
PHP:
Private Sub Worksheet_Activate()
    EndRow
End Sub

To Tedaynui: Bài 2 và 3 là dùng công thức không dùng VBA.
Thực ra trong bảng dữ liệu sẽ có ít nhất 1 cột có đủ dữ liệu trên mọi dòng, thí dụ cột Số thứ tự (có thể là cột khác, người dùng phải tìm). Giả sử cột số TT bắt đầu từ A7, dòng cuối sẽ là CountA(A7:A65000)+6
 
Kết thúc chủ đề!!

Nhờ vào sự hướng dẫn tận tình của các pro mà em đã làm được cái em cần rui`/-*+/ !!.
 
Giả sử cột A làcột có đầy đủ dữ liệu trên tất cả các dòng (vì có thể có những ô trống):
countA(A:A) sẽ cho con số chỉ số dòng cuối. Giả sử được 100.
Như vậy bên sheet2 sẽ phải dùng indirect.
Thí dụ thay vì =sheet1!A100 sẽ phải viết =Indirect("Sheet1!A"&CountA(Sheet1!A:A))
Dung COUNTA không được đâu sư phụ ơi! Vì trong cột ấy, nếu có dòng nào đó bị rổng là tiêu đời... Mặc khác, khi tạo bảng người ta thường chừa lại vài dòng trống phía trên...
Tốt nhất hãy xem các công thức này:
http://www.giaiphapexcel.com/forum/showthread.php?p=53049#post53049
 
Ndu xem bài 9 dùm đi mà:
Thực ra trong bảng dữ liệu sẽ có ít nhất 1 cột có đủ dữ liệu trên mọi dòng, thí dụ cột Số thứ tự (có thể là cột khác, người dùng phải tìm). Giả sử cột số TT bắt đầu từ A7, dòng cuối sẽ là CountA(A7:A65000)+6

Với lại câu mở đầu: Giả sử....
 
Web KT
Back
Top Bottom