作者：乔山办公网日期：
返回目录：word文档
Dim recWord As Object
Dim recDocument As Word.Document
Dim mMenuBar As CommandBar
Set recWord = Nothing
If (recWord Is Nothing) Then
Set recWord = CreateObject("word.application")
End If
Set mMenuBar = recWord.Application.CommandBars("Menu Bar")
mMenuBar.Controls(1).CommandBar.visible=false'
屏蔽掉第一项菜zd单，以后回的菜单同答理即可
教你插入CAD文件
CAD软件在word文档是绘制各种绘画大师，其出色的图形处理能力，使其在工厂，百施工单位等场所得到了广泛的使用，它不能只绘制二维平面图，度可以绘制非常好味的三维效果图和款式，现在卖地产，写字楼，酒店效果图几乎全部采用CAD软件。所以可以结合绘制成Word文档，以及在CAD图形文件的优势是什么？答案是肯定的，这里有两个简单的方法，以供参考。
一个屏幕拷贝和粘问贴的方法在AutoCAD良好的第一绘制到图形插入Word，然后把图中的AutoCAD复制到剪贴板，然后将其粘贴到Word文档。应该指出的是，由于AutoCAD的默认背景颜色为黑色，而Word中的背景颜色为白色，首先应的AutoCAD图形背景颜色为白色，具体步骤如下（答以AutoCADR14为例）：首先运行AutoCAD，显示为图1显示界面显示;依次点击“工具/首选项”，然后单击“显示”选内项卡，如图2所示的窗口出现时，单击“颜色”按钮，然后就可以选择背景容颜色为白色。然而，AutoCAD图形插入Word文档后，往往空边过大，布局的影响。使用Word的图片裁剪功能修整工具栏上，要解决空方太大的问题。
单击开始----查找按钮(或按Ctrl + F组合键)； 2、弹出查找对话框，在查找内容处输入需要查找的数字，在以下项中查找处选择主文档，单击关闭按钮； 3、此时文档中所的查找的数字都被选中。
方法/步骤
打开word软件，如图所示
输入
=rand()
随机产生一些文字来做示范
接着，我们设置文档超链接。选择某部分文字后，单击自菜单栏插百入——书签
单击书签后，便会弹出如图所示对话框，输入书签名，单击添度加，便可以添加书签
把文档翻页至第二页，接着选择菜单栏中的插入——超链接
单击超链接后，先选择本文知档中的位置，选择刚才添加的书签，选择后，单击确定
单击确定后，便会在文字下方显示横道线，说明超链接已经添加完成，当单击时，便会自动跳转到书签1的位置。