Nice one !

I had to change it a little bit so it saves every fifth , not deletes every fifth as it did in your script

One problem that I still have is that when it creates the list it processes , the list is not sorted correct.

Is there anyway to use the SORT command when using the FIND command in your script ?

\Mats