Excel already has the function GCD(num1, num2, num3, ...) which finds
the greatest common divisor of multiple numbers.

That should serve your purpose.

Cheers,
Jason Lepack

Garry,

Try the code below.

HTH,
Bernie
MS Excel MVP

Sub test()
Dim myFactors As Variant
Dim myNum As Long
Dim i As Integer

myNum = InputBox("What Number?")

myFactors = FactorFunction(myNum)

For i = LBound(myFactors) To UBound(myFactors)
MsgBox myFactors(i)
Next i

End Sub
Function FactorFunction(inVal As Long) As Variant
Dim myValue As Long
Dim myFA() As Long
Dim myCount As Integer
Dim i As Long

myCount = 1

ReDim Preserve myFA(1 To myCount)

For i = 2 To inVal / 2
If inVal Mod i = 0 Then
   ReDim Preserve myFA(1 To myCount)
   myFA(myCount) = i
   myCount = myCount + 1
End If
Next i

FactorFunction = myFA
End Function

Lowest common denominator is usually 1 for any factors...  Use Greatest
Common Divisor:
=GCD(1,2,3,4,8,6,12) etc...

Rob