Hỏi về ý nghĩa và ứng dụng của phương thức ListHeaderRows.

[ptlong04x1]

1. Nhờ mọi người chỉ dẫn về ý nghĩa và ứng dụng của thuộc tính ListHeaderRows.

2. Mình có ví dụ dưới đây, nhờ các bạn giải thích giùm kết quả trong 2 ô màu xanh.

Sub a()
    
    Dim Rng1, Rng2 As Range
    
    Set Rng1 = Range("C7").CurrentRegion
    Set Rng2 = Range("C15").CurrentRegion
    Range("C8").Value = Rng1.ListHeaderRows
    Range("C16").Value = Rng2.ListHeaderRows
    
End Sub

​

 

[huuthang_bd]

Theo tôi thì đây là thuộc tính thể hiện vùng dữ liệu có tiêu đề hay không. Nếu dòng đầu tiên của vùng dữ liệu có định dạng khác với những dòng còn lại thì ListHeaderRows = 1. Ngược lại thì ListHeaderRows = 0.
Đoạn code của bạn:
Set Rng1 = Range("C7").CurrentRegion
Thì Rng1 là vùng B57, toàn bộ dữ liệu được định dạng giống nhau nên ListHeaderRows = 0
Set Rng2 = Range("C15").CurrentRegion
Rng2 là vùng B1515. Chỉ có 1 dòng nên Excel cho dòng đó là dòng tiêu đề, ListHeaderRows = 1

 

[ptlong04x1]

Cảm ơn bạn, thì ra nó có liên quan đến định dạng, mình vừa thí nghiệm thì thấy nó cho ta số lượng của các dòng tiêu đề luôn (các dòng có định dạng khác), không chỉ là 0 và 1.

Sub a()
    
    Dim Rng As Range
    
    Set Rng = Range("C5").CurrentRegion
    Rng.Select
    Range("C7").Value = Rng.ListHeaderRows
    
End Sub

 

[ChanhTQ@]

Bạn đến đây tham khảo xem có những gì ích lợi với bạn chăng (?!)

http://www.giaiphapexcel.com/forum/showthread.php?t=6419#5

​