Question

VB批量替换EXCEL中关键字

运行环境为VS2012.
想要一个算法实现批量替换EXCEL（全部的Sheet）中所有的关键字。

PS：
之前问过一个批量实现修改word关键字的算法
在对word的批量替换中已经实现，代码测试可以运行，效果达到如下即可：
Dim wordObj
Set wordObj = CreateObject("Word.Application")
With wordObj.Documents.Open("c:\1.doc")
With .Content
.Find.Execute "#text1", , , , , , , , , Text1, 2
.Find.Execute "#text2", , , , , , , , , Text2, 2
.Find.Execute "#text3", , , , , , , , , Text3, 2
End With
.Save
End With
wordObj.quit
End Sub
以此类推。
求一个能批量替换EXCEL的关键字算法。VB新手，看了上面的都不能写出EXCEL的。求大神告知！

Answer 1

录制一段宏 试一下就知道了

追问

去VBA录制了全部替换的宏，但是粘贴到VB中很多标识符都未声明

怎么才能实现，，？