将选定的文本保存到 RTF 文档,无需打开新文档并切换窗口

将选定的文本保存到 RTF 文档,无需打开新文档并切换窗口

有没有办法将选定的文本块保存到 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 - 请求的集合成员不存在。无论我使用的是相对路径还是绝对路径,或者只是尝试直接访问文件名,我都会收到此错误。有什么想法吗?

相关内容