Xin được trợ giúp : Đưa lồng hàm tự tạo vào MsgBox

  • Thread starter Thread starter le_vis
  • Ngày gửi Ngày gửi
Liên hệ QC

le_vis

Thành viên tích cực
Tham gia
23/7/09
Bài viết
1,298
Được thích
799
Hiện tại tôi đang dùng một Form nhập liệu :

Tôi có lập công thức khống chế thời gian không cho nhập thêm hoặc sửa chữa dữ liệu =IF(AND(OR(YEAR(NOW())=1900;(NOW()-Menu!$K$2)<0;(NOW()-Menu!$K$2)>=52));"";1) Công thức này được đặt tại Cell Y2 của Form nhập liệu

Sau đó tôi sử dụng MsgBox sau :

If WorksheetFunction.Trim(.[Y2].Value) = "" Then

MsgBox " Da Khoa so ?"

validForm_N = False

Exit Function

End If


Để thông báo là “ Đã khóa sổ ” đồng thời không cho nhập liệu thêm hoặc sửa chữa dữ liệu đã có

Tôi muốn đưa công thức này trực tiếp vào MsgBox không phải đặt qua trung gian Cell Y2 nữa mà không tìm được cách xử lý.

Kính mong các bạn trợ giúp. Xin trân trọng cảm ơn !
 
Thử cách này xem:
if year(now())=1900 and (now()-worksheets("Menu").range("$K$2")<0 or now()-worksheets("Menu").range("$K$2")>=52 then. Bạn xem lại cái món and or của bạn, mình nhìn thấy lủng củng quá!
 
Thử cách này xem:
if year(now())=1900 and (now()-worksheets("Menu").range("$K$2")<0 or now()-worksheets("Menu").range("$K$2")>=52 then. Bạn xem lại cái món and or của bạn, mình nhìn thấy lủng củng quá!
Xin chào vu_tuan_manh_linh đã lâu không gặp. bạn khỏe chứ _ Tôi thay vào không được, dòng code báo đỏ _ Bạn xem lại giúp mình xem
if year(now())=1900 and (now()-worksheets("Menu").range("$K$2")<0 or now()-worksheets("Menu").range("$K$2")>=52 then
MsgBox " Da Khoa so ?"
validForm_N = False
Exit Function
End If
 
Xin chào vu_tuan_manh_linh đã lâu không gặp. bạn khỏe chứ _ Tôi thay vào không được, dòng code báo đỏ _ Bạn xem lại giúp mình xem
if year(now())=1900 and (now()-worksheets("Menu").range("$K$2")<0 or now()-worksheets("Menu").range("$K$2")>=52 then
MsgBox " Da Khoa so ?"
validForm_N = False
Exit Function
End If
Thanks bạn! Tôi vẫn khỏe trừ lúc yếu bạn ạ! Hì! Bạn gửi cho xin cái file demo đi, dễ hình dung hơn!
 

File đính kèm

Vâng. Có vẻ hơi chậm vì phải xóa bớt dữ liệu cho nhẹ File - Đây dữ liệu thật đó bạn - Xem giúp mình nhé
Bạn giải thích rõ cái đoạn AND OR của bạn đi, tôi không hiểu được đoạn này nghĩa là gì nữa!!
 
Bạn giải thích rõ cái đoạn AND OR của bạn đi, tôi không hiểu được đoạn này nghĩa là gì nữa!!
Cái đoạn AND OR là tôi muốn :
1) AND YEAR(NOW())=1900;""; Khống chế việc tháo Pin máy tính để sửa dữ liệu khi đã làm báo cáo xong
2) AND (NOW()-Menu!$K$2)<0;""; là khống chế khi đã làm báo cáo xong thì không được sửa lùi ngày tháng hệ thống để sửa dữ liệu nữa
3) AND (NOW()-Menu!$K$2)>=52;""; là đã hết tháng sau 20 ngày làm báo cáo xong thì không được sửa dữ liệu nữa
Có thể bạn nói sẽ là vô vị nếu vào code để sửa thì tôi xin nói là - Nếu thế thì quy kết là cố tình được rồi
Cảm ơn bạn đã quan tâm giúp
 
Lần chỉnh sửa cuối:
Thật lòng là tôi không hiểu cái đoạn AND OR của bạn! Tôi hiểu theo cách của tôi là khi 1 trong 3 điều kiện đó xảy ra thì hiện msgbox. Khi đó chỉ dùng Or thôi chứ AND không có tác dụng gì cả. Bạn xem file nhé!
 

File đính kèm

Cảm ơn bạn tôi sẽ lấy về và tes lại. và xin phúc đáp lại với bạn sau nhé
 
Thật lòng là tôi không hiểu cái đoạn AND OR của bạn! Tôi hiểu theo cách của tôi là khi 1 trong 3 điều kiện đó xảy ra thì hiện msgbox. Khi đó chỉ dùng Or thôi chứ AND không có tác dụng gì cả. Bạn xem file nhé!
Ok rồi Manh_Linh à. Xin Cảm ơn bạn nhiều - Nhờ bạn mà mình thấy được thêm cái sai cơ bản của mình nữa rồi.
Chân thành cảm ơn bạn nhiều nhiều . Chúc mạnh khỏe - Hạnh phúc và thành đạt
 
Web KT

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

Back
Top Bottom