Xoá Spin Button thì công thức mới thực hiện

[nokiano258vn]

Phiền các bác xem giúp (file đính kèm) xem tại sao nếu để Spin Button thì không ra kết quả (chỉ bị khi nhập thông số là 1 "...")

 

[anhtuan1066]

Lổi này lạ quá! Cuối cùng tôi phải sửa theo kiểu cùi bắp (vậy mà nó chạy mới ghê chứ)

 

[nokiano258vn]

Cảm ơn bác nhiều nhiều, nhưng bác sửa ở chỗ nào vậy, tôi so sánh code trước và code sau có thấy sửa gì đâu

 

[ndu96081631]

Cảm ơn bác nhiều nhiều, nhưng bác sửa ở chỗ nào vậy, tôi so sánh code trước và code sau có thấy sửa gì đâu

Có khác đấy, đoạn gần cuối:

strTemp = Replace(ValueEval, "x", "*")
strTemp = Replace(strTemp, ":", "/")
strTemp = Replace(strTemp, "{", "(")
strTemp = Replace(strTemp, "}", ")")
strTemp = Replace(strTemp, "[", "(")
strTemp = Replace(strTemp, "]", ")")
strTemp = Replace(strTemp, ",", ".")
[COLOR=Red][B]strTemp = "(" & strTemp & ")*1"[/B][/COLOR]

Chổ màu đỏ là chổ được thêm vào!
Lạ thật, nhân toàn bộ với 1 trước thì lại không bị lổi