Macro to insert copied cells
Hi Dave,
Testme leaves one salon left undone.
If....
For RowNdx = StartRow + 1 To (EndRow) * 16 Step 17
in Rich's last reply is changed to...
For RowNdx = StartRow + 1 To (EndRow) * 17 Step 17
then all 400 salons are done.
Ken Johnson
|