Purpose: The Purpose of this Script is generate random name during run time.
Code:
Const Chars = "abcdefghijklmnopqrstuvwxyz"
strName = ""
Randomize()
For k = 1 To 5
intValue = Fix(26 * Rnd())
strChar = Mid(Chars, intValue + 1, 1)
strName = strName & strChar
Next
MsgBox strName