Ghi lại Thời gian nhập Liệu

[mymapmap]

Xin lỗi e nhầm tí là các O11-O14-O17-O20-O23 ; O65-O68-O71-O74......... mới đúng chứ.
Ở đây em lấy trị tuyệt đối của O11 > 2*E2 tương tự như thế cho các O tiếp theo để đưa ra cảnh báo (đổi màu) sai số vượt quá 2 lần con số được nhập trong cột E (con số trong cột E là bất kỳ do mình nhập vào chứ ko cố định và luôn dương)

 

[sealand]

Mình tận dụng các ô màu tím để liên kết các ô E.
Bạn kiểm tra giúp vì mình không liên kết dữ liệu được

 

[mymapmap]

Sao em không thấy sai lệch lớn quá trời luôn mà nó không cảnh báo gì cả Bác Sealand ơi!
trình tự nhập liệu của em như sau:
Đầu tiên e nhập các số nguyên dương vào E22 đến E26 (E22= 0.1)
sau đó nhập lần lượt 10 cặp số EUT và REF vào sẽ cho ra độ sai lệch nếu trị tuyệt đối sai lệch lớn hơn nhiều lần(2) so với E22 thì cảnh báo để người nhập xem xét lại nếu chấp nhận thì OK còn thỏa mãn điều kiện nhỏ hơn 2*E22 thì không cảnh báo gì cả.
Lúc đầu em làm cảnh báo thay đổi màu như file gửi trước không có tác dụng buộc người nhập kiểm tra khi sai lệch lớn hơn 2 lần E22.
Bác xem và giúp e với nhé. Cảm ơn Bác nhiều lắm!

 

[mymapmap]

Xin lỗi em quên nữa em xin post lại file nhé!

 

[sealand]

Giờ mới test được, kiểm tra lại nhé.(Bạn phải sửa hết công thức nếu số bij chia=0-->0 tránh lỗi)

 

[mymapmap]

Nhưng có thể đưa ra cảnh báo sao khi nhập hết 10 cặp số không?
Khuya rồi chúc Bác ngủ ngon nhé. Để em test thử mai em sẽ báo cáo lại có gì Bác giúp em nhé!

 

[sealand]

Sửa lại chút lỗi, kiểm tra giúp

 

[mymapmap]

Đây là em tạo ra file lưu dạng template tất cả dữ liệu ban đầu là rỗng hoàn toàn ngoại trừ phần công thức tính toán thôi. Nên em thấy hình như còn vấn đề chưa ổn lắm

 

[sealand]

Nó không ổn trước hết là nếu dữ liệu trống công thức mắc lỗi chia cho 0!

 

[mymapmap]

Phải làm sao đây Bác!?
Trước tiên cell trống mới nhập số đầu tiên là cảnh báo rồi.
khi xóa ba cell cùng một lúc lại sinh ra những số không phía dưới nữa.
Ngay dòng 31,32 nhập hai con số có sai lệch lớn hơn 2 lần E22=0,1 cũng đâu có cảnh báo đâu?
Bác có thể làm cho kiểm tra để đưa ra cảnh báo kết quả sai lệch cuối cùng được không? hoặc cảnh báo khi 20 cell EUT và REF khác rỗng được không ạh?

 

[sealand]

Mình gửi lại file chỉ cảnh báo khi điền hết vùng dữ liệu

 

[mymapmap]

Cảnh Báo Theo Điều Kiện

Quên nữa không biết Bác có hàm Mround chưa nữa.
Em gửi lại file nhé. Vấn đề có thể chưa rõ Bác xem giùm e.

 

[sealand]

MROUND là hàm của Analysis ToolPark chỉ cần vào ad-in bổ xung là được.
Còn cách tính hồi trễ chắc là phải từ từ mới hiểu được.

 

[mymapmap]

Bác làm như vậy là quá sự mong đợi của em rồi. Nhưng do người nhập hay copy đôi khi quên thay đổi chọn điểm hồi trễ làm trong cell G22 hoặc G56.... làm cho kết quả hồi trễ sai nếu phát hiện được thì quá tốt.
Bác cho em hỏi trong vùng D31:O48, D85:O102..... E muốn khóa tính nặng copy,paste, DragDrop được không?
Xin Cảm ơn

 

[sealand]

Đã khoá copy thì khoá tất không cho chép bất kể ô nào là xong,khi cần chép ta Rem câu lệnh là được. Chép xong lại bỏ Rem đi. Khi hoàn thiện bạn viết code khoá mở đàng hoàng có mật khẩu hẳn hoi.
Tạm thời dùng code sau là được

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.CutCopyMode = False
End Sub

Bạn chép vào dưới code đã có và thoát ra.Giờ bạn xem có chép được không?

 

[sealand]

Mình gửi bạn mã khóa mở chế độ Copy

 

[mymapmap]

Mình gửi bạn mã khóa mở chế độ Copy

Bác Sealand ơi em đang sử tính năng cảnh báo lỗi sai số lớn nhưng trường hợp nhập 20 số EUT và REF trước sau đó mới nhập giá trị trong cell E22 --> E26 thì phần cảnh báo bỏ qua.
Bác có cách nào chặn được trường hợp này luôn không. gì người nhập cũng thường làm ngược lại.
Xin cảm ơn!

 

[TNT47]

Để ghi lại thời gian nhập liệu mình dùng hàm như sau: Ở F2=IF(ISBLANK(E2),"",NOW()) (xin xem file đính kèm cho rõ), tuy nhiên khi mình fill cells thì có vấn đề là mỗi lần mình điền giá trị cho E3, E4, E5 thì thời gian ở F3,F4 cũng tự động thay đổi theo, và khi đó F3 = F4 = F5. Có bác nào thạo thì giúp mình với.
Tks các bác nhiều!

 

[amateur2008]

Trước hết mình bỏ lock các ô từ B3-K3 để có 10 ô nhập dữ liệu. Sau khi protect sheet thì chỉ nhập được 10 ô này mà thôi. Các trang trí màu mè không đề cập nữa. Khi mình nhập vào 1 ô thì phát sinh sự kiện Worksheet change (Bảng tính thay đổi). Sự kiện cũng báo cho biết đổi tại ô nào. Như vậy ta chỉ việc gán cho phía dưới =Time hoặc now() là được.
Giờ thì ta vào code cụ thể. Nhấn Alt+F11--> chọn sheet1-->Bạn sẽ thấy code sau


Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 3 Then 'Nếu dòng thay đổi =3
Sheet1.Unprotect 'Tạm bỏ Protect
Target.Offset(1, 0) = Time 'Set ô phía duói =time
Sheet1.Protect 'Khóa lai
Sheet1.EnableSelection = xlUnlockedCells 'Cho phép chọn ô không khóa
End If
End Sub

Bạn cứ xem có gì hỏi lại sau

bạn cho hỏi tí, phần set time chỉ ghi lại thời gian là giờ, phút
bạn có cách nào để ghi lại cả ngày, tháng, năm không
nếu có thể tách thành 1 ô ngày và 1 ô giờ thì càng tốt

 

[doatmenhhon]

Đơn giản chỉ vậy thôi mà
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect (target, range (“A1:A100”)) is nothing then
Exit sub
End if
If Target.Value <> "" Then
Target.Offset(, 1) = Time & "_" & Date
End if
End sub