有没有办法将选定的文本块保存到 RTF 文档中,而无需打开新文档、将内容粘贴到新文档中、保存新文档,然后返回到原始文档?我只想突出显示一个文本块,右键单击,然后选择“另存为”,但这需要经过很多步骤。
我尝试创建一个宏来执行相同操作,但是有很多屏幕切换正在进行,我找不到可靠地返回到原始文档的方法,例如。 如果我打开了多个文档,我经常会返回到一个随机文档,而不是我开始使用的文档。
答案1
您是否使用windows(FILENAME).Activate
函数在窗口之间弹出?这是一种有效的方法。这是一个例子,但我假设这可能不是你想要的:
Windows(FileName).Activate
Selection.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
With Selection.Find
.Text = "Paste2_LE_SUMHere"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindAsk
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
Selection.PasteAndFormat (wdPasteDefault)
我也遇到了 RTF 问题。我有一个宏,要求我打开 RTF,选择文档的所有内容并将其粘贴到 .docx 文件中。我可以毫无困难地访问 .docx 文件,但是始终无法切换到 RTF 文件。我始终收到错误:运行时错误 5491 - 请求的集合成员不存在。无论我使用的是相对路径还是绝对路径,或者只是尝试直接访问文件名,我都会收到此错误。有什么想法吗?