¶Ç¦^¼Æ­È¤£¹ï???

t8899

If Not IsError(Range("R13")) Then  
        If (Range("R13").Value > Range("S13").Value) And flag = True Then
            CreateObject("Wscript.shell").Popup "¨Cµ§¶R³æ¤j " & (Range("R13").Value)
            Cells(1, 13).Interior.ColorIndex = 2
            flag = False
        End If
    End If


R13=LOOKUP(9E+307,Sheet6!AA21:AA200)

AA21-:AA200ªº¤½¦¡
=IF(Y71="","",((Q71-Q70)/(S71-S70))-((R71-R70)/(T71-T70)))

R13 ¬°¦ó¶Ç¦^ ((R71-R70)/(T71-T70)  «D   ((Q71-Q70)/(S71-S70))-((R71-R70)/(T71-T70)) ???