Create Multiple Inputbox With Excel VBA
The sequence numbers can be added into the wished column with macro. When the button on the page is clicked, our macro starts running .Input boxes are opened in sequence.
The sequence numbers are added to the selected column according to the answers given by the user.
VBA Codes of input boxes :
cevap1 = InputBox("Please ,Select The Column You Want To Enter The Sequence Numbers." & vbNewLine & vbNewLine & _
"Column Numbers and Their's Letters" & vbNewLine _
& vbNewLine & "1 -> A 10 -> J 19 -> S" _
& vbNewLine & "2 -> B 11 -> K 20 -> T" _
& vbNewLine & "3 -> C 12 -> L 21 -> U" _
& vbNewLine & "4 -> D 13 -> M 22 -> V" _
& vbNewLine & "5 -> E 14 -> N 23 -> W" _
& vbNewLine & "6 -> F 15 -> O 24 -> X" _
& vbNewLine & "7 -> G 16 -> P 25 -> Y" _
& vbNewLine & "8 -> H 17 -> Q 26 -> Z" _
& vbNewLine & "9 -> I 18 -> R ........" _
& vbNewLine & vbNewLine & "Press OK Button After Writing Your Answer .", "COLUMN", "1")
cevap2 = InputBox("Which Rows to Begin?" & vbNewLine & vbNewLine & _
"Press OK Button After Writing Your Answer .", "Row", "2")
cevap3 = InputBox("Enter The Sequence Number to Begin From Which Number." & vbNewLine & vbNewLine & _
"Press OK Button After Writing Your Answer .", "The Number Of Start", 1)
"Column Numbers and Their's Letters" & vbNewLine _
& vbNewLine & "1 -> A 10 -> J 19 -> S" _
& vbNewLine & "2 -> B 11 -> K 20 -> T" _
& vbNewLine & "3 -> C 12 -> L 21 -> U" _
& vbNewLine & "4 -> D 13 -> M 22 -> V" _
& vbNewLine & "5 -> E 14 -> N 23 -> W" _
& vbNewLine & "6 -> F 15 -> O 24 -> X" _
& vbNewLine & "7 -> G 16 -> P 25 -> Y" _
& vbNewLine & "8 -> H 17 -> Q 26 -> Z" _
& vbNewLine & "9 -> I 18 -> R ........" _
& vbNewLine & vbNewLine & "Press OK Button After Writing Your Answer .", "COLUMN", "1")
cevap2 = InputBox("Which Rows to Begin?" & vbNewLine & vbNewLine & _
"Press OK Button After Writing Your Answer .", "Row", "2")
cevap3 = InputBox("Enter The Sequence Number to Begin From Which Number." & vbNewLine & vbNewLine & _
"Press OK Button After Writing Your Answer .", "The Number Of Start", 1)
No comments:
Post a Comment