Dear Group,

I´v got a little Problem:
In my Worksheet, there are one ore more Rows combined with a frame

| A | B | C | D
1 +----------+-------+------+-------+
2 |Monday |Over |19:00 |Start |
3 | |Time +------+-------+
4 | | |20:00 |Break |
5 | | +------+-------+
6 | | |21:00 |End |
7 +----------+-------+------+-------+
8 |Tuesday |OFF | | |
9 +----------+-------+------+-------+
...
...
I need a possibility to extract the Information into the following
Shape:

Monday | Over Time | 19:00 | Start
Monday | Over Time | 20:00 | Break
Monday | Over Time | 21:00 | End
Tuesday | Off | |

My Idea : Find the upper Border LineStyle.. search the lower
LineStyle, and Combine each Row to a Value. Paste Value in Each Row in
this Range.
My knwoledge of VB is not so good, and I need this solution only to
extract a large Sheet automaticly.

Any Ideas ?
Thanks,
Oliver