number generator (Office 2003)

[RickN]

I have the numbers 1 through 6. I want a formula that generates all the 3-digit numbers that can be made using those 6 digits without repeating any digit within the 3-digit numbers, and without duplicating any 3-digit numbers. I don't even have a clue as to where to begin. Help, please...

[HansV]

You can use this macro:

Sub GenerateNumbers()
Const MaxNum = 6
Dim i As Integer, j As Integer, k As Integer
Dim r As Long
Range("A:A").ClearContents
For i = 1 To MaxNum
For j = 1 To MaxNum
If j <> i Then
For k = 1 To MaxNum
If k <> i And k <> j Then
r = r + 1
Cells(r, 1) = 100 * i + 10 * j + k
End If
Next k
End If
Next j
Next i
End Sub

Adapt as needed.

Warning: as is, the macro will clear column A in the active worksheet, then produce the list of numbers in this column.