I need with Macro to Add two Numbers using Input forms

[kim15m]

I need help with a Macro to:
• Allows a user to enter 2 numbers using data input forms (the 2 values are save on the spreadsheet)
• Then adds the two numbers (answer is displayed on the spreadsheet)
• Then asks if the user would like to enter more numbers to be calculated
o If a user agree then allows the user to enter 2 more numbers for the calculation to take place
o Otherwise exit Macro.

Thank you

[davesexcel]

What part of this do you need help with?

[kim15m]

I have the code below which I want to add or use MsgBoxes instead of inputBoxes...
Sub kim15m()
Range("C1").Formula = "=A1+B1"
answer = "yes"
While answer = "yes"
Range("A1").Value = Application.InputBox(Prompt:="Enter first value ", Type:=1)
Range("B1").Value = Application.InputBox(Prompt:="Enter second value ", Type:=1)
answer = Application.InputBox(Prompt:="Do you want to do this again??", Type:=2)
Wend
End Sub

[kim15m]

What part of this do you need help with?

I have the code below which I want to add or use MsgBoxes instead of inputBoxes...
I NEED TO PUT MSGBOXES FIRST ASK USER TO ENTER FIRST NUMBER
THEN LATER ASKING USER IF HE WANT TO ADD TWO MORE NUMBERS, IF USER SAYS YES, Macro should Add the new numbers, answer saved in worksheet, say D1
I will appreciate any help...
Code is...
Sub kim15m()
Range("C1").Formula = "=A1+B1"
answer = "yes"
While answer = "yes"
Range("A1").Value = Application.InputBox(Prompt:="Enter first value ", Type:=1)
Range("B1").Value = Application.InputBox(Prompt:="Enter second value ", Type:=1)
answer = Application.InputBox(Prompt:="Do you want to do this again??", Type:=2)
Wend
End Sub

[davesexcel]

This is an edited code from the VBA help file.

Please Login or Register  to view this content.

[kim15m]

@davesexce
Thank you VB Help team this is exactly how I wanted it to work.
I really appreciate it
Thanks again