Em có 1 bảng dữ liệu với các tiêu đề cố định. Em muốn các dòng dữ liệu phía dưới tự động trôi như trong bảng chứng khoán thì phải làm như thế nào ạ. Mong các bác cao thủ chỉ giáo. Xin nhiệt liệt cám ơn.
Sub Macro1()
Dim x As Single
Dim Lr As Long, i As Long
Lr = Cells(Rows.Count, "A").End(xlUp).Row - 1
For i = 1 To Lr
ActiveWindow.SmallScroll Down:=1
x = Timer
While Timer - x < 0.5
Wend
Next i
End Sub
Để bảng tính "tự trôi" thì không cần bất cứ code nào
Nếu con chuột có nút cuộn giữa, hãy bấm nó 1 nhát rồi di chuột qua lại lên xuống ---> Đến khi thấy tốc độ trôi vừa ý thì thả chuột ra ---> Giờ chỉ việc nhìn.. đến khi nào hết khoái thì lại nhấp chuột lần nữa
Cách này có tác dụng trên hâu hết các phần mềm chứ không riêng gì Excel
Với Excel, nếu dùng code chỉ có thể cho nó trôi 1 lần nguyên dòng hoặc nguyên cột... làm gì có "cửa" trôi 1/2 hoặc 1/4 dòng ---> Thử xem!
Thì bạn cứ dùng theo cách tôi nói, kết hợp thêm Freeze Panes vào nữa ---> Có vấn đề gì đâu chứ ---> Freeze Panes hay không thì nó vẫn.. cứ trôiÝ của em là cái dòng có chứa tiêu đề của các cột dữ liệu như STT, đơn vị, số liệu ... thì đứng yên như mình dùng Preze panes, còn các dòng chứa dữ liệu ở dưới thì tự động trôi chậm chậm đến dòng cối cùng rồi lại chạy ngược lên dòng đầu tiên và cứ như thế. Nếu ai cần xem dữ liệu tại dòng nào thì có thể dùng chuột riêng. Cái này mà không phải viết đoạn cod thì tốt quá vì thú thực em k biết tẹo j về cái viết cod này. XIn các bác cao thủ giúp em ạ
Thì bạn cứ dùng theo cách tôi nói, kết hợp thêm Freeze Panes vào nữa ---> Có vấn đề gì đâu chứ ---> Freeze Panes hay không thì nó vẫn.. cứ trôi
Ái chà... chiêu thu nhỏ dần độ cao của ROW khá "tà đạo" nhưng cũng rất hay!Bạn thử xem file này có giúp được ý tưởng của bạn không.
Em cũng nghĩ như này.Thì bạn cứ dùng theo cách tôi nói, kết hợp thêm Freeze Panes vào nữa ---> Có vấn đề gì đâu chứ ---> Freeze Panes hay không thì nó vẫn.. cứ trôi