I guess I typed that too fast... thanks. Although, based on his last
posting, the OP appears to not want a VB solution (even though he posted to
a programming newsgroup), here is the corrected formula for the archives...

PW = Left(Range("B1"), 1) & Left(Range("A1"), 3) & (Int(9 * Rnd()) + 1)

Rick


"Tom Ogilvy" wrote in message
...
Just a heads up,

Int(10 * Rnd()) + 1

generates random numbers between 1 and 10 inclusive vice the 1-9 asked
for.

--
Regards,
Tom Ogilvy


"Rick Rothstein (MVP - VB)" wrote:

Since you posted this in a programming newsgroup, I'm assuming you want
VB
code...

PW = Left(Range("B1"), 1) & Left(Range("A1"), 3) & (Int(10 * Rnd()) + 1)

Rick


"Juan" wrote in message
...
I need to create a password based on the first letter of the first name
and
the first 3 letters of the last name along with a random number 1-9 at
the
end. How can i do this? C1 below is where i want to enter the formula
to
create the password.
thanks.

Example:
A1 B1 C1
LN FN New Password
Smith John Jsmi3