Word2007中如何插入文字型窗体域

如果你处在兼容模式下(.doc模式):
点击【开发工具】选项卡下面的 【控件】-【旧式工具】-【文本域(窗体控件)】

 

注意如果添加后,没有底纹,请 点击【控件】-【旧式工具】-【显示域底纹】即可

如果你是处在非兼容模式下(.docx模式):
可以依旧像上面一样操作,也可以如下操作:
开发工具】-【控件】-【组合内容控件】或者【下拉列表内容控件】
后续其他的设置,此处不再赘述。

另外:如果你的【开发工具】选项卡没有显示,可以如下操作:
点击office选项(最左上角的office图标)-word的选项-常规-“显示开发工具选项卡”前面打上勾即可。

在使用Access通过窗体Word插入书签并写入内容时,我们需要首先确保Access和Word之间的引用已经建立。可以在VBA编辑器的引用勾选“Microsoft Word x.x Object Library”来实现这一点。 接下来,我们可以在Access窗体创建一个Command按钮,然后在其Click事件过程编写VBA代码来完成插入书签并写入内容的操作。下面是一个简单的示例: Private Sub cmdInsertBookmark_Click() Dim objWord As Word.Application Dim objDoc As Word.Document Dim objRange As Word.Range '创建一个Word对象并打开一个新文档 Set objWord = CreateObject("Word.Application") objWord.Visible = True Set objDoc = objWord.Documents.Add '在文档插入一个书签 Set objRange = objDoc.Content objRange.Collapse Direction:=wdCollapseStart objRange.InsertBefore "这是书签内容。" objRange.Select objDoc.Bookmarks.Add "MyBookmark", Selection.Range '保存并关闭Word文档 objDoc.SaveAs "C:\Path\To\Your\Document.docx" objDoc.Close '释放Word对象 objWord.Quit Set objRange = Nothing Set objDoc = Nothing Set objWord = Nothing End Sub 上述代码,我们首先创建了一个Word对象,并打开了一个新的文档。接着,我们使用InsertBefore方法在文档的开头插入了一段文本,并通过Select方法选了该文本。然后,我们使用Bookmarks对象的Add方法来添加了一个名为“MyBookmark”的书签,并将其范围设定为选内容的范围。 最后,我们保存并关闭了Word文档,并释放了创建的Word对象。 通过这段代码,我们可以实现在Access窗体通过VBA代码向Word插入书签并写入内容的功能。
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值