★《Word非常接触》答疑解惑与讨论专贴★

守柔

QUOTE:

以下是引用零距离在2006-12-14 9:22:34的发言：

54页的编辑顶点步骤我做了有点不明白,是先画出三条交叉直线还是一要直线.

55页图片处理,倒数第三行第一个逗号前有一个小小的错误.

有一个小建议,设立一个抓虫区,专门挑出这本书印刷上的错误,版主在第二次印刷时就可以更改过来了,方便大家学习.

54页的例子，相当于为已知三条直线形成的交叉区域（三角形）设置填充色，所以，三条直线是已有的，对于交叉区域（三角形）的填充色，可以再划一条直线，然后使用顶点编辑功能，能这条直线折成与交叉区域相似（相同）的三角形覆盖原区域，然后设置此区域的填充色。

关于错误，已经进行了更正，待再版时修改，谢谢。

关于抓虫区，部分热心的网友提供了一些勘误，绝大部分内容我们在先前阅读时已发现，我们已把所有勘误通知了出版社，再版将时予以更正，谢谢。

零距离

谢谢,明白了!

蓝色精灵

我从当当网上订购了这本书，今天终于拿到书了，满怀欣喜的心情打开书，却发现该书所附的光盘没有，让我好生遗憾，立即投诉到当当服务热线，但愿他们能早日补寄一张。.

w415415

我昨天买了一本，感谢两位老师，让我们学到更多的知识。

w415415

老师

第2章的 2、3、4 中的图文场：Ctrl+F3：剪切至“图文场”

请问能不能： 复制至图文场。不需要剪切。

守柔

QUOTE:

以下是引用w415415在2007-1-30 11:53:33的发言：

老师

第2章的 2、3、4 中的图文场：Ctrl+F3：剪切至“图文场”

请问能不能： 复制至图文场。不需要剪切。

谢谢，记得先前有网友在OFFICEFANS中也有此问。是这样的：

Word中自带的CTRL+F3快捷键命令，是删除指定的区域并将该区域的内容添至图文场（一个内置的“自动图文集”词条），然后通过CTRL+SHIFT+F3将插入并清空该内置自动图文集。Word没有提供“复制”，而是“剪切”，如需达到您的要求，可以简单地使用一个修改WORD命令的宏过程即可。

请将以下宏代码复制于NORMAL.DOT(ALT+F11-VBA编辑器)的THISDOCUMENT代码窗口中,或者插入一个标准模块的代码窗口中即可.

Sub SPIKE()
    NormalTemplate.AutoTextEntries.AppendToSpike Range:=Selection.Range
    ActiveDocument.Undo 1
End Sub

然后回到文档中,每次按下CTRL+F3时,它将"复制"而非剪切了,很明显,代码中我加上了一个"撤消"上一次操作的命令了.

w415415

感谢老师！

明白了，祝你工作开心。

babyhen

春节前去合肥新华书店科教书店买 《excel公式与函数应用宝典》，在同柜上看到了守柔版主的《word非常接触》，最后一本被我买回来了，原本春节不回家好好拜读的，结果还是回家过年了，好累，现在还没时间看呢。

cxz008

QUOTE:

以下是引用守柔在2007-1-31 6:00:49的发言：

谢谢，记得先前有网友在OFFICEFANS中也有此问。是这样的：

Word中自带的CTRL+F3快捷键命令，是删除指定的区域并将该区域的内容添至图文场（一个内置的“自动图文集”词条），然后通过CTRL+SHIFT+F3将插入并清空该内置自动图文集。Word没有提供“复制”，而是“剪切”，如需达到您的要求，可以简单地使用一个修改WORD命令的宏过程即可。

请将以下宏代码复制于NORMAL.DOT(ALT+F11-VBA编辑器)的THISDOCUMENT代码窗口中,或者插入一个标准模块的代码窗口中即可.

Sub SPIKE()
    NormalTemplate.AutoTextEntries.AppendToSpike Range:=Selection.Range
    ActiveDocument.Undo 1
End Sub

然后回到文档中,每次按下CTRL+F3时,它将"复制"而非剪切了,很明显,代码中我加上了一个"撤消"上一次操作的命令了.

并非没有提供，在word97一个模板中带加强型的图文场工具栏。至是更高的版本不知为何微软给去掉了？！

cxz008

但手版的代码堪称奇妙！