Xin hàm hoặc code lấy số hàng tối đa của excel (1 người xem)

[pmhoang]

muốnTrong excel 2003, mình muốn lấn số hàng cuối cùng của dữ liệu mình dùng.

row_end=65536
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

qua ex 2010 minh lai dùng

row_end=1048576
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

Vì vậy mình phải làm 2 cái code khác nhau cho 2 excel, mình muốn hỏi các bạn có cách nào để excel tự nhận biết là 2003 hay 2010 và nó xuất ra được số hàng tối đa của nó không?
Cảm ơn các bạn nha.

 

[kuldokk]

muốnTrong excel 2003, mình muốn lấn số hàng cuối cùng của dữ liệu mình dùng.

row_end=65536
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

qua ex 2010 minh lai dùng

row_end=1048576
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

Vì vậy mình phải làm 2 cái code khác nhau cho 2 excel, mình muốn hỏi các bạn có cách nào để excel tự nhận biết là 2003 hay 2010 và nó xuất ra được số hàng tối đa của nó không?
Cảm ơn các bạn nha.

Bạn dùng Application.version
hoặc đơn giản dùng ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlDown).Row
hoặc rows.count

 

[nghiaphuc]

muốnTrong excel 2003, mình muốn lấn số hàng cuối cùng của dữ liệu mình dùng.

row_end=65536
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

qua ex 2010 minh lai dùng

row_end=1048576
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

Vì vậy mình phải làm 2 cái code khác nhau cho 2 excel, mình muốn hỏi các bạn có cách nào để excel tự nhận biết là 2003 hay 2010 và nó xuất ra được số hàng tối đa của nó không?
Cảm ơn các bạn nha.

Phiên bản nào thì hàng cuối cũng là Cells.Rows.Count.

 

[Hoàng Trọng Nghĩa]

muốnTrong excel 2003, mình muốn lấn số hàng cuối cùng của dữ liệu mình dùng.

row_end=65536
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

qua ex 2010 minh lai dùng

row_end=1048576
hang_cuoi=Cells(row_end, 1).End(xlUp).Row

Vì vậy mình phải làm 2 cái code khác nhau cho 2 excel, mình muốn hỏi các bạn có cách nào để excel tự nhận biết là 2003 hay 2010 và nó xuất ra được số hàng tối đa của nó không?
Cảm ơn các bạn nha.

Không cần biết phiên bản, muốn hàng cuối thì dùng Rows.Count thôi.

 

[pmhoang]

Mình làm được rồi.
Cảm ơn các anh em GPE nhiều nha.