Find range of text, parse and copy (for..each?) rows until next range found

I've got an export from a program that will be pasted into an empty sheet. It'll look roughly like this:

L17
2-EW3A
EW2A
L18-37
EW2A
2-EW3A
1-BW1.1A
L38
BW5.4A
BW5.5A
BW7.1A 3-5/8"SS/100mm XPS
FW1A
FW2
L39
FW2A
PW4
PW5
2-PW5A
PW8
1-PW12.1A
PW13.5A / 13.4A
1-SW1
2-SW2
2-SW2 Elevator Front
TB
SH - PW2 2.5' ht
RC
VAN
CLNG WR
L40-43
VAN
RC
PD
HM
L44
RC

Looking to have VBA run through that column; search for cells starting with L, parse the number range (ie 40-43), copying all to a new sheet.
The new sheet will end up starting with L1, next row (then bunch of rows of copied text) then on another row L2 (bunch of rows), L3 (rows), L4 (rows), etc. etc.

So the rows L40-43 above will end up looking as:

L40
VAN
RC
PD
HM
L41
VAN
RC
PD
HM
L42
VAN
RC
PD
HM
L43
VAN
RC
PD
HM

Added an example .xls; sheet 1 shows what is imported, sheet 2 results needed.

Sorry for the excessive rows in this post to explain.