VBA Excel 2007

I need to be able to split one worksheet into multiple worksheets with a maxiimum of 400 lines.

Help
Cindy