I have data on one wokr sheet that is in 4 columns, Item, qty, and 2 date columns. The code I have written loops through this data, ( about 70K rows), combines items and dates that are similar. This is moved to a different sheet that is set up with items in column 1 starting at row 20 ( over 9,000) and dates starting from cells e20 through e76. My code finds the correct date then looks in column 1 for the correct item and once found enters the value stored form the previous sheet. As I said the code works fine but by using the "do until loops" the code takes several hours to run. I know there is a faster way to do it but I have not been able to find one that will work. Any suggestions would be appreciated.

this is an example of the spread sheet I am moving data to

Item Desc WC Type Type 9/1/2013 9/8/2013 9/15/2013
12345 xxxxx bbbbb cas
12346 xxxxx bbbbb cas
12347 xxxxx bbbbb cas
12348 xxxxx bbbbb cas
12349 xxxxx bbbbb cas
12350 xxxxx bbbbb cas
12351 xxxxx bbbbb cas
12352 xxxxx bbbbb cas


This is the code that takes hours to run

        Do Until Cells(Application.ActiveCell.Row, 1).Value = a Or Cells(Application.ActiveCell.Row, 1).Value = ""
                    If Cells(Application.ActiveCell.Row, 1).Value <> a Then
                               ActiveCell.Offset(1, 0).Select
                    End If
        Loop

        ActiveCell.Value = b
       Sheets("BPCS Forecast File").Select
Loop