is there a function to convert the contents of a cell from its formula to
the result of the formula


(similar to:)
Range("A9:F100").Select
Application.CutCopyMode = False
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False

only in a more direct manner?


thanks in advance,
-mark