在For Each循环中复制PasteSpecial不规则地退出

I have a routine to copy hidden backup formulas for a selection that has worked fine in Excel 2003/2007/2010. When I run it in 2013, it starts to work through the selection and then just quits, no error message is given. When testing just this loop, it might run for 2 cells, it might run for 5 cells, but never more than 6. Because the selections are mostly groups of non-contiguous cells, I can't easily copy the entire range at one time without major surgery to rename all the ranges.I have a routine to copy hidden backup formulas