Nhờ các anh chị trên diễn đàn sửa giúp code file tính khối lượng dự tóan (2 người xem)

[quoccuonghd]

E có file tính khối lượng dự toán của anh vũ_tuấn_mạnh_linh gửi cho nhưng khi tinh thì gặp một lỗi là trong cột E khi diễn giải khối lượng bằng 1 thì dòng tính báo màu đỏ và không cho kết quả sang cột G. Mong các anh chị sửa giúp code hộ em trong file đính kèm. Xin cảm ơn.

 

[quoccuonghd]

E có file tính khối lượng dự toán của anh vũ_tuấn_mạnh_linh gửi cho nhưng khi tinh thì gặp một lỗi là trong cột E khi diễn giải khối lượng bằng 1 thì dòng tính báo màu đỏ và không cho kết quả sang cột G. Mong các anh chị sửa giúp code hộ em trong file đính kèm. Xin cảm ơn.

Nhờ các anh chị sửa giúp em code cho file đính kèm với. Xin cảm ơn.

 

[quoccuonghd]

E có file tính khối lượng dự toán của anh vũ_tuấn_mạnh_linh gửi cho nhưng khi tinh thì gặp một lỗi là trong cột E khi diễn giải khối lượng bằng 1 thì dòng tính báo màu đỏ và không cho kết quả sang cột G. Mong các anh chị sửa giúp code hộ em trong file đính kèm. Xin cảm ơn.

Nhờ các anh chị sửa giúp em code cho file đính kèm với em rất cần. Xin cảm ơn.

 

[Ba Tê]

E có file tính khối lượng dự toán của anh vũ_tuấn_mạnh_linh gửi cho nhưng khi tinh thì gặp một lỗi là trong cột E khi diễn giải khối lượng bằng 1 thì dòng tính báo màu đỏ và không cho kết quả sang cột G. Mong các anh chị sửa giúp code hộ em trong file đính kèm. Xin cảm ơn.

Chỉ có người viết code mới biết mục đích mình muốn gì.
Đọc code người khác mà biểu sửa trong khi không biết ý người khác muốn có cái kết quả là gì thì "thà chết còn sướng hơn"
1/ Hiểu như vầy có đúng hông?
- Nhập vào cột E 1 chuỗi có dạng một phép tính thì thêm dấu "=" và kết quả phép tính
- Nếu nhập vào một chuỗi có dấu ":" thì thêm dấu "=" và kết quả phép tính từ sau dấu ":"
- Nếu nhập một số (Number) thì giữ nguyên số đó
2/ Công thức cột G là tổng kết quả các ô trong cột E?
"Mò" thí thí không xài được thì thôi vậy.

 

[quoccuonghd]

Ý em muốn nhờ là sửa code làm sao để nhập số 1 tại cột E sau đó nhấn enter thì sẽ tự động diễn giải 1=1 vàtại cột G sẽ cho kết quả là 1. File của e đưa lên thì tính được tất cả các biểu thức và các số lớn hơn 1 rồi chỉ có = 1 thì nó không diễn giải mà chỉ là 1 và cũng không cho kết tổng tại cột G. Vậy e mới đưa file lên nhờ mọi người sử lý giúp để file được hoàn thiện hơn.

 

[quoccuonghd]

Chỉ có người viết code mới biết mục đích mình muốn gì.
Đọc code người khác mà biểu sửa trong khi không biết ý người khác muốn có cái kết quả là gì thì "thà chết còn sướng hơn"
1/ Hiểu như vầy có đúng hông?
- Nhập vào cột E 1 chuỗi có dạng một phép tính thì thêm dấu "=" và kết quả phép tính
- Nếu nhập vào một chuỗi có dấu ":" thì thêm dấu "=" và kết quả phép tính từ sau dấu ":"
- Nếu nhập một số (Number) thì giữ nguyên số đó
2/ Công thức cột G là tổng kết quả các ô trong cột E?
"Mò" thí thí không xài được thì thôi vậy.

- Nhập vào cột E 1 chuỗi có dạng một phép tính thì thêm dấu "=" và kết quả phép tính (ok)
- Nếu nhập vào một chuỗi có dấu ":" thì thêm dấu "=" và kết quả phép tính từ sau dấu ":" (ok)
- Nếu nhập một số (Number) thì thêm dấu "=" và kết quả la một số (Number)
2/ Công thức cột G là tổng kết quả các ô trong cột E? (ok)

Sửa giúp e được như ý trên là ok anh ah. giúp em nhé. Cảm ơn anh.

 

[Ba Tê]

- Nhập vào cột E 1 chuỗi có dạng một phép tính thì thêm dấu "=" và kết quả phép tính (ok)
- Nếu nhập vào một chuỗi có dấu ":" thì thêm dấu "=" và kết quả phép tính từ sau dấu ":" (ok)
- Nếu nhập một số (Number) thì thêm dấu "=" và kết quả la một số (Number)
2/ Công thức cột G là tổng kết quả các ô trong cột E? (ok)

Sửa giúp e được như ý trên là ok anh ah. giúp em nhé. Cảm ơn anh.

Tôi cũng "bảo thủ" không chỉnh sửa code người khác mà chỉ xài code của mình.

 

[quoccuonghd]

Tôi cũng "bảo thủ" không chỉnh sửa code người khác mà chỉ xài code của mình.

Code chuẩn rồi, đúng ý của e rồi. cảm ơn a nhiều.

 

[Hau151978]

Vì một lỗi khó hiểu nào đó mà hàm Evaluate trong hàm DienGiaiTL và sub WorksheetChange báo lỗi khi đối số là 1.
Bạn thử vào trong Immediate (bấm Alt-F11 rồi Ctrl-G) bấm ?Evaluate(1) sẽ báo lỗi, bấm ?Evaluate(2) ra kết quả 2, ?Evaluate(5) lỗi. Lỗi chỉ xảy ra trên file của bạn, mình tạo file mới không bị lỗi này.
Trong file của bạn có name TINH, không biết có phải là macro4 không (cái này mình mù tịt), không biết có liên quan đến lỗi Evaluate ở trên không?
Lỗi này đã đề cập ở đây nhưng chưa thấy câu trả lời: http://www.giaiphapexcel.com/forum/showthread.php?22160-Tính-toán-chuỗi-biểu-thức

 

[ndu96081631]

Lỗi này đã đề cập ở đây nhưng chưa thấy câu trả lời: http://www.giaiphapexcel.com/forum/showthread.php?22160-Tính-toán-chuỗi-biểu-thức

Chẳng phải bài cuối cùng của topic đó đã trả lời rồi sao?

Tôi xóa cái CommandButton "Hide" đi thì thấy bình thường.
Bây giờ đóng tập tin và mở book mới (New --> Blank workbook). Tôi đặt lên Sheet1 CommandButton rồi gõ vào cửa sổ Immediate lệnh: ?Evaluate(1) rồi Enter thì .... báo lỗi