Sub 表格单元格替换文字() If MsgBox("确定要替换单元格的文字吗?", vbYesNo + vbQuestion) = vbYes Then To ActiveDocument.Tables.Count , Column:=).Range .Delete .InsertAfter Text:="XXX" End With , Column:=).Range .Delete .InsertAfter Text:="与预期结果一致" E
知乎大佬的代码: 作者:独夜行 链接:https://www.zhihu.com/question/40511430/answer/166467343 来源:知乎 著作权归作者所有.商业转载请联系作者获得授权,非商业转载请注明出处. (function() { if (!window.history.pushState || !document.dispatchEvent) return; var href = location.href; var flag = true; var voidFn