I have created as user forms, When user enter a text in user forms, that
should appear in Excel work sheet say for Eg: Cell A1
Can you please add codes to this:

Sub GetDataFromUser()
Dim strUserInput As String
strUserInput = InputBox("Please enter your name.", "Name")
MsgBox "Your name is " & strUserInput
Call GetAddress(strUserInput)
End Sub
Sub GetAddress(ByVal UserName As String)
Dim strAddress As String
strAddress = InputBox("Hi, " & UserName & ". What is your address",
"Address")
MsgBox UserName & " lives at " & strAddress
End Sub



Regards,
Vishu