本示例将每个“SIN”三角函数都替换为“COS”函数。替换所进行的区域为工作表 Sheet1 中的 A 列。
ThisWorkbook.Worksheets("Sheet1").Range("A:A").Replace _
What:="SIN", Replacement:="COS", _
SearchOrder:=etByColumns, MatchCase:=True