Tạo lập thời gian đóng file excel

[dinhthientan]

K/g các a/c trên diễn đàn.
- Tôi có một file excel cần nhờ a/c giúp đỡ đoạn code định thời gian đóng file vào lúc 10 giờ đêm, do sau 10 giờ đêm sẽ có người khác mở file này để hiệu chỉnh.
- Tôi đã tham khảo nhiều bài viết rồi nhưng chỉ tìm thấy đoạn code định thời gian cố định từ lúc mở file excel + thêm 1 khoảng thời gian (giờ, phút, giây) thì file sẽ đóng. Nhiều khi, từ lúc mở file đến lúc đóng file nó quá 10 giờ đêm.
Rất cảm ơn các a/c.

 

[huuthang_bd]

Tôi đã tham khảo nhiều bài viết rồi nhưng chỉ tìm thấy đoạn code định thời gian cố định từ lúc mở file excel + thêm 1 khoảng thời gian (giờ, phút, giây) thì file sẽ đóng

Cho tôi xin file có code này đi bạn.

 

[batman1]

K/g các a/c trên diễn đàn.
- Tôi có một file excel cần nhờ a/c giúp đỡ đoạn code định thời gian đóng file vào lúc 10 giờ đêm, do sau 10 giờ đêm sẽ có người khác mở file này để hiệu chỉnh.
- Tôi đã tham khảo nhiều bài viết rồi nhưng chỉ tìm thấy đoạn code định thời gian cố định từ lúc mở file excel + thêm 1 khoảng thời gian (giờ, phút, giây) thì file sẽ đóng.

Nếu bạn có code "đó" rồi và chạy "tốt" thì vấn đề chỉ là xác định <1 khoảng thời gian (giờ, phút, giây)>, đúng không bạn? Vậy thì:
Khi mở tập tin thì đọc <giờ hiện hành> = time. Nếu < 22:00 (>= 22 thì không làm gì vì đó là lần mở do người khác mở) thì:

<1 khoảng thời gian (giờ, phút, giây)> = TimeSerial(22, 0, 0) - time

 

[dinhthientan]

Cho tôi xin file có code này đi bạn.

Tôi gửi anh một dạng file đó

 

[batman1]

Tôi gửi anh một dạng file đó

Sửa

Application.OnTime Now + TimeValue("00:05:30"), "CloseThisFile"

thành

If Time < TimeSerial(22, 0, 0) Then Application.OnTime Now + TimeSerial(22, 0, 0) - Time, "CloseThisFile"

Vấn đề là bạn lười tư duy, vì chỉ cần suy nghĩ chút là bạn cũng tự giải quyết được.

 

[dinhthientan]

Sửa

Application.OnTime Now + TimeValue("00:05:30"), "CloseThisFile"

thành

If Time < TimeSerial(22, 0, 0) Then Application.OnTime Now + TimeSerial(22, 0, 0) - Time, "CloseThisFile"

Vấn đề là bạn lười tư duy, vì chỉ cần suy nghĩ chút là bạn cũng tự giải quyết được.

Cảm ơn bác nhiều. Chính xác là mình không rành về việc này mà qua đọc mình thấy thích nên cũng chỉ dám làm mấy file đơn giản thôi

 

[huuthang_bd]

Cái chính là ở chỗ đó. Có sẵn cứ bê về dùng thôi không cần biết nó là cái gì trong khi chỉ cần tìm hiểu một chút là có thể tùy biến để sử dụng được.
--
Nhân tiện Now - Time cũng chính là Date.