Hỏi về hàm chuyển biểu thức toán học ra kết quả trong excel

[tuan_anhbm]

Chào tất cảc các thành viên GPE !
Mình mới sưu tầm bên "giaxaydung" 1 file dự toán excel, có thể chuyển kết quả từ dạng text ra số, ví dụ: trong mảng cần tính toán, cụ thể là trong cell E10, chỉ cần nhập: "Xây tường: 5*4*0,2" rồi nhấn Enter thì sẽ có ngay kết quả kèm theo: "= 4", sau đó tự SUM lên ô tổng kết quả phía trên, rất hay.
Mình chỉ đoán là trong file có sử dụng 1 số hàm tự tạo (Add-In), nhưng cụ thể không biết các câu lệnh, cấu trúc hàm ra làm sao...
Mình có gửi file excel kèm theo để các anh em trong diễn đàn cùng tham khảo, mong tìm được "bí kíp", bởi mình nghĩ bên GPE không thiếu những chuyên gia thừa khả năng trong lãnh vực này.
Mong các chuyên gia chỉ dẫn để các thành viên GPE có thể tham khảo hay ứng dụng vào "tuyệt chiêu" này vào trong công việc của mình.
<File gốc là 1 file dự toán nhiều Sheet, mình đã cắt bớt các Sheet ko cần thiết cho nhẹ>.

 

[Pozsi]

File dùng 2 công thức này để tính ra kết quả thôi. Thực ra chỉ là việc quét lấy giá trị sau dấu bằng (=) rồi chuyển thành số, rồi cộng lại thôi. Bạn nhấn Alt+F11 thì sẽ thấy các code nằm trong ấy.

Function [B]tongKL[/B](vung As Range)
Dim chuoikq As String
tongKL = 0
For Each cel In vung
chuoikq = cel.Value
[B]tongKL[/B] = [B]tongKL[/B] + [B]ketqua[/B](chuoikq)
Next
End Function
 
Function [B]ketqua[/B](chuoikl As String)
If vitri("=", chuoikl) = 0 Then
ketqua = 0
Else
[B]ketqua[/B] = Right(chuoikl, Len(chuoikl) - vitri("=", chuoikl) - 1)
End If
'ketqua = Replace(ketqua, ",", ".")
End Function

 

[MinhCong]

Cho Mình hỏi bạn Pozsi nhé!
Làm cách nào mà tại ô đó Mình đánh chữ kết hợp với công thức khi enter thì cho ra kết quả?

 

[ngoducdung.hp]

các huynh có bít vấn đề mà bạn minhcong hỏi không.mình cũng đang quan tâm đến vấn đề này.nếu ai bít .thì xin chỉ giáo
Thank

 

[nghiaphuc]

các huynh có bít vấn đề mà bạn minhcong hỏi không.mình cũng đang quan tâm đến vấn đề này.nếu ai bít .thì xin chỉ giáo
Thank

Bạn tham khảo bài #4 trong topic này nhé: http://www.giaiphapexcel.com/forum/...Tính-toán-chuỗi-biểu-thức&p=154325#post154325

 

[xuanngocdang]

Mình có 1 câu hỏi, nhờ các bạn chỉ giúp:
Trong 1 bảng tính excel có nhiều công thức tính toán, liên kết số liệu từ các sheet, các file khác nhau. Mình muốn chép kết quả ra một bảng tính khác, trên bảng tính mới chỉ thể hiện kết quả (con số) và bảng tính này sẽ không thay đổi số liệu kể từ lúc được chép ra thì làm cách nào. Giúp mình với! Cám ơn!

 

[nghiaphuc]

Mình có 1 câu hỏi, nhờ các bạn chỉ giúp:
Trong 1 bảng tính excel có nhiều công thức tính toán, liên kết số liệu từ các sheet, các file khác nhau. Mình muốn chép kết quả ra một bảng tính khác, trên bảng tính mới chỉ thể hiện kết quả (con số) và bảng tính này sẽ không thay đổi số liệu kể từ lúc được chép ra thì làm cách nào. Giúp mình với! Cám ơn!

Bạn copy dữ liệu từ file nguồn --> Tới file đích, chọn Edit\Paste Values.
Nếu muốn ở file đích, mọi định dạng trên sheet giống file nguồn thì bạn chọn toàn bộ sheet nguồn (nhấn nút trước cột A, trên hàng 1) --> Nhấn nút Format Painter (có biểu tượng cây cọ vẽ) --> Chọn toàn bộ sheet đích theo cách như trên là được.