WorksheetFunction.Lcm (Excel)
Gibt das kleinste gemeinsame Vielfache der als Argumente angegebenen ganzen Zahlen zurück.
Wenn ein Argument nicht numerisch ist, gibt LCM den #Value! Wenn ein Argument kleiner als NULL ist, gibt LCM den #Num!
Lcm (Arg1, Arg2, ..., Arg30)
Dim dblLcm As Double
dblLcm = WorksheetFunction.Lcm(Arg1:=)
Arguments
Arg1, Arg2, ..., Arg30Arg1 - Number1, number2...-1 bis 29 Werte, für die Sie das kleinste gemeinsame Vielfache wünschen