ok ... i need a fellow quote monkey to assist ... i have been looking at this way to much to to see the problem.
Do While lc <= Range("A65536").End(xlUp).Row
If Range(1, lc) = "Buyer:" Then
Range("A" & lc).Select
Selection.EntireRow.Hidden = True
If Range(1, lc) = "PART NUMBER" Then
Range("A" & lc).Select
Selection.EntireRow.Hidden = True
If Range(1, lc) = "" Then
Range("A" & lc).Select
Selection.EntireRow.Hidden = True
lc = lc + 1
Loop
it is giving me an error that says "loop without do"
but there is a do ... grrrrr
Do While lc <= Range("A65536").End(xlUp).Row
If Range(1, lc) = "Buyer:" Then
Range("A" & lc).Select
Selection.EntireRow.Hidden = True
If Range(1, lc) = "PART NUMBER" Then
Range("A" & lc).Select
Selection.EntireRow.Hidden = True
If Range(1, lc) = "" Then
Range("A" & lc).Select
Selection.EntireRow.Hidden = True
lc = lc + 1
Loop
it is giving me an error that says "loop without do"
but there is a do ... grrrrr