返回列表 上一主題 發帖

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

回復 6# genes
  1. Sub Ex()
  2.     With ActiveSheet
  3.         Application.FindFormat.Interior.ColorIndex = 6
  4.       '  Application.ReplaceFormat.Interior.ColorIndex = 3
  5.         .Cells.Replace What:="*", Replacement:="1", LookAt:=xlWhole, SearchFormat:=True', ReplaceFormat:=True
  6.     End With
  7. End Sub
複製代碼
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

        靜思自在 : 我們要做好社會的環保,也要做好內心的環保。
返回列表 上一主題