VBA Compare Values of 2 Columns and Populate Larger Value

[rsmeyerson]

Code shown below updates column "U" but it is not ignoring empty cells in column "V" (a formula always exists in "V", but sometimes no value exists). I would like "do nothing" if value in column "V" is empty. Thank you.

Dim Wt As Object     
Application.ScreenUpdating = False
Application.ErrorCheckingOptions.OmittedCells = False
For Each Wt In ActiveWorkbook.Worksheets
    If Wt.Name = "IProg" Then
        With Wt
            .Range("L:W").NumberFormat = "#,##0.00_);[Red](#,##0.00)"
            For iii = 2 To .Cells(Rows.Count, "A").End(xlUp).Row     
                If .Cells(iii, "U").Value < .Cells(iii, "V").Value Then
                    .Cells(iii, "U").Value = .Cells(iii, "V").Value
                End If
            Next iii
        End With
    End If
Next

 

[JoeMo]

For iii = 2 To .Cells(Rows.Count, "A").End(xlUp).Row
    If .Cells(iii, "V").Value <> "" Then
        If .Cells(iii, "U").Value < .Cells(iii, "V").Value Then
            .Cells(iii, "U").Value = .Cells(iii, "V").Value
        End If
    End If
Next iii

 

[rsmeyerson]

This works. Thank you for your help.

 

[JoeMo]

This works. Thank you for your help.

You are welcome - thanks for the reply.