Chuyển chuỗi văn bản thành công thức

[nero24]

MÌnh có file excel như sau. Mình muốn khi thay đổi giá trị ở F1, thì B2 sẽ cho ra kết quả, chứ ko phải công thức như vậy.
MÌnh có tham khảo công thức:
Function ValueR(Str As String)
ValueR = Evaluate(Str)
End Function

Nhưng chưa biết xài cái nầy như thế nào

THanks all!

 

[befaint]

Cái đó là hàm tự tạo (vba).
Chép Cái đó vào một module.
Còn ở bảng tính thì:
B2=ValueR(D2)

 

[nero24]

Thanks ban nhiều, mình làm lại sao ko dc nhỉ, ô B2 toàn hiện Name, hình như nó chưa hiểu giá trị biến ValueR

 

[nero24]

OK mình làm dc rồi, THank ban nhiều nhé

 

[nero24]

Hiện tại mình lại có vấn đề sau:
Có 2 file chứa dữ liệu lần lượt là Test-Jan.xlsx và Test-Feb.xlsx trong folder Jan và Feb tương ứng.
File chính là Tool.xlsm sẽ truy xuất dữ liệu từ 2 file trên.

MÌnh đang gặp vấn đề là phải mở 2 file (Test-Jan, Test-Feb) thì mới truy xuất dữ liệu cho file Tool.xlsm được.
Nếu chỉ dùng hàm If và Vlookup thì ko cần mở file vẫn truy xuất dữ liệu dc.
Nhưng mình thực hiện tính toán thông qua Vba thì truy xuất được.

Thanks all!