返回列表 上一主題 發帖

[發問] 條件式刪除cell內容,再麻煩大家多指教

回復 4# HCG10G8bear

如果格是黃色,格的數值是1
  1. Sub Macro1()
  2. With ActiveSheet
  3. If Selection.Interior.ColorIndex = 6 Then
  4. Selection.Value = 1
  5. End If
  6. End With
  7. End Sub
複製代碼

TOP

        靜思自在 : 吃苦了苦、苦盡廿來,享福了福、福盡悲來。
返回列表 上一主題