返回列表 上一主題 發帖

請問如何一次變更多個儲存格的條件格式

簡單來說 ..
IF  A(成交價)>B(昨收價) then
   range("xx").select '(儲存格選取)
      With Selection.Interior
          .Pattern = xlSolid
          .PatternColorIndex = xlAutomatic
          .Color = 255
          .TintAndShade = 0
          .PatternTintAndShade = 0
      End With
  endif
    IF  A(成交價)>B(昨收價) then
   range("xx").select '(儲存格選取)
     
         With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 5287936
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With

TOP

        靜思自在 : 人生不一定球球是好球,但是有歷練的強打者,隨時都可以揮棒。
返回列表 上一主題