Smooth Line Scatter VBA

I've sort of stolen the following code:

Code:

Sub Button5_Click()NumberOfInputs = Range("B1")
MaxX = Cells(4 + NumberOfInputs, 1)
M = NumberOfInputs * 4 + 1
N = 8 + NumberOfInputs * 2 + 2 * MaxX
L = NumberOfInputs * 2 + 8
O = NumberOfInputs * 4 + 2
Charts.Add
With ActiveChart

[Code] .......

The problem is I cannot find a way to get the data source to work. Simply all I want it to do, is plot a curve from

Current Sheet.
Row L.
Column M.

To

Current Sheet.
Row N.
Column O.