[求助]如何在WORD里实现文字收缩展开的功能？

hyhtzj

如何在WORD里实现文字收缩展开的功能？

打开VBA的帮助，经常看到这样的功能，点击某处象链接的地方，下方或右方会出现解释文字（如附件所示），请问这种功能可不可以在WORD中实现？

c81

可以变通一下

将说明文字设置成隐藏文字，要的时候，点上面工具栏上的“显示或隐藏标记”（工具选项视图　隐藏文字前不钩选）。

做成宏按钮也可以。

[此贴子已经被作者于2006-12-29 22:51:41编辑过]

hyhtzj

QUOTE:

以下是引用c81在2006-12-29 22:51:02的发言：

可以变通一下

将说明文字设置成隐藏文字，要的时候，点上面工具栏上的“显示或隐藏标记”（工具选项视图　隐藏文字前不钩选）。

做成宏按钮也可以。

不够完美啊

konggs

在大纲视图中，大纲级别就是这种效果。

hyhtzj

QUOTE:

以下是引用konggs在2006-12-30 8:28:37的发言：

在大纲视图中，大纲级别就是这种效果。

konggs版主，我试过了，用大纲视图的效果看上去差不多，但回到普通视图就恢复原样了。

我的意思是就在普通视图中做出这种效果来。

另，请问帮助文件中是怎么实现这功能的？？谢谢！！

c81

帮助文件如果是html做成的，那可可能是用一个VBscript或javascript脚本实现的。

hyhtzj

QUOTE:

以下是引用c81在2006-12-30 23:09:32的发言：
帮助文件如果是html做成的，那可可能是用一个VBscript或javascript脚本实现的。

哦，那就是在WORD中实现不了了，很遗憾！不过谢谢两位的解答！

hyhtzj

QUOTE:

以下是引用c81在2006-12-30 23:09:32的发言：
帮助文件如果是html做成的，那可可能是用一个VBscript或javascript脚本实现的。

在网上找到这样一个东西，是不是你所说的脚本代码啊？

点击展开再点收缩文本的效果

<label onClick="javascript:if(jueban.style.display=='none'){jueban.style.display='block';this.innerHTML='标题:点击关闭'}else{jueban.style.display='none';this.innerHTML='标题:点击这里'};">标题:点击这里</label>
<br>
<table width="100%"  border="0" cellspacing="0" cellpadding="0"  id="jueban" style="display:none ">
  <tr>
    <td height="62">多个栏目竖排，开始只显示标题，点击显示内容，再点击关闭。</td>
  </tr>
</table>

守柔

QUOTE:

以下是引用hyhtzj在2006-12-30 23:28:53的发言：

哦，那就是在WORD中实现不了了，很遗憾！不过谢谢两位的解答！

请参考：

http://club.excelhome.net/dispbbs.asp?boardid=23&replyid=435293&id=84210&page=1&skin=0&Star=2

第十六楼。

sylun

原来老大的代码是通过对隐藏文字显示与隐藏切换来实现收缩展开效果，真是又开了眼界。

现在想来，是否可以通过对特定内容书签的字符设置隐藏属性来实现，这样便可以单独对特定段落进行展开或收缩，其余书签不会同时相应展开或收缩，而不需改变视图设置（或只在开始时设定为不显示隐藏文字和不显示域代码）。

[此贴子已经被作者于2006-12-31 9:54:53编辑过]