能够把当前工作簿（包括各sheet）里各单元格如果有字节为“@”的，就替换为“=”。我自己用宏录制功能录制如下VBA
Sub 宏2()
'
' 宏2 宏
'
'
Cells.Replace What:="@", Replacement:="=", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False _
, FormulaVersion:=xlReplaceFormula2
End Sub
总是无法替换全，有些奇怪
