ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

½Ð°Ý¥H¤U»yªk¡A2003 m3

½Ð°Ý¥H¤U»yªk¡A2003 m3

Sheets("result").Select
   Range("Q2:s11").Select
   Selection.FormatConditions.Delete
   For DQ = 2 To 11
    'Range("S2").Select
    Range("r" & DQ).Select
    'Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreaterEqual _
        , Formula1:="=$R$2"
        
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreaterEqual _
        , Formula1:="=result!R[]C[-1]"
   
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent6
        .TintAndShade = -0.249946592608417
    End With
    Selection.FormatConditions(1).StopIfTrue = False
    Next

Sorry «ö¿ù«öÁä¤F¡A
·Q½Ð°Ýªº¬O2003 »P 2007 ªº»yªk®t²§
¸Ì­±ªº Formula1:="=result!R[]C[-1]"¥i¥H¦b2003¨Ï¥Î¡A¦ý¨ì¤F2007«h·|¥X²{¿ù»~¡A
­ì¥»2003ªº»yªkFormula1:="=$Q$2"­n¦p¦ó­×§ï¨ì2007¸Ì­±¨Ï¥Î°Ñ¼Æ¡A
ÁÂÁÂ

TOP

§ä¨ì¤èªk¤F¡A¶·±N
Formula1:="=result!R[]C[-1]"
§ï¬°
Formula1:="=R[]C[-1]"
§Y¥i

TOP

        ÀR«ä¦Û¦b : ¡i¬°µ½Ävª§¡j¤H¥Í­n¬°µ½Ävª§¡A¤À¬í¥²ª§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD