Giúp sửa code tự động cuộn màn hình (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

vietkieucpc

Thành viên mới
Tham gia
17/12/10
Bài viết
13
Được thích
1
Các Anh Chị giúp mình sửa macro trong file gửi kèm với. Giúp mình tạo 1 nút chạy macro và 1 nút thoát.
Mình cảm ơn.
 

File đính kèm

Các Anh Chị giúp mình sửa macro trong file gửi kèm với. Giúp mình tạo 1 nút chạy macro và 1 nút thoát.
Mình cảm ơn.
mục đích file muốn làm gì thế bác. nói rõ ra em còn giúp được. thấy vòng lặp chạy hoài không ngừng, chả xem được gì. và chả thấy code có công dụng gì liên quan đến sheet cả

nghĩ là nó có vấn đề chỗ này
Mã:
Do
    If Keyassci = 27 Then
    LastRow = 1
    Exit Sub
    Else
        For i = 1 To LastRow
        ActiveWindow.ScrollRow = i + 1
        Application.Wait (Now + #12:00:01 AM#)
        Next i
    End If
Loop
có thể là lý do nó không ngừng nổi
 
Lần chỉnh sửa cuối:
Upvote 1
mục đích file muốn làm gì thế bác. nói rõ ra em còn giúp được. thấy vòng lặp chạy hoài không ngừng, chả xem được gì. và chả thấy code có công dụng gì liên quan đến sheet cả

nghĩ là nó có vấn đề chỗ này
Mã:
Do
    If Keyassci = 27 Then
    LastRow = 1
    Exit Sub
    Else
        For i = 1 To LastRow
        ActiveWindow.ScrollRow = i + 1
        Application.Wait (Now + #12:00:01 AM#)
        Next i
    End If
Loop
có thể là lý do nó không ngừng nổi
Mình muốn cho nó chạy tự cuốn màn hình để kết nối qua màn hình TV cho mọi người cung xem lần lượt danh sach từ trên xuống.
Giống như kiểu màn hình thong tin ở sân bay.
 
Upvote 0
Mình muốn cho nó chạy tự cuốn màn hình để kết nối qua màn hình TV cho mọi người cung xem lần lượt danh sach từ trên xuống.
Giống như kiểu màn hình thong tin ở sân bay.

Tự cuốn màn hình theo cách dễ nhất là:
- Bấm phím chuột giữa
- Dịch chuyển chuột xuống dưới (1 ít) rồi thả tay ra
- Và... bạn sẽ thấy màn hình tự cuốn rất hoành tráng
- Muốn dừng lại cứ nhấp chuột vào đâu đó
Điều quan trọng là không cần bất cứ code nào


[video=youtube;p3rda1EcFC8]https://www.youtube.com/watch?v=p3rda1EcFC8&feature=youtu.be[/video]
 
Upvote 0
Tôi nghĩ tác giả muốn hỏi về vấn đề chạy chữ trong Excel, mà tác giả lại nêu là cuộn màn hình.
 
Upvote 0
Tự cuốn màn hình theo cách dễ nhất là:
- Bấm phím chuột giữa
- Dịch chuyển chuột xuống dưới (1 ít) rồi thả tay ra
- Và... bạn sẽ thấy màn hình tự cuốn rất hoành tráng
- Muốn dừng lại cứ nhấp chuột vào đâu đó
Điều quan trọng là không cần bất cứ code nào



Rất cám ơn các Anh đã quan tâm và hồi âm tham gia.

Mình xin nêu mục đích để các Anh giúp:
1/ Mình muốn macro tự cuộn màn hình khi chạy (tạo 1 nút chạy macro)
2/ Cuộn từng hàng một, delay 1 khoảng thời gian nhất định để có thể xem được thông tin.
3/ Chạy danh sách từ hàng đầu tiên đến hàng cuối cùng, sau đó trở lại hàng đầu tiên và lặp lại.
4/ Khi muốn thay đổi thông tin, mình có thể cho dừng macro để cập nhật (sau đó lại cho chạy lại, nếu cần) - Tạo 1 nút dừng macrco.
 
Upvote 0
Mình xin nêu mục đích để các Anh giúp:
1/ Mình muốn macro tự cuộn màn hình khi chạy (tạo 1 nút chạy macro)
2/ Cuộn từng hàng một, delay 1 khoảng thời gian nhất định để có thể xem được thông tin.
3/ Chạy danh sách từ hàng đầu tiên đến hàng cuối cùng, sau đó trở lại hàng đầu tiên và lặp lại.
4/ Khi muốn thay đổi thông tin, mình có thể cho dừng macro để cập nhật (sau đó lại cho chạy lại, nếu cần) - Tạo 1 nút dừng macrco.

bạn tải file về xem có đúng ý ko nhé! +-+-+-+
 

File đính kèm

Upvote 0
Bạn Hyperlink có thể giúp minh sửa code cho cuộn màn hình lên từ từ, thay vì nhảy từng hàng một với (vì hơi giật màn hình).

Rất cảm ơn bạn và mong bạn giúp.

Theo tôi biết thì không có cách nào dùng VBA làm cho màn hình cuộn từ từ cả (chỉ có thể làm bằng tay)
 
Upvote 0
Cách làm thế nào vậy các anh em? Xin chỉ giúp mình với! Xin cảm ơn!
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom