I have this values in separate cells in sheet called "source"

04 2930 EA 3.00 3.00 1.00 1.00 0.00 16.75
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
04 2931 EA 3.00 3.00 1.00 1.00 0.00 16.75
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
04 2932 EA 3.00 3.00 1.00 1.00 0.00 16.75
Mar 13, 08 15:31 Page 2/11tfqr96yp
Printed by huuu
2333 04 2933 EA 3.00 3.00 1.00 1.00 0.00 16.75
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
Mar 13, 08 15:31 Page 3/11tfqr9h77p
Thursday March 13, 2008 3/11
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
04 2934 EA 3.00 3.00 1.00 1.00 0.00 16.75
Mar 13, 08 15:31 Page 4/11tfq77hhyp
Feb '08 0.0000 Nov '07 2.0000 Aug '07 6.0000
2334 04 2935 EA 3.00 3.00 1.00 1.00 0.00 16.75
Thursday March 13, 2008 4/11
-----------------------------------------------------------------------
--
Grand totals


I'd like to loop thru each cell
if "04" and "EA" is found anywhere in the cell then call sub getData()

then loop thru each following lines and call getDates()

if the next line was "Mar 13, 08 ?????????????????", "Printed
by ?????", "Thursday March 13, 2008 ???? " it would skip those lines.
You can see these lines can be different each time.

this loop would stop if the next line was "04" and "EA"



next it move down a cell and look for the next occurrence of "04" and
"EA"
repeating thee process until it reached "Grand totals"

getData() & getDate() format the output into cells on a separate
worksheet