If/then with case statement

Attached Excel Sheet.


If record 2 (B Column minus header) contains zero, put the value "ZZ"; however if the value is greather than zero go to Record 1 (Column A) to determine the value in the case statment and populate the value in Record 3 (Column C)


Highlighted in yellow are the correct answers.

Thank you.

formula for C2:

=IF(B2=0,"ZZ",IF(A2="A","XX",IF(A2="B","UA",IF(A2="C","XX",IF(A2="D","UA","")))))

As a loop for the data in the sample:

Sub Test()
    Dim i As Long
    With ActiveSheet
        For i = 2 To 5
            If .Cells(i, 2).Value = 0 Then
                .Cells(i, 3).Value = "ZZ"
            Else
                Select Case .Cells(i, 1).Value
                    Case "A", "C"
                        .Cells(i, 3).Value = "XX"
                    Case "B", "D"
                        .Cells(i, 3).Value = "UA"
                    Case Else
                        .Cells(i, 3).Value = "--"
                End Select
            End If
        Next i
    End With
End Sub

For i = 2 To .Cells(.Rows.Count, 1).End(xlUp).Row

till last row of data in column A