Excel Linear interpolation function within 1‑dimensional table

Linear interpolation within a 1-dimensional table can be done with regular MS Excel functions. But it will become a pretty long formula, that is hard to read and/or copy across. You can also implement a user defined function (VBA) interpolateX. The VBA code of this function is found at the end of this page. This function works both for ascending and descending header data, and both for horizontally or vertically organized data. The LAMBDA equivalent L_InterpolateX is found below as well. LAMBDA functionality exists since Office365/Excel 2021. LAMBDA functions are user defined functions created directly within Excel's Name Manager. They execute faster than VBA.

Download demo file (35kB - downloaded 1442 times).

If you want to create a curve that goes through all your data points in order to interpolate, see Splines interpolation.
If you want to interpolate both X and Y values within a 2-dimensional table, see Bilinear interpolation (linear/spline based).

Excel linear interpolation

Calculation explanation of above example

Visualisation of data table
linear interpolation chart

linear interpolation chart

Calculation

X = 470 lies between X = 400 and X = 500. X-fraction = (470 - 400)/(500 - 400) = 0.70

The 2 data point values to interpolate between are:
     1. (400) = 100
     2. (500) = 150

Interpolation:
     100 + 0.70 × (150 - 100) = 135.00 which is the final result.

VBA code to be put in a module

In MS Excel, press Alt+F11 to open the Visual Basic Editor (Windows). Via top menu: Insert → Module. Copy the code below into the module.

User Defined Function (VBA)

Public Function InterpolateX(ByRef SearchValue As Range, ByRef SearchRange As Range, ByRef ValueRange As Range) As Double
    
    Dim V1 As Double, V2 As Double, S1 As Double, S2 As Double, FR As Double
    
    'if SearchValue falls outside the table, the function result is an error value
    If (SearchValue < WorksheetFunction.Min(SearchRange)) Or (SearchValue > WorksheetFunction.Max(SearchRange)) Then
        InterpolateX = (1 / 0)
        Exit Function
    End If
    
    'Determine data table points around searchvalue
    S1 = WorksheetFunction.XLookup(SearchValue, SearchRange, SearchRange, , -1)
    S2 = WorksheetFunction.XLookup(SearchValue, SearchRange, SearchRange, , 1)
    V1 = WorksheetFunction.XLookup(SearchValue, SearchRange, ValueRange, , -1)
    If S1 = S2 Then
        InterpolateX = V1
        Exit Function
    End If
    V2 = WorksheetFunction.XLookup(SearchValue, SearchRange, ValueRange, , 1)
    
    'calculate fraction
    FR = (SearchValue - S1) / (S2 - S1)
    
    'final result after interpolation
    InterpolateX = V1 + FR * (V2 - V1)
    
End Function

LAMBDA function L_InterpolateX to be put in Name Manager

Dependent on your Excel setting, copy in semicolon or comma version.

Comma version
Semicolon version