Vô hiệu hóa các Sub trong 1 khoảng thời gian cho trước (1 người xem)

[LYSM]

Kính gửi các anh chị!
Ví dụ trong file của em có các Sub1, Sub2, Sub3 tự tạo
Em muốn sau 1 khoảng thời gian nào đó (2 ngày chẳng hạn) các sub đó sẽ bị vô hiệu thì làm như thế nào ạ. Kính mong các anh chị giúp đỡ
Xin cảm ơn!

 

[PhanTuHuong]

Bạn tạo 1 biến lưu giá trị vào ô nào đó, sau đó tạo điều kiện nếu ngày thực hiện Now lớn hơn như thế nào thì exit sub

 

[ndu96081631]

Kính gửi các anh chị!
Ví dụ trong file của em có các Sub1, Sub2, Sub3 tự tạo
Em muốn sau 1 khoảng thời gian nào đó (2 ngày chẳng hạn) các sub đó sẽ bị vô hiệu thì làm như thế nào ạ. Kính mong các anh chị giúp đỡ
Xin cảm ơn!

Ví dụ đơn giản thế này:

Sub Sub1()
  If Date = DateSerial(2013, 6, 22) Then Exit Sub
   ' Code của bạn
End Sub

 

[LYSM]

Ví dụ đơn giản thế này:

Sub Sub1()
  If Date = DateSerial(2013, 6, 22) Then Exit Sub
  [B][U] ' Code của bạn[/U][/B]
End Sub

Thầy ơi, phần em in đậm đó là tên sub hay là cả 1 đoạn code của sub đó ạ?

 

[TrungChinhs]

Thầy ơi, phần em in đậm đó là tên sub hay là cả 1 đoạn code của sub đó ạ?

Xin phép Thầy cho nói leo một câu.

Cả 2 phương án trên đều đúng (code của bạn có thể là 1 đoạn code hoặc câu lệnh gọi tên 1 sub).