typo

> Debug.Print ActiveCell.Formula ' 706


Debug.Print Len(ActiveCell.Formula) ' 706

can it be reduced ?

Regards,
Peter T