The code below works fine as far as putting the right things in each cell. However the code just continues to loop and never exits. Is the first line in my code correct?
Code:
Do While Cells(i, 1).value = "Chicago"
Cells(i, 4).Select
Selection.Copy
Sheets("Chicago").Select
Cells(a, g).Select
ActiveSheet.Paste
i = i + 1
g = g + 1
Sheets("Status_Report_SUM").Select
Loop