首页 相关文章 VB查找并替换WORD文档中的字符串

VB查找并替换WORD文档中的字符串

基本要求:需安装WORD
  
  FunctionWordReplace(FileNameAsString,SearchStringAsString,ReplaceStringAsString,OptionalSaveFileAsString="",OptionalMatchCaseAsBoolean=False)AsInteger
  OnErrorGoToErrorMsg'函数运行时发生遇外或错误,转向错误提示信息
  
  DimwordAppAsNewWord.Application
  DimwordDocAsNewWord.Document
  DimwordArangeAsWord.Range
  DimwordSelectionAsWord.Selection
  DimReplaceSignAsBoolean
  DimIAsInteger
  
  
  '判断将要替换的文件是否存在
  IfDir(FileName)=""Then
  '替换文件不存在
  MsgBox"未找到"&FileName&"文件"'提示替换文件不存在信息[ 查看全文 ]

2016-02-19 标签:

VB查找并替换WORD文档中的字符串的相关文章

手机页面
收藏网站 回到头部