在工作過(guò)程中，很對(duì)會(huì)涉及到替換，由一種內(nèi)容替換為另一種內(nèi)容，由一種內(nèi)容有條件的替換為另一種內(nèi)容。
①常規(guī)替換
基本上對(duì)表格有所了解的都知道，CTRL+F，查找和替換，可以批量替換內(nèi)容，包括公式等等，這個(gè)有機(jī)會(huì)自己嘗試，并不是很難。
另外一種就是加輔助列，利用IF函數(shù)進(jìn)行替換。
②非常規(guī)替換
這里需要介紹的是ctrl+F不能滿(mǎn)足的替換情況，通常也就是有條件，有限制的替換，這種情況一般來(lái)說(shuō)，CTRL+F做不到或者費(fèi)時(shí)費(fèi)力等等。
需要注意的是必須選擇目標(biāo)區(qū)域、VBA代碼執(zhí)行完畢是無(wú)法做撤銷(xiāo)的，所以需要做好備份。
上面執(zhí)行代碼為：
Sub 有條件替換()
For Each r In Selection
If r.Value < 20 Then r.Value = "不及格"
Next
End Sub
2.區(qū)間執(zhí)行替換
執(zhí)行代碼為:
Sub 有條件替換()
For Each r In Selection
? ? If r.Value > 20 And r.Value < 100 Then r.Value = "不及格"
Next
End Sub
如果有需要的時(shí)候，還可以把執(zhí)行代碼更改后，多次執(zhí)行，曲線達(dá)到目標(biāo)。?
?
