Tạo hàm con Goal Seek

[hdt4151]

Các bạn giúp mình tạo 1 hàm con để chạy Goal Seek tự động nhé. Công việc của mình đỏi hỏi phải làm nhiều lần lệnh Goal Seek, các ô Set cell, Value, Change lại nằm lung tung . hàm con có dạng như thế này (lưu lại dạng .xla, mỗi lần cần dùng chỉ việc add-in):

GoalSeek( x, y, z)

x: ứng với ô "Set cell"
y: ứng với ô "To Value"
y: ứng với ô "Changing Cell"


- Các giá trị x y z tương ứng với các ô tuỳ ý mình chọn. Ví dụ:

khi chạy chỉ cần gõ vào 1 ô bất kì : "=GoalSeek(A1,A2,A3)"
còn ô chứa hàm trên thì có thể trả về 1 giá trị bất kì nao cũng được 0,1 ...