Tao Menu và dòng chữ chạy trong Excel (1 người xem)

Liên hệ QC

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

duckchid

Thành viên mới
Tham gia
18/5/12
Bài viết
7
Được thích
0
Dear anh chị!!!
Trong file , Em tạo sheet Menu bằng liên kết Hyperlink
để liên kết đến 8 sheet nhưng thường xảy ra lỗi.
Anh chị có thể hướng dẫn cho em phương pháp khác hiệu quả hơn được không ạ?
Anh chị hướng dẫn giúp em cách tạo chữ chạy. vd: "Marketing Warehouse"
Em xin trân trọng cám ơn...!!!
Chúc anh chị có một buổi tối vui vẻ và hạnh phúc..!!!
 

File đính kèm

  • untitled.GIF
    untitled.GIF
    79 KB · Đọc: 205
Dear anh chị!!!
Trong file , Em tạo sheet Menu bằng liên kết Hyperlink
để liên kết đến 8 sheet nhưng thường xảy ra lỗi.
Anh chị có thể hướng dẫn cho em phương pháp khác hiệu quả hơn được không ạ?
Anh chị hướng dẫn giúp em cách tạo chữ chạy. vd: "Marketing Warehouse"
Em xin trân trọng cám ơn...!!!
Chúc anh chị có một buổi tối vui vẻ và hạnh phúc..!!!
Thử với cái này xem sao:
Private Declare Sub Sleep Lib "kernel32" (ByVal ms As Long)
Sub Auto()
Dim Str As String
Str = "Marketing Warehouse "
Do
DoEvents
[b3].Value = Str
Str = Right(Str, 1) & Mid(Str, 1, Len(Str) - 1)
Sleep 100
Loop
End Sub
 
Upvote 0
Thử với cái này xem sao:

Anh ơi !!! Em thử cách của anh hướng dẫn rồi, ok lắm. Em cám ơn anh nhiều. Anh cho em hỏi thêm, nếu muốn chữ chạy từ "phải" qua "trái" thì phải làm như thế nào vậy anh? Em thật sự không biết gì về VBA hết đó. Anh giúp dùm em nha. Thanks a nhiều...!!!
 
Upvote 0
Mã nguồn có
Sleep 100

Sao tôi thử trên E2003 không được. SLEEP là hàm tự tạo hay có sẵn trong Excel hả anh khoavu?
Nếu có sẵn, nhờ anh chỉ giúp cách cho hàm hoạt động.
'Gọi hàm Sleep:
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Sleep 100 <--- 100/1000 giây
Hàm số của hàm Sleep có đơn vị ms (1/1000s)
 
Upvote 0
Web KT

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

Back
Top Bottom