Chữ chạy trong excel (1 người xem)

[hoangvinh_tb]

Mình nghe nói excel có thể làm font chữ chạy liên tục được bạn nào có thể hướng dẫn lại cho mình được khổng ?
Thanhk!

 

[xuanvu_dk2]

Chào các bạn nhé! Mình tham gia diễn đàn cũng lâu rồi nhưng hầu như chỉ xem mà không có bài viết gì. Vì nói thật cái này mình cũng chỉ tự học và khi nào cần dùng mà kiến thức bản thân không đáp ứng được mình mới tìm đến sách và các tài liệu trên mạng internet, Nhưng từ khi biết và tham gia điễn đàn mình thấy các bạn thật là tuyện vời kiến thức của các bạn cao siêu quá,mình thật hổ thiện vì các thứ bạn biết mình chưa nghe nói đến bao giờ. Ví dụ như vấn đề các bạn đang thảo luận đây chẳng hạn. Chữ chạy trong excel nghe mình còn chưa hiểu các bạn dùng nó để làm gì? vì mình chỉ biết chữ chạy trong VB,VĐK, PLC, Pôwerpin thôi có gì các bạn chia sẻ cùng mình nhé

 

[whitemouse]

to xuanvu,hoangvinh:
bạn chép đoạn code sau vào vba của excel(nhớ tạo 1 label trong sheet1 của file đó nhé)

Private Sub lblchaychutrenform1_Click()
Dim PauseTime
On Error Resume Next
Dim start
Dim l
lblchaychutrenform1.Caption = "hom nay la" & "  " & "ngay" & " " & Day(Now()) & " " _
& "thang" & " " & Month(Now()) & " " & "nam" & " " & Year(Now()) & "   "
nhan:
    PauseTime = 0.2
    start = Timer
    Do While Timer < start + PauseTime
        DoEvents
    Loop
     
        l = Len(lblchaychutrenform1.Caption)
        lblchaychutrenform1.Caption = Right(lblchaychutrenform1.Caption, l - 1) + _
Left(lblchaychutrenform1.Caption, 1)

    GoTo nhan
End Sub

 

[yeudoi]

Sau đó bạn ra lại sheet tạo một nút lệnh và chọn macro cho nút lệnh đó sau đó bấm vào sẽ rõ

 

[Po_Pikachu]

Mình có làm cái này nhưng vấn đề không chế nó không được ưng ý lắm! Mọi người bổ sung thêm cho em nha! File: http://www.mediafire.com/?hinj5zd4nz5 Thân.

 

[Người Đưa Tin]

Sau đó bạn ra lại sheet tạo một nút lệnh và chọn macro cho nút lệnh đó sau đó bấm vào sẽ rõ

Được anh quan tâm đề tài này, xin thay mặt tất cả thành viên cám ơn anh rất nhiều.
Anh có thể minh họa bằng hình ảnh hoặc bày cách làm chi tiết hơn để KTGG cùng học hỏi thêm. (Kính mong Đừng đưa ra đường link, KTGG đọc lại rối thêm bộ đàm nữa)

Một lần nữa xin gởi lời cám ơn anh cùng tất cả các anh chị đã dành thời gian hướng dẫn.
Chúc luôn vui khỏe - hạnh phúc

Kính,