Paul,

Use:

DestRange.Offset(((Counter1 - 1) Mod myWrap), Int((Counter1 - 1) / myWrap))
=

HTH,
Bernie
MS Excel MVP

wrote in message
oups.com...
Thanks Bernie,

It Works Except for One Thing, the Combinations Start in Cell "A2" in
the First Column, But in Subsequent Columns they Start in the First Row
which is OK.

Thanks Again.
All the Best
Paul