Hi,

Can anyone help me to simplify this code,

Dim j As Integer
j = Range("G9:G" & Rows.Count).End(xlDown).Row

                If Range("SE" & Rows.Count).End(xlUp).Row < j And _
                   Range("SG" & Rows.Count).End(xlUp).Row < j And _
                   Range("SI" & Rows.Count).End(xlUp).Row < j And _
                   Range("SK" & Rows.Count).End(xlUp).Row < j And _
                   Range("SM" & Rows.Count).End(xlUp).Row < j And _
                   Range("SO" & Rows.Count).End(xlUp).Row < j And _
                   Range("SQ" & Rows.Count).End(xlUp).Row < j And _
                   Range("SS" & Rows.Count).End(xlUp).Row < j And _
                   Range("SU" & Rows.Count).End(xlUp).Row < j And _
                   Range("SW" & Rows.Count).End(xlUp).Row < j And _
                   Range("SY" & Rows.Count).End(xlUp).Row < j Then
                End If