Good morning -

This forum seemed like it provided the best answers to people. I am COMPLETELY new to VBA, and am hoping it can do some pretty complicated things for me. (Complicated to me, anyway.)

Here's the beginning of the situation. In column A, I have a list of dates. Column C contains a share price of a stock, while column D is a calculated percentage. Column F is another share price, while column G is another calculated percentage. This goes on for about ten different funds.

What I'd like to do is set up an input box to ask what date I'd like to input share prices for. Once that is input, I'd like Excel to prompt me for each of the ten fund's share prices, then display each fund's price in the row associated with the date entered in the first input box. Then it would start the process over, to add fund prices for additional dates.

The only thing I've figured out how to do so far is prompt myself for a share price, and then display it. The code I used for that is below.

Sub InputBoxTest()
Dim Response As Single

' Run the Input Box
Response = Application.InputBox("Enter date.", "Date Entry", , 250, 75, "", , 1)

' Check to see if Cancel was pressed
If Response <> False Then

' If not, write the number to the first cell in C2253.
Worksheets(1).Range("C2253").Value = Response

End If

End Sub



Thank you for any help anyone can provide on this complicated issue. (There's an additional part of the equation, but that will most likely be an additional thread.)