Xin giúp, tự động gửi mail theo giờ định trước (1 người xem)

[anhdepjai]

Xin chào các thầy cô,

Em có làm 1 file excel để quản lý các giá để hàng trong công ty. Nhưng vướng mất 1 vấn đề là: em đặt trước 1 giờ nào đó, và cứ đến giờ đó trong ngày là nó tự kích hoạt hàm gửi mail.
Mong các thầy cô và các bạn giúp đỡ.
Nếu dùng application.ontime thì chỉnh sao cho khi chạy file không bị giật ah. Thanks

 

[Quang_Hải]

Xin chào các thầy cô,

Em có làm 1 file excel để quản lý các giá để hàng trong công ty. Nhưng vướng mất 1 vấn đề là: em đặt trước 1 giờ nào đó, và cứ đến giờ đó trong ngày là nó tự kích hoạt hàm gửi mail.
Mong các thầy cô và các bạn giúp đỡ.
Nếu dùng application.ontime thì chỉnh sao cho khi chạy file không bị giật ah. Thanks

Dùng Application.Ontime là đúng rồi
Muốn không giật giật màn hình thì chắc phải dùng 2 cặp lệnh
Application.Screenupdating=False
......
Application.Screenupdating=True

 

[anhdepjai]

Thưa thầy, em lao vào làm cái gửi mail khi đạt đúng giờ. Vậy té ra là mình không làm được.
Thầy và các bạn giúp em nốt với ah. Chỉ cần cho em cái code (action nào đó VD msgbox "OK") vào thời gian định trước là được ah. Em cảm ơn nhiều. Dùng ontime cũng được thầy ah, em chấp nhận lag lag.

 

[Quang_Hải]

Thưa thầy, em lao vào làm cái gửi mail khi đạt đúng giờ. Vậy té ra là mình không làm được.
Thầy và các bạn giúp em nốt với ah. Chỉ cần cho em cái code (action nào đó VD msgbox "OK") vào thời gian định trước là được ah. Em cảm ơn nhiều. Dùng ontime cũng được thầy ah, em chấp nhận lag lag.

Thấy mấy cái file to đùng thấy ớn quá nên không có tải file.
Code mẫu thế này. Code này ấn định lúc 17 giờ sẽ kích hoạt 1 Sub khác
File chứa code phải đang mở thì code mới chạy.

Sub Go()
   MsgBox "It's time to do it."
End Sub
Sub Auto_Open()
Application.OnTime TimeValue("17:00:00"), "Go"
End Sub

 

[anhdepjai]

Cảm ơn thầy nhé. Mai đến cty có bước đi tiếp rồi

 

[anhdepjai]

Thưa thầy, em đã làm được gửi mail theo giờ định trước. Nhưng chỉ được 1 lần / 1 lần mở file. Còn nếu em mở file này nhiều ngày thì lại không chạy vào hôm sau.
Thầy hướng dẫn thêm để em chạy được code ngày qua ngày với ah. Thanks

 

[Quang_Hải]

Thưa thầy, em đã làm được gửi mail theo giờ định trước. Nhưng chỉ được 1 lần / 1 lần mở file. Còn nếu em mở file này nhiều ngày thì lại không chạy vào hôm sau.
Thầy hướng dẫn thêm để em chạy được code ngày qua ngày với ah. Thanks

1. Không thích cách xưng hô "thầy". Cứ vào các trường, trung tâm mà học rồi thì tha hồ gọi thầy xưng trò. Ở đây tốt nhất là dùng cách xưng hô theo cách xã giao ngoài xã hội.
2. Dạng code tự động thực thi quái gì gì đó thì file chứa code phải luôn được mở. Chỉ vậy thôi. Muốn nó mở tự động thì cho khởi động tự động khi mở Win. Mình chỉ biết có thế.

 

[anhdepjai]

1. OK nhất trí quan điểm. Tuy nhiên thấy hơi bất kính vì chắc Quang Hải sinh năm 1969. Mình thì kém đến hơn 1 giáp
2. Vấn đề mình muốn hỏi ở đây là file chạy code chỉ 1 lần rồi thôi. Mình đã thử sửa thời gian sau đó đợi nhưng code không chạy thêm nữa khi gặp thời gian đó. Nói nôm na là chắc hôm sau gặp thời gian đó thì code sẽ không chạy vì nó đã chạy 1 lần từ hôm trước rồi. . Mong bạn giúp đỡ

 

[Quang_Hải]

1. OK nhất trí quan điểm. Tuy nhiên thấy hơi bất kính vì chắc Quang Hải sinh năm 1969. Mình thì kém đến hơn 1 giáp
2. Vấn đề mình muốn hỏi ở đây là file chạy code chỉ 1 lần rồi thôi. Mình đã thử sửa thời gian sau đó đợi nhưng code không chạy thêm nữa khi gặp thời gian đó. Nói nôm na là chắc hôm sau gặp thời gian đó thì code sẽ không chạy vì nó đã chạy 1 lần từ hôm trước rồi. . Mong bạn giúp đỡ

1. Nếu tự cho rằng mình nhỏ tuổi hơn người giúp mình thì cứ xưng hô anh em
2. Code sửa lại thử thế này

Sub Go()
   MsgBox "It's time to do it."
   Auto_Open
End Sub
Sub Auto_Open()
Application.OnTime TimeValue("17:00:00"), "Go"
End Sub