Need to Select a Cell if its Adjacent Cell is Equal to 0

[Modify_inc]

How can I tell Excel to select the A4 cell if its adjacent cell B4 is equal to 0, but only if the A4 cell is NOT empty? If A4 is empty, then disregard and check the next cells, A5 and its adjacent cell B5, and check for the same conditions, doing this all the way down to A50.

 

[Modify_inc]

I was able to get this far using vba, but I obviously need to make it into a for loop or something to have it check the complete A4:A50 range.

If Range("A4") <> "" And Range("B4") = 0 Then
   Range("A4").Select
   
End If

Any suggestions how to get it to check A4:A50?

 

[Zot]

Formula in C4 would be

=IF(ISBLANK(B4),IF(ISBLANK(A4),"",A4),B4)

Is this what you want?

 

[Modify_inc]

Formula in C4 would be

=IF(ISBLANK(B4),IF(ISBLANK(A4),"",A4),B4)

Is this what you want?

Thanks for the suggestion, but no that is not what I was going for. I apologize if my post wasn't clear. Fortunately I was able to get it to work in VBA, which really surprised me since I've never done a for loop in vba.

This is the code. If you have any suggestions to improve it or a better alternative, as I'm still very much learning:

Dim i As Integer

For i = 4 To 50

If Cells(i, "A").Value <> "" And Cells(i, "B").Value = 0 Then
    Cells(i, "A").Select
End If

Next i

 

[Zot]

I presumed you want to write result in column C

Dim i As Integer

For i = 4 To 50
    If Cells(i, "B") = 0 Then
        If Cells(i, "A") = "" Then
            ' Do nothing
        Else
            Cells(i, "C") = Cells(i, "A")
        End If
    Else
        Cells(i, "C") = Cells(i, "B")
    End If
Next i

 

[Fluff]

If you want the 1st occurrence of A being not blank & B being 0, try

Dim i As Integer

For i = 4 To 50

If Cells(i, "A").Value <> "" And Cells(i, "B").Value = 0 Then
    Cells(i, "A").Select
    Exit Sub
End If

Next i