Hi,

Am Tue, 13 Jan 2015 10:56:58 -0800 (PST) schrieb :

If Education = False Then
Class = Range("H" & LastRow).Value
Do While Cells(LastRow, 8).Value = Class And LastRow < 1
Else
Do While LastRow < 1
Class = Range("H" & LastRow).Value
End If

what do you want to do into this loop? I cannot see a order to do
anything.


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional