- 帖子
- 549
- 主題
- 152
- 精華
- 0
- 積分
- 691
- 點名
- 0
- 作業系統
- WIN7
- 軟體版本
- OFFICE 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2013-8-10
- 最後登錄
- 2022-9-7
 
|
回復 3# msmplay - Sub Ex()
- Application.FindFormat.Font.colorIndex = 3
- Range("A20:K100").Replace What:="*", Replacement:="", LookAt:=xlPart, SearchOrder:= _
- xlByRows, MatchCase:=False, SearchFormat:=True, ReplaceFormat:=False
- End Sub
複製代碼 以後要更改範圍
就更改RANGE( ) 裡面的部分就可以了 |
|