[excel] Multiple input box excel VBA

Right now I've been using multiple Input boxes to get user input for a couple of strings i need:

 Dim U As String
 Dim P As String

U = Application.InputBox("Enter Username", "Username", Type:=1))
P = Application.InputBox("Enter Pwd", "pwd", Type:=1))

etc ..

Is there any way I can make an input box with multiple inputs or some sort of multiple input into an Excel worksheet using VBA?