VBA: extract systematiically 5 rows and save them in a new excell file as .txt

[selsha]

Hi All,

My excel file looks like this:


[TABLE="width: 290"]
<tbody>[TR]
[TD]chr
[/TD]
[TD]1
[/TD]
[TD]1
[/TD]
[TD]A
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]2
[/TD]
[TD]2
[/TD]
[TD]A
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]3
[/TD]
[TD]3
[/TD]
[TD]G
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]4
[/TD]
[TD]4
[/TD]
[TD]A
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]5
[/TD]
[TD]5
[/TD]
[TD]G
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]6
[/TD]
[TD]6
[/TD]
[TD]A
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]7
[/TD]
[TD]7
[/TD]
[TD]A
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]8
[/TD]
[TD]8
[/TD]
[TD]G
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]9
[/TD]
[TD]9
[/TD]
[TD]A
[/TD]
[/TR]
[TR]
[TD]chr
[/TD]
[TD]10
[/TD]
[TD]10
[/TD]
[TD]G
[/TD]
[/TR]
</tbody>[/TABLE]

I need to systematically extract 5 rows :

1- line 0->5
2-line 6-10
3-....
till the end of the file

and then save each 5 rows in a separate excel file in a .txt extension

May you help me solve this issue plz .

Tx in advance,

Best !