Tính lặp như thế nào?

[hoan_xay]

Chào các bác!
Em có một bài toán như sau:
Cho quan hệ: f = f(a,b,x,f) (*)
Trong đó:
x phụ thuộc vào f theo quan hệ bảng 1:

Bảng 1:

http://static.flickr.com/109/293699882_c1f7bea666.jpg?v=0

a, b phụ thuộc vào x và cho bởi bảng 2 như sau:

Bảng 2:

Vấn đề đặt ra là: hãy lặp để tính giá trị gần đúng của f với sai số là delta cho trước.

Thuật toán của em như sau:

Cho f=f0;
Bước i:

• Cho f = f(i-1)
• Tra x(i -1) theo bảng 1
• Tra a(i-1), b(i-1) theo bảng 2
• Tính fi theo (*): fi = f(a(i-1),b(i-1),x(i-1),f(i-1))
• Kiểm tra :|fi-f(i-1)| < delta (i)
• Nếu (i) đúng thì kết thúc vòng lặp
• Nếu (i) sai thì sang bước tiếp theo

Em đã tính đã lập bảng tính trên exel, lặp theo hàng. Tuy nhiên mỗi lần tính toán với số liệu đầu vào thay đổi thì lại phải kéo để copy, rất bất tiện vì số hàng lặp thay đổi.
Xin các bác chỉ giúp cho em cách giải bài toán bằng VBA.

Em xin chân thành cảm ơn các bác!

Giúp em càng sớm càng tốt nhé!

Dười đây là file đính kèm bài toán thực tế của em! Có rắc rối hơn bài toán trên chút ít.

 

[nvson]

Bạn thử dùng file sau xem sao.

 

[hoan_xay]

Cảm ơn bác nvSon rất nhiều!
Em hầu như chưa biết gì về VBA nên có gì mong mọi người chỉ giúp thêm!
Cảm ơn cả nhà rất nhiều!