Quote Originally Posted by xld
Try embedding

[vba]
Application.CalculateFull
[/vba]
before the For Each
no effect at all :-(