Chữ chạy trên 1 ô

[lamho27]

Các bạn cho hỏi , có hàm nào để làm chử chạy giống như tiêu đề của GPE ở trên
"Giải Pháp Excel phát hành sách lập trình VBA trong Excel, Mời tài trợ cho giaiphapexcel.com "
làm ơn hướng dẩn giùm

 

[tedaynui]

Các bạn cho hỏi , có hàm nào để làm chử chạy giống như tiêu đề của GPE ở trên
"Giải Pháp Excel phát hành sách lập trình VBA trong Excel, Mời tài trợ cho giaiphapexcel.com "
làm ơn hướng dẩn giùm

Nếu muốn chữ chạy như vậy thì bạn phải dùng VBA (đã có trên GPE)
Nếu dùng hàm thì bạn phải bấm F9 liên tục thì chữ mới chạy.

TDN

 

[laulemroi]

bạn find trên diễn đàn,cái này đã được 1 bạn trình bày rồi.Có thể điều chỉnh được tốc độ chữ chạy nữa.

 

[lamho27]

nếu dùng hàm thì phải dùng hàm nào vậy ?

 

[chibi]

Chịu khó tìm kiếm nhé. Đây là 1 kết quả tìm kiếm

 

[lamho27]

em có làm code sau đây , chạy thì ok ,nhưng khi đánh chử vô 1 ô bất kỳ thì màn hình báo lổi là : microsoft visual basic 400 , cho hỏi code dưới đây còn thiếu cái gì hay không ?

Sub auto_open()
t = "......Remplir que les celulles couleur blanc.............."
n = 0
Do While n < 500
t = Right(t, 1) & Left(t, Len(t) - 1)
[A5] = t
w = 0.2
temp = Timer
Do While Timer < temp + w
DoEvents
Loop
n = n + 1
Loop
End Sub

 

[ndu96081631]

Sửa lại:

Sub Chaychu()
t = "......Remplir que les celulles couleur blanc.............."
n = 0
Do While n < 500
t = Right(t, 1) & Left(t, Len(t) - 1)
[A5] = t
w = 0.2
temp = Timer
Do While Timer < temp + w
DoEvents
Loop
n = n + 1
Loop
End Sub

Private Sub Workbook_Open()
Call Chaychu
End Sub