help me please
hi, i want to write a code, that is searching for blank cell in column I, then the cursor will go to the cell that is blank. there are alot of worksheets to go through and the user may not input into the blank cell, so they will run the macro agian to search for another blank cell, my problem is, i duno how to loop to another worksheet since that 1 is still blank.
thanks
here is my code.
Dim wb As Workbook
Dim ws As Worksheet
Set wb = ActiveWorkbook
For Each ws In wb.Worksheets
LastRow = [A65536].End(xlUp).Row
ws.Activate
For intK = 6 To LastRow
If (ws.Cells(intK, "G").Value = "") Then
Exit For
End If
If (ws.Cells(intK, "I").Value = "") Then
ws.Cells(intK, "I").Activate
Exit Sub
End If
Next
Next
|