Hello, I've been trying to make an InputBox work for about 2 days now, and finally wanted to ask on a forum.

This is my code:

Sub changeseatprice()
'
'changeseatprice Macro
'

'
    Sheets("Planes").Select
    B15 = InputBox("Price Change", "Change Price of Seat", B15)
End Sub
Can anyone put this right?