Hỏi Về Hàm Nội Suy | Giải Pháp Excel

Có thể bạn quan tâm

Trang chủ Có gì mới Hoạt động gần nhất Tác giả
Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
Video Video về Excel Video về tin học khác Tin tức về tin học chung
Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
Tài nguyên Đánh giá mới nhất Tìm tài nguyên
Facebook
Đóng góp

Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Bởi: Tìm kiếm Tìm nâng cao…

Tìm bài viết mới
Tìm theo chuyên mục

Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc

Trang chủ
Diễn đàn
Excel và Kỹ Thuật

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Hỏi về hàm nội suy (1 người xem)

Thread starter Thread starter nguyenthinu168
Ngày gửi Ngày gửi 22/6/06

Người dùng đang xem chủ đề này

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) N

nguyenthinu168

Thành viên chính thức

Tham gia 15/6/06 Bài viết 96 Được thích 9 tôi muốn hỏi cách nội suy hàng và cột, ví dụ 1 25 2 30 3 45 4 50 tôi muốn tìm giá trị của 2.5 của cột thứ nhất tìm giá trị tương ứng của cột thú hai. Lần chỉnh sửa cuối: 22/6/06 OverAC

OverAC

Đỗ Nguyên Bình

Thành viên BQT Administrator Tham gia 30/5/06 Bài viết 2,699 Được thích 15,155 Đọc bài của bác tôi thấy toát mồ hôi hột vì hai từ "căn bản" và "nội suy" :. Bác thử dùng hàm này nhé: giả sử 2 cột của bác là cột A và B =forecast(2.5, B1:B4, A1:A4) = 37.5 (em chuyển nó sang box Excel và các công thức nhé) N

nguyenthinu168

Thành viên chính thức

Tham gia 15/6/06 Bài viết 96 Được thích 9 excel căn bản Tôi đã thử dùng hàm forecast trong việc tìm giá trị cột A, nhưng nếu cột B có giá trị không tăng tuyến tính, hoặc cột A là giá trị bất kỳ thì không được? Vi dụ A B 2 9 4 5 1 4 5 7 8 8 Hãy tìm một giá trị bất kỳ trong cột A giúp với!

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

Thành viên danh dự Tham gia 13/6/06 Bài viết 7,240 Được thích 24,793 Bạn thử tải file này về nghiên cứu xem, có 3 cách đó. NGoài ra có thể dễ dàng lập khi dùng VB.

File đính kèm

Noi suy 1 chieu.zip Noi suy 1 chieu.zip 4.3 KB · Đọc: 4,140

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

Thành viên danh dự Tham gia 13/6/06 Bài viết 7,240 Được thích 24,793 Hàm Forecast như bạn OverAC đưa ra chỉ áp dụng khi dãy số tăng hoặc giảm dần theo quy luật tuyến tính, không thì sẽ cho kết quả sai đấy, cần hết sức lưu ý. :* Kết quả cho ra tương ứng với giá trị của phương trình tương quan. Các bạn có thể tham khảo ở phần Excel và kỹ thuật. Lần chỉnh sửa cuối: 12/7/06 PMXD

PMXD

Thành viên chính thức

Thành viên danh dự Tham gia 23/6/06 Bài viết 60 Được thích 150 Các bạn dùng thử hàm nội suy 2 chiều '====================================================== Function TraBang2Chieu(ByVal GiaTriCot, ByVal GiaTriHang, VungChon As Range) Dim i As Long, j As Long Dim TangAnPha Dim NoiSuy1 As Double, NoiSuy2 As Double For i = 1 To UBound(VungChon.Value, 2) ' Theo phuong ngang If GiaTriCot = VungChon(1, i) Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) <= 0 Then TangAnPha = (VungChon(j + 1, i) - VungChon(j, i)) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = VungChon(j, i) + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j ElseIf (GiaTriCot - VungChon(1, i)) * (GiaTriCot - VungChon(1, i + 1)) < 0 Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) < 0 Then TangAnPha = (VungChon(j, i + 1) - VungChon(j, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy1 = VungChon(j, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (VungChon(j + 1, i + 1) - VungChon(j + 1, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy2 = VungChon(j + 1, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (NoiSuy2 - NoiSuy1) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = NoiSuy1 + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j End If Next i Thoat: 'TraBang = UBound(VungChon.Value, 2) End Function P

plka

Thành viên mới

Tham gia 23/6/06 Bài viết 4 Được thích 0 Bác PMXD ở bên ketcau.com đã mò sang đây rùi! Em câu bài cái nha hi hi! H

HAiNV

Thành viên mới

Tham gia 25/6/06 Bài viết 13 Được thích 5 Trên ketcau.com, có nhiều người đã viết hàm nội suy này rồi. Rất tiện dụng! Tuy nhiên, hàm nội suy của bác PMXD là tuyệt vời nhất, nội suy 1 hay 2 chiều đều được, bất kể dãy số tăng hay giảm. Theo tôi, có thể viết lại code của bác PMXD một cách gọn hơn và nên đưa ra thông báo trong trường hợp mốc nội suy nằm ngoài hàng hay ngoài cột để người dùng tiện xử lý! Các bác có gì thắc mắc về món VBA, cứ liên hệ bác PMXD ấy. Cao thủ!

Nguyễn Duy Tuân

Nghị Hách

Thành viên danh dự Tham gia 13/6/06 Bài viết 4,864 Được thích 10,351 Giới tính Nam Nghề nghiệp Giáo viên, CEO tại Bluesofts Để viết hàm Nội suy đúng thì bạn cần quan tâm tới các vấn đề này: + Biến thiên của số liệu: Bạn hãy insert chart chọn kiểu "Line", xem hướng của đồ thị trên đồ thị. + Xác định kiểu hàm số, tìm tham số a,b,c - Phương pháp "Hồi quy - Tương quan" Nếu thấy nó có hướng một đường thẳng - Tuyến tính thì dùng ngay hàm Forecast. Bản chất của hàm Forecast là nội suy theo hàm số Y=aX+b (đường thẳng). Nếu hai mảng số liệu X,Y có phân bố "tương quan" chặt chẽ thì kết quả nội suy của bạn có có thể tin cậy. Vậy thế nào đển đánh giá mối quan hệ tương quan của X và Y là chặt chẽ? Bạn phải dùng thêm hàm CORREL. Hàm CORREL tính ra hệ số tương quan (r), -1<=r<=1, nếu r-trị tuyệt đối gần bằng 1 (0.9x) thì đáng tin cậy còn ngược lại. Dạng đồ thì thứ 2 có biểu hiện của hàm số Hypebol Y=a/X+b Khi đó cách dùng của cách trên (Y=aX+b) là không được vì mối quan hệ của X,Y không theo luật đường thẳng. Bạn phải dùng nội suy theo cách "Hồi quy phi tuyến tính" theo hàm số Hypebol. Dạng thứ 3 là biểu hiện của hình Parabol Y=aX^2+bX+c Đương nhiên cũng phải dùng phương pháp "Hồi quy phi tuyến tính" * Với phương pháp "Hồi quy phi tuyến tính", để đánh giá tính quan hệ chặt chẽ người ta dùng chỉ tiêu "Tỷ số tương quan" chứ không phải r-Hệ số tương quan. Khi nào có dịp I sẽ nói chi tiết thêm về phương pháp nội suy này nhưng ví dụ minh họa sẽ là kinh tế, trong kinh tế thì gọi đây là dự báo chỉ tiêu ngắn hạn. Lần chỉnh sửa cuối: 31/7/06

ptlong04x1

Thành viên tích cực

Tham gia 15/10/08 Bài viết 1,031 Được thích 1,531 Nghề nghiệp Kỹ sư xây dựng

PMXD đã viết: Các bạn dùng thử hàm nội suy 2 chiều '====================================================== Function TraBang2Chieu(ByVal GiaTriCot, ByVal GiaTriHang, VungChon As Range) Dim i As Long, j As Long Dim TangAnPha Dim NoiSuy1 As Double, NoiSuy2 As Double For i = 1 To UBound(VungChon.Value, 2) ' Theo phuong ngang If GiaTriCot = VungChon(1, i) Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) <= 0 Then TangAnPha = (VungChon(j + 1, i) - VungChon(j, i)) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = VungChon(j, i) + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j ElseIf (GiaTriCot - VungChon(1, i)) * (GiaTriCot - VungChon(1, i + 1)) < 0 Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) < 0 Then TangAnPha = (VungChon(j, i + 1) - VungChon(j, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy1 = VungChon(j, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (VungChon(j + 1, i + 1) - VungChon(j + 1, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy2 = VungChon(j + 1, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (NoiSuy2 - NoiSuy1) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = NoiSuy1 + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j End If Next i Thoat: 'TraBang = UBound(VungChon.Value, 2) End Function Nhấp chuột vào đây để mở rộng...

Không biết sao em không sử dụng được hàm này, các anh chỉ giúp em với. attachment.php

File đính kèm

NS2C.xls NS2C.xls 24 KB · Đọc: 469

Lần chỉnh sửa cuối: 24/3/09 T

tuan_tram77

Thành viên mới

Tham gia 30/5/08 Bài viết 2 Được thích 0 Noi suy 2 chieu

PMXD đã viết: Các bạn dùng thử hàm nội suy 2 chiều '====================================================== Function TraBang2Chieu(ByVal GiaTriCot, ByVal GiaTriHang, VungChon As Range) Dim i As Long, j As Long Dim TangAnPha Dim NoiSuy1 As Double, NoiSuy2 As Double For i = 1 To UBound(VungChon.Value, 2) ' Theo phuong ngang If GiaTriCot = VungChon(1, i) Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) <= 0 Then TangAnPha = (VungChon(j + 1, i) - VungChon(j, i)) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = VungChon(j, i) + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j ElseIf (GiaTriCot - VungChon(1, i)) * (GiaTriCot - VungChon(1, i + 1)) < 0 Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) < 0 Then TangAnPha = (VungChon(j, i + 1) - VungChon(j, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy1 = VungChon(j, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (VungChon(j + 1, i + 1) - VungChon(j + 1, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy2 = VungChon(j + 1, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (NoiSuy2 - NoiSuy1) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = NoiSuy1 + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j End If Next i Thoat: 'TraBang = UBound(VungChon.Value, 2) End Function Nhấp chuột vào đây để mở rộng...

Mình chép vào không chạy được? Có thể giúp mình không? giaptk3

giaptk3

Thành viên chính thức

Tham gia 2/1/07 Bài viết 77 Được thích 211 Nghề nghiệp Thiêt kế thủy lợi Public Function NOISUY(day1, day2, x, n) As Variant Dim i As Integer j = 0 For i = 1 To n - 1 If (day1(i) - x) * (day1(i + 1) - x) <= 0 Then j = i End If Next i If j <> 0 Then NOISUY = (x - day1(j)) * (day2(j + 1) - day2(j)) / (day1(j + 1) - day1(j)) + day2(j) Else: NOISUY = "FALSE" End If End Function T

tuanpmkn

Thành viên mới

Tham gia 9/5/08 Bài viết 1 Được thích 0 Nội suy Ko Bác nào có file tính nội suy Ko chỉ đơn giản bằng hàm Match và index kết hợp, cho em xin? Em dăng mắc, không làm được. Có thể gửi vào địa chỉ [email protected] Thank you Bác. B

bravery10

Thành viên mới

Tham gia 2/4/10 Bài viết 11 Được thích 2

HAiNV đã viết: Trên ketcau.com, có nhiều người đã viết hàm nội suy này rồi. Rất tiện dụng! Tuy nhiên, hàm nội suy của bác PMXD là tuyệt vời nhất, nội suy 1 hay 2 chiều đều được, bất kể dãy số tăng hay giảm. Theo tôi, có thể viết lại code của bác PMXD một cách gọn hơn và nên đưa ra thông báo trong trường hợp mốc nội suy nằm ngoài hàng hay ngoài cột để người dùng tiện xử lý! Các bác có gì thắc mắc về món VBA, cứ liên hệ bác PMXD ấy. Cao thủ! Nhấp chuột vào đây để mở rộng...

Về nội suy thì phải hỏi Anh Cao văn Dũng 52TL2 ĐHXD. Nội suy 1 biến, 2 biến, 3 biến, nội suy đường cong đều có hàm do anh viết. Mã: Sao chép. Function NSZ(Xo, Yo, Z) As Single 'Ham Noi suy 2 bien Dim i, j As Integer cao = Z.Rows.Count 'Xac dinh so hang Rong = Z.Columns.Count 'Xac dinh so cot Dim A1, A2, B1, B2, Y, X, Tim As Single 'Cac diem chan For i = 2 To cao If Z(i, 1) <= Xo And Xo <= Z(i + 1, 1) Then n = i For j = 2 To Rong If Z(1, j) <= Yo And Yo <= Z(1, j + 1) Then m = j Y = Z(1, m + 1) - Z(1, m) X = Z(n + 1, 1) - Z(n, 1) B1 = Z(n, m + 1) B2 = Z(n + 1, m + 1) A1 = Z(n, m) A2 = Z(n + 1, m) Tim = (A1 * (Z(1, m + 1) - Yo) * (Z(n + 1, 1) - Xo) + A2 * (Xo - Z(n, 1)) * (Z(1, m + 1) - Yo) + B1 * (Yo - Z(1, m)) * (Z(n + 1, 1) - Xo) + B2 * (Xo - Z(n, 1)) * (Yo - Z(1, m))) / (X * Y) End If Next j Exit For End If Next i NSZ = Tim End Function Function NS(SoX, X, Y) As Double Dim i As Integer Dim n, cao As Integer cao = X.Rows.Count For i = 1 To cao If X(i) <= SoX And SoX <= X(i + 1) Then n = i NS = Y(n) + (SoX - X(n)) * (Y(n + 1) - Y(n)) / (X(n + 1) - X(n)) Exit For End If Next i End Function Function NSP(SoX, X, Y) As Double 'Ham noi suy parabol Dim a, b, c, Ya, Yb, Yc, t As Double Dim i, n, cao As Integer cao = X.Rows.Count For i = 1 To cao - 2 a = X(i) b = X(i + 2) If a <= SoX And SoX <= b Then n = i c = X(i + 1) Ya = Y(n) Yb = Y(n + 2) Yc = Y(n + 1) t = 2 * (SoX - a) / (b - a) NSP = Ya + (Yc - Ya) * t + (Yb - 2 * Yc + Ya) * t * (t - 1) / 2 Exit For End If Next i End Function

File đính kèm

Bang tra ko 2.xls Bang tra ko 2.xls 77.5 KB · Đọc: 541

bravery10

Thành viên mới

Tham gia 2/4/10 Bài viết 11 Được thích 2 Các bạn phải có chút kiến thức về VBA để khi copy CODE về thì còn biết mà sử dụng. Ví dụ khi copy thường mắc lỗi cú pháp như 1 câu lệnh mà đặt trên 2 dòng. Khắc phục bằng cách nối 2 dòng bằng dấu '':'', hoặc để trên 1 dòng. SA_DQ

SA_DQ

/(hông là gì!

Thành viên danh dự Tham gia 8/6/06 Bài viết 14,797 Được thích 23,263 Nghề nghiệp U80 Tính nội suy 2 chiều không dùng vòng lặp đây, xin mời! PHP: Sao chép. Option Explicit Function NS_GPE(LookupRange As Range, X0 As Double, Y0 As Double) As Double Dim Rd As Range, Rc As Range, Rng As Range Dim Cot As Byte: Dim Yy As Double, Xx As Double Set Rng = LookupRange With Rng.Cells(1, 1) Set Rd = .Resize(Rng.Rows.Count) Set Rc = .Resize(, Rng.Columns.Count) End With With Application.WorksheetFunction Cot = Rc.Find(.Lookup(Y0, Rc), , xlFormulas, xlWhole).Column Set Rc = Rng.Cells(1, Cot) Yy = Rng.Cells(1, Cot + 1).Value - Rng.Cells(1, Cot).Value Set Rng = Rd.Find(.Lookup(X0, Rd)) Xx = Rng.Offset(1).Value - Rng.Value Set Rd = Rng: Set Rng = Rd.Offset(, Cot - 1) End With NS_GPE = (Rng * (Rc.Offset(, 1) - Y0) * (Rng.Offset(1, 1 - Cot) - X0) _ + Rng.Offset(1) * (X0 - Rd) * (Rc.Offset(, 1) - Y0) _ + Rng.Offset(, 1) * (Y0 - Rc) * (Rd.Offset(1) - X0) _ + Rng.Offset(1, 1) * (X0 - Rd) * (Y0 - Rc)) / (Xx * Yy) End Function Mời các bạn xem hình trong file Mô tả cú fáp dùng hàm tại [H3] ( =NS_GPe(BangTra,12,8))

File đính kèm

GPE00.rar GPE00.rar 10.6 KB · Đọc: 374

Lần chỉnh sửa cuối: 24/5/10

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

Thành viên danh dự Tham gia 13/6/06 Bài viết 7,240 Được thích 24,793 Hầuhư chủ yếu ở đây là nội suy tuyến tính, còn phi tuyến thì chưa có. Bác nào am hiểu cùng trao đổi nhé!!! D

dieplv

Thành viên mới

Tham gia 5/9/11 Bài viết 3 Được thích 1 Nội suy Giúp em tìm giá trị của thông số này với!

File đính kèm

Book.xlsx Book.xlsx 11.1 KB · Đọc: 44

dieplv

Thành viên mới

Tham gia 5/9/11 Bài viết 3 Được thích 1 Nội suy Bác nào giúp em nội suy giá trị của thông số này với

File đính kèm

Book.xlsx Book.xlsx 11.1 KB · Đọc: 37

bebo021999

Thành viên gạo cội

Tham gia 26/1/11 Bài viết 6,041 Được thích 8,810 Giới tính Nam Nghề nghiệp GPE

dieplv đã viết: Giúp em tìm giá trị của thông số này với! Nhấp chuột vào đây để mở rộng...

Giá trị 1.143 không có, nếu tìm gần đúng là 1.10, giá trị tương ứng cần tìm là 0.0194: dùng công thức Mã: Sao chép. =LOOKUP(1.143,E9:E29,F9:F29) ptm0412

ptm0412

Bad Excel Member

Thành viên BQT Administrator Tham gia 4/11/07 Bài viết 14,865 Được thích 37,604 Donate (Momo)

Giới tính Nam Nghề nghiệp Consultant Đây là topic nội suy mà bebo, đâu phải tìm số cận dưới, mà là tính giá trị trong khoảng giữa cận dưới và cận trên. Có 2 cách tính: 1. Tuyến tính: - Tìm cận trên và cận dưới của X - Tìm cận trên và cận dưới của Y - Tính bằng công thức nội suy tuyến tính. 2. Phi tuyến: - Vẽ đồ thị XY tương ứng - Vẽ trendline, thể hiện hàm hồi quy y = f(x) - Tính y0 theo x0: y0 = f(x0)

File đính kèm

Hoiquy.xlsx Hoiquy.xlsx 13.3 KB · Đọc: 208

nguyenmanhthinh

Thành viên mới

Tham gia 17/2/12 Bài viết 1 Được thích 1 gửi anh PMXD anh PMXD ơi cái code nội suy hai chiều của anh viết hay quá .. nhưng có chỗ khi giá trị nội suy của hàng được chia nhỏ hơn 1 ví dụ từ 0.7 đến 0.8, thì khi chọn nội suy ở giá trị 0.75 thì lại bị trả về không.. anh có thế khác phục được không ạ.. em cảm ơn anh nhiều!!! H

haiphanf

Thành viên mới

Tham gia 24/4/14 Bài viết 1 Được thích 1 Noi suy tuyen tinh 1 chieu va 2 chieu Bảng nội suy tuyến tính 1 chiều và 2 chiều hàng loạt bằng file excel, các bạn tham khảo nhen!

File đính kèm

nội suy tuyến tính.xlsx nội suy tuyến tính.xlsx 21.6 KB · Đọc: 301

12C7_CG

Thành viên mới

Tham gia 22/11/15 Bài viết 12 Được thích 0

PMXD đã viết: Các bạn dùng thử hàm nội suy 2 chiều '====================================================== Function TraBang2Chieu(ByVal GiaTriCot, ByVal GiaTriHang, VungChon As Range) Dim i As Long, j As Long Dim TangAnPha Dim NoiSuy1 As Double, NoiSuy2 As Double For i = 1 To UBound(VungChon.Value, 2) ' Theo phuong ngang If GiaTriCot = VungChon(1, i) Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) <= 0 Then TangAnPha = (VungChon(j + 1, i) - VungChon(j, i)) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = VungChon(j, i) + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j ElseIf (GiaTriCot - VungChon(1, i)) * (GiaTriCot - VungChon(1, i + 1)) < 0 Then For j = 1 To UBound(VungChon.Value, 1) - 1 If (GiaTriHang - VungChon(j, 1)) * (GiaTriHang - VungChon(j + 1, 1)) < 0 Then TangAnPha = (VungChon(j, i + 1) - VungChon(j, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy1 = VungChon(j, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (VungChon(j + 1, i + 1) - VungChon(j + 1, i)) / (VungChon(1, i + 1) - VungChon(1, i)) NoiSuy2 = VungChon(j + 1, i) + (GiaTriCot - VungChon(1, i)) * TangAnPha TangAnPha = (NoiSuy2 - NoiSuy1) / (VungChon(j + 1, 1) - VungChon(j, 1)) TraBang2Chieu = NoiSuy1 + (GiaTriHang - VungChon(j, 1)) * TangAnPha GoTo Thoat: End If Next j End If Next i Thoat: 'TraBang = UBound(VungChon.Value, 2) End Function Nhấp chuột vào đây để mở rộng...

Chào các bác.xin lỗi vì em đã đào mộ.trước tiên em cảm ơn bác PMXD đã viết code để em có thể copy sử dụng.nhưng trong quá trình làm việc em tiếp xúc nhiều với nội suy thì thấy hàm của bác trong trường hợp cột hoặc hàng trùng với giá trị nội suy thì hàm lại trả về giá trị "0" bác có thể fix dùm em không ạ.vì em khá là thích cái code này

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

Thành viên danh dự Tham gia 13/6/06 Bài viết 7,240 Được thích 24,793

12C7_CG đã viết: Chào các bác.xin lỗi vì em đã đào mộ.trước tiên em cảm ơn bác PMXD đã viết code để em có thể copy sử dụng.nhưng trong quá trình làm việc em tiếp xúc nhiều với nội suy thì thấy hàm của bác trong trường hợp cột hoặc hàng trùng với giá trị nội suy thì hàm lại trả về giá trị "0" bác có thể fix dùm em không ạ.vì em khá là thích cái code này Nhấp chuột vào đây để mở rộng...

Ngày xưa do việc tính toán thủ công là nhiều nên người ta tính sẵn từ công thức để lập bảng nội suy. Bây giờ công nghệ máy tính và tin học, dần bảng nội suy sẽ đi vào quá khứ. --=0

Ban cứ sử dụng công thức gốc mà tính, đỡ phải nhập bảng CSDL rồi nội suy lằng nhằng %#^#$

12C7_CG

Thành viên mới

Tham gia 22/11/15 Bài viết 12 Được thích 0

PhanTuHuong đã viết: Ngày xưa do việc tính toán thủ công là nhiều nên người ta tính sẵn từ công thức để lập bảng nội suy. Bây giờ công nghệ máy tính và tin học, dần bảng nội suy sẽ đi vào quá khứ. Ban cứ sử dụng công thức gốc mà tính, đỡ phải nhập bảng CSDL rồi nội suy lằng nhằng Nhấp chuột vào đây để mở rộng...

nhọ nỗi em làm việc với nhiều bảng số liệu cần "thử dần-nội suy-thử dần-........" bác ạ.chủ yếu trên nền excel R

rongcuoimay

Thành viên mới

Tham gia 20/6/09 Bài viết 13 Được thích 0

PhanTuHuong đã viết: Bạn thử tải file này về nghiên cứu xem, có 3 cách đó. NGoài ra có thể dễ dàng lập khi dùng VB. Nhấp chuột vào đây để mở rộng...

Cho mình hỏi trong công thức bác viết các giá trị "YVals,MatchIdx,targetVal" là như thế nào vậy? Cái này mình có thể học từ đâu? Thanks. Lần chỉnh sửa cuối: 4/3/17

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

Thành viên danh dự Tham gia 13/6/06 Bài viết 7,240 Được thích 24,793

rongcuoimay đã viết: Cho mình hỏi trong công thức bác viết các giá trị "YVals,MatchIdx,targetVal" là như thế nào vậy? Cái này mình có thể học từ đâu? Thanks. Nhấp chuột vào đây để mở rộng...

Chủ yếu là tôi tổng hợp lại từ nhiều người viết. Họ không có comment thì tự luận để hiểu thôi. Hiểu thuật toán là làm ngon. Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

Bài viết mới nhất

Có thể tô màu tiêu đề bài viết để làm nổi bật giữa những tiêu đề các bài đăng khác được chăng?

SA_DQ
Hôm nay lúc 04:27
Những góp ý với diễn đàn

Trả lời 1 Đọc 61 Hôm nay lúc 08:02 Hai Lúa Miền Tây

Copilot bình luận các ván cờ vua từng ngày.

SA_DQ
3/11/25
Chia sẻ

Trả lời 67 Đọc 2K Hôm nay lúc 05:34 SA_DQ

H Lọc giá trị duy nhất theo cụm

hoaiantrinh
Thứ ba lúc 14:58
Hàm và công thức Excel

Trả lời 7 Đọc 181 Hôm qua, lúc 22:43 87kilua

Question Question

Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba (4 người xem)

ongke0711
6/10/24
Lập Trình với Excel

5 6 7 Trả lời 624 Đọc 92K Hôm qua, lúc 18:19 tombongtep T N Tạo COM Add-In bằng Visual C++

nguyendang95
6/7/25
Excel và các ngôn ngữ lập trình khác

Trả lời 18 Đọc 2K Thứ ba lúc 21:07 nguyendang95 N M Bảo mật code VBA autocad!

Michael Bit
Thứ hai lúc 08:44
Hỏi đáp những vấn đề khác

Trả lời 12 Đọc 300 Thứ ba lúc 19:17 Michael Bit M

Dán lên cao
Suggestion Suggestion

CHÚC MỪNG NĂM MỚI BÍNH NGỌ 2026

GPE-Trợ Lý
Thứ ba lúc 10:45
Bài viết nổi bật và thông báo

Trả lời 0 Đọc 124 Thứ ba lúc 10:45 GPE-Trợ Lý

L Thu Chi Gia Đình

lehang0812
5/2/26
TPHCM

Trả lời 5 Đọc 253 Thứ ba lúc 10:19 nguoiconxunui N

Đã giải quyết

FitRowXL v1.3 - Giãn dòng tự động và bổ trợ in ấn Excel (*01/2026 mới)

HeSanbi
18/4/21
Lập Trình với Excel

Trả lời 77 Đọc 30K Thứ hai lúc 19:00 chothadiem

Đã giải quyết

LocalizeXL v1.73 - Làm nổi bật ô đang chọn và cuộn trang tự động (phiên bản 2026)

HeSanbi
5/3/21
Lập Trình với Excel

Trả lời 85 Đọc 18K Chủ nhật lúc 21:43 chothadiem

Dán lên cao

Phiên bản mới Add-in A-Tools AI v10 (2024)

Nguyễn Duy Tuân
13/9/24
BLUESOFTS: A-Excel, A-Tools

Trả lời 62 Đọc 13K Thứ bảy lúc 18:10 Nguyễn Duy Tuân

E Giúp Đặt tên lại (Rename) cho hàng loạt các file PDF theo cùng 1 quy tắc

Excel my love_1
15/4/23
Tin học mở rộng

Trả lời 4 Đọc 4K Thứ sáu lúc 15:20 luongha.ktqd L

Question Question

Chia sẻ một thuật toán đơn giản để trộn cells

Quang_Hải
4/2/26
Lập Trình với Excel

Trả lời 12 Đọc 406 5/2/26 Quang_Hải

TaxCode v4.33 - Tra cứu mã số thuế từ tổng cục thuế, masothue và thuvienphapluat

HeSanbi
27/11/25
Các Add-ins cho excel

Trả lời 19 Đọc 3K 5/2/26 HeSanbi

Question Question

Tạo Add-in, tệp Excel, Word, Access tự động cập nhật phiên bản mới từ Cloud cho chính nó

HeSanbi
2/2/26
Lập Trình với Excel

Trả lời 1 Đọc 267 4/2/26 HeSanbi

Hàm EXACT

TranThanhPhong
30/4/14
Dự án: Công thức & Hàm 97-2019

Trả lời 3 Đọc 9K 3/2/26 ptm0412

Add-Ins cho Excel 2007 -2016 32bit và 64bit (1 người xem)

giaiphap
8/8/15
Các Add-ins cho excel

4 5 6 Trả lời 518 Đọc 226K 3/2/26 Gà Công Nghệ

V Một Excel add-in vibe coding

vietdang170
28/1/26
Các Add-ins cho excel

Trả lời 18 Đọc 775 3/2/26 vietdang170 V H Xin giúp đặt điều kiện trong Conditional Formating

hoanglocphat
2/2/26
Hỏi đáp những vấn đề khác

Trả lời 6 Đọc 231 3/2/26 Gà Con yêu VBA

Xin giúp hàm excel để tìm 1 số trong số có 2 chữ số

mrjun80
31/1/26
Hàm và công thức Excel

Trả lời 4 Đọc 228 1/2/26 Gà Con yêu VBA

Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

Thành viên có số lượng bài viết cao nhất tháng

HeSanbi 14
chothadiem 11
Michael Bit 6
HieuCD 5
Gà Công Nghệ 5
YêuCN 4
Officexinh 4
vietdang170 4
pycckuu410 3
chiendich 3
DeTong 3
hoanglocphat 3
LOGANWover 2
VietHoangPhan 2
Gà Con yêu VBA 2
Quang_Hải 2
hoaiantrinh 2
vuvannguyen1972 1
Hai Lúa Miền Tây 1
ptm0412 1

Thành viên có điểm tương tác cao nhất tháng

HeSanbi 19
GPE-Trợ Lý 9
Quang_Hải 7
HieuCD 6
vietdang170 5
Gà Con yêu VBA 4
LOGANWover 3
pycckuu410 3
chiendich 3
DeTong 3
Phuocam 3
hungvinh1402 2
HUONGHCKT 2
YêuCN 2
Officexinh 2
87kilua 2
Hai Lúa Miền Tây 2
SA_DQ 2
Michael Bit 1
nguyendang95 1

Thời gian đếm ngược.

000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025

Trang chủ
Diễn đàn
Excel và Kỹ Thuật

Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…

Back Top Bottom

Từ khóa » Nội Suy Giá Trị Trong Excel

Tìm kiếm

Người dùng đang xem chủ đề này

nguyenthinu168

Thành viên chính thức

OverAC

Đỗ Nguyên Bình

nguyenthinu168

Thành viên chính thức

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

File đính kèm

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

PMXD

Thành viên chính thức

plka

Thành viên mới

HAiNV

Thành viên mới

Nguyễn Duy Tuân

Nghị Hách

ptlong04x1

Thành viên tích cực

File đính kèm

tuan_tram77

Thành viên mới

giaptk3

Thành viên chính thức

tuanpmkn

Thành viên mới

bravery10

Thành viên mới

File đính kèm

bravery10

Thành viên mới

SA_DQ

/(hông là gì!

File đính kèm

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

dieplv

Thành viên mới

File đính kèm

dieplv

Thành viên mới

File đính kèm

bebo021999

Thành viên gạo cội

ptm0412

Bad Excel Member

File đính kèm

nguyenmanhthinh

Thành viên mới

haiphanf

Thành viên mới

File đính kèm

12C7_CG

Thành viên mới

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

12C7_CG

Thành viên mới

rongcuoimay

Thành viên mới

PhanTuHuong

VBA & VB.NET for Excel & AutoCad

Bài viết mới nhất

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Thời gian đếm ngược.

Liên Hệ