cần giúp đỡ dò tìm kết hợp nội suy 2 chiều

[vovannam2009]

mình gửi bảng excel kèm theo nói rõ vấn đề mình cần giúp đỡ. mình cần nội suy 1 giá trị "hệ số nuy" phụ thuộc vào chiều cao "H" và dạng công trình "a" hay "b" hay "c" bất kỳ. mình muốn mọi người giúp code xác định "hệ số nuy" tại "H" bất kỳ (H=15) và dạng địa hinh "b chẳng hạn". cảm ơn mọi người trước nghe !

 

[SA_DQ]

Bạn tính & đưa ra kết quả nội suy của bạn tại 15a xem sao?

Mình có cảm giác đây chưa fải là nội suy 2 chiều, mà là 1 hay 1.5 chiều thôi!

 

[nguyentinhhn]

Bạn có thể viết hàm như sau:

Public Function NS(cao As Double, cot1 As String, Bang As Range) As Double
Dim i As Integer, y As Double
Dim cot As Integer
Select Case cot1
Case "a"
cot = 2
Case "b"
cot = 3
Case "c"
cot = 4
End Select
i = 1
Do While cao > Bang(i, 1).Value
i = i + 1
Loop
If i = 1 Then
cs1 = 1
cs2 = 1
Else
cs1 = i - 1
cs2 = i
End If
NS = Bang(cs1, cot).Value + (Bang(cs2, cot).Value - Bang(cs1, cot).Value) * (cao - Bang(cs1, 1).Value) / (Bang(cs2, 1).Value - Bang(cs1, 1).Value)
End Function

Trong đó: - cao: là chiều cao nhập vào; - cot1: là dạng công trình (nhận 1 trong các giá trị "a', "b", "c"); - bang: là toàn bộ bảng sổ liệu dùng để nội suy