[RESOLVED] Generate

How can i generate numbers and words.
like if i want to generate a001 to a999 on pressing command button.
"a" should be taken from text box and rest of the work will be done by pressing command button.

Any one :bigyello::D

Quote:

---

Originally Posted by koolsid

Code:

---

Sub Sample()
    Dim i As Long
   
    For i = 1 To 999
        '~~> Outputting it to Listbox for example
        List1.AddItem Text1.Text & Format(i, "000")
    Next i
End Sub

---

---

:thumb: thank you buddy :D