在用户点击Word文档

时间：2018-04-03 13:31:06

标签： vba ms-word word-vba

短版

在MS Word中，有没有办法插入一些文本并在闪烁光标点或用户反复点击的任何地方删除一些（同时）。 这（插入/删除）可以通过以下方式实现：

  1. 鼠标单击
  2. （ Ctrl ， Alt 或 Shift ）+鼠标单击
  3. Ctrl / Alt / Shift +鼠标点击+（任意键）

    4. 长版

    我在不同的word文件中从各种来源复制了文本，我希望以特定的样式进行格式化以匹配给定的布局。基本上，文本需要在指令中给出的特定位置分解为新的行/段落。而不必按'输入'＃39;然后删除/删除每一行的空格，我希望只使用宏一行每次点击一次。

    这些文件的数量可能超过500个，因此首选使用宏修改所有文件是首选方法。（虽然我认为只有手动完成输入的输入点才能实现。在每个文件上。）我已经使用宏来实现90％，但需要最后一步，宏可以执行以下操作：

    1. 用户点击页面时，所有空格（常规，不间断空格，空格）直到下一个打印字符被删除。
    2. 一个＆＃39;输入＆＃39;或插入回车符，以便文本移动到下一行。 用户对文本进行的每次点击都会重复步骤1和2。

      3. 示例文字

        

      这是我的文本的一个例子，我需要将其分成不同的行。

      预期文字

        

      这是我的文字的一个例子   我需要拆分，
        分成不同的行。

      请注意，＆＃39;输入＆＃39;虽然它们在下一行中出现但在这些行的末尾被按下但通常在这些行的前面有空格字符。另一种方法是单击，删除所需的空格，直到下一个字符，然后按Enter键。我希望只需点击鼠标或最小键+鼠标组合即可自动完成其中任何一项。 像用户点击的每个地方一样运行Find ^ w和Replace with ^ p，但是使用宏 任何帮助表示赞赏。

2 个答案:

答案 0 :(得分：0)

通过定义宏的快捷方式，可以实现这一点。因此，您需要单击某个位置并使用快捷方式运行宏。

EG。将其添加到文档中的模块

False

和assign a shortcut。

删除所有空格＆amp;从当前光标位置开始不间断的空格，然后插入一个输入。

答案 1 :(得分：0)

早些时候，我想过在光标处找到查找和替换，查找^ w并用^ p替换但这需要我不断提升我用宏指定的快捷键，否则它只会破坏完整的文本在每个单词成段落。只需按 Ctrl 并单击将突出显示光标和鼠标单击之间的文本。总而言之，我必须按（ Ctrl + D ），使用Click，AGAIN按 Ctrl + <将光标移动到新点。 KBD> d 。因此，每次改变都会抬起3根手指，这使得它变得不切实际。

P p Macro帮助了 Ctrl + D +单击仍然无法正常工作。按3个步骤重复工作。 Alt + D +点击工作几乎完美无缺，只需重复一步。

应用这个宏，即使我一直按下 Alt + D （我的快捷方式），只需点击所需的位置即可完成我的工作。虽然 Alt +单击Word 2007中的任何位置，但会显示一个研究窗口，该窗口会在单击文本时更新，但不会干扰正在完成的作业。

非常感谢大家，尤其是P，感谢您的帮助，非常感谢。 干杯

相关问题
最新问题