返回列表 上一主題 發帖

清除指定範圍紅色數字問題

回復 3# msmplay
  1. Sub Ex()
  2.     Application.FindFormat.Font.colorIndex = 3
  3.     Range("A20:K100").Replace What:="*", Replacement:="", LookAt:=xlPart, SearchOrder:= _
  4.         xlByRows, MatchCase:=False, SearchFormat:=True, ReplaceFormat:=False
  5. End Sub
複製代碼
以後要更改範圍
就更改RANGE( ) 裡面的部分就可以了
PKKO

TOP

        靜思自在 : 君子立恆志,小人恆立志。
返回列表 上一主題