Duyệt từng range bằng VBA

[ditimgiaiphapexcel]

Mọi người ơi! mình đang tập tành viết Macro. Mình đang thử duyệt qua các dòng bằng cách quét một vùng trên sheet thông qua InputBox như thế này:

rag = Application.InputBox(Prompt:="Chon vung can duyet: ", Type:=8)

Nhưng không thể nào đếm được Vùng mình chọn có bao nhiêu dòng. Các bạn chỉ giúp mình sai ở chỗ nào với.

 

[ndu96081631]

Mọi người ơi! mình đang tập tành viết Macro. Mình đang thử duyệt qua các dòng bằng cách quét một vùng trên sheet thông qua InputBox như thế này:

rag = Application.InputBox(Prompt:="Chon vung can duyet: ", Type:=8)

Nhưng không thể nào đếm được Vùng mình chọn có bao nhiêu dòng. Các bạn chỉ giúp mình sai ở chỗ nào với.

Đựa nguyên code và nguyên file lên đi
Xem đoạn code của bạn, chả hiểu rag là cái giống gì nữa ---> Type:=8 có nghĩa đang nói đến Range, thế thì phải Set rag =.... chứ