㈠ word 的VBA在哪
按ALT+F11可以打开VBA编辑器!!!或者在"开发选项"中点击"查看代码"
㈡ 如何在Word中打开VBA编程窗口
一、编制程序
1．启动Word，连续点击“工具”，“宏”，“录制新宏…”，在弹出的对话框中填写宏名（此例为“作文稿纸”），选择宏要保存的位置（可以保存在模板中，也可以保存在当前文档中），如图1所示。
6．双击命令按钮CommandButton1，录入以下代码：
Private Sub CommandButton1_Click()Dim n As Integer '定义一个变量为整数型n = 1ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=Val(TextBox1.Text) * 2 + 1, NumColumns _:=Val(TextBox2.Text), DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:=wdAutoFitFixedSelection.EndKey Unit:=wdRow, Extend:=TrueSelection.Cells.Borders(wdBorderVertical).LineStyle = wdLineStyleNoneSelection.Tables(1).Rows.HeightRule = wdRowHeightExactly'设定表格行高为固定值Selection.Tables(1).Rows.Height = CentimetersToPoints(Val(TextBox3.Text))'设置表格行高为设置值，作为行间距Selection.Tables(1).Rows(1).Height = CentimetersToPoints(Val(TextBox4.Text))'设置第一行行高为设置值Do While n < Val(TextBox1.Text) + 1Selection.EndKey Unit:=wdLineSelection.MoveRight Unit:=wdCharacter, Count:=2'将插入点移至下一行Selection.Tables(1).Rows(2 * n).Height = Selection.Tables(1).Columns(1).PreferredWidth'设行高等于列宽Selection.EndKey Unit:=wdRow, Extend:=TrueSelection.EndKey Unit:=wdLineSelection.MoveRight Unit:=wdCharacter, Count:=2'将插入点移至下一行Selection.EndKey Unit:=wdRow, Extend:=TrueSelection.Cells.Borders(wdBorderVertical).LineStyle = wdLineStyleNone'去除此行的内部框线，只余边框n = n + 1LoopSelection.Tables(1).Rows(Val(TextBox1.Text) * 2 + 1).Height = CentimetersToPoints(Val(TextBox4.Text))'设置末行高为设置值Selection.EndKey Unit:=wdRow, Extend:=TrueSelection.Cells.Borders(wdBorderVertical).LineStyle = wdLineStyleNoneSelection.Tables(1).Rows.Alignment = wdAlignRowCenter'表格居中With Selection.Tables(1).Borders(wdBorderLeft).LineWidth = wdLineWidth150pt.Borders(wdBorderRight).LineWidth = wdLineWidth150pt.Borders(wdBorderTop).LineWidth = wdLineWidth150pt.Borders(wdBorderBottom).LineWidth = wdLineWidth150pt'设定表格边框为粗线End WithSelection.EndKey Unit:=wdLineUnload MeEnd Sub
㈢ word如何使用vba
1、在Word中打开你需要处理的doc文档；2、键入ALT+F11；3、在出现的VBA窗口中，粘贴你下载的代码；4、把键盘光标放到入口函数中任意一行代码上（如果你不知道是什么地方，可以把代码贴上来看看）；5、键入F5运行；6、切换回doc文档窗口看效果。 补充：哦，可能是因为你目前还没有任何宏所以才看到这样的灰色一片。那就这样，现在左边的工程里面有个“Normal”吧？展开它后有个“模块”节点吧？在这个“模块”节点上点鼠标右键，选择“插入-模块”。这样右边就会出现代码窗口了。然后再按照上面步骤3-6。如果还不清楚可以继续补充提问或发我信息。
㈣ 如何在EXECL中用VBa打开Word，并输出数据到WORD中，保存，关闭
1、首先打开EXECL表格，然后在工作表中，点击菜单栏【开发工具】。
㈤ 打开Word时总是出现 “Microsoft Office Word 需要 VBA 宏语言支持来完成此操作。”
宏安全性设置为:“非常高”。应用程序有签名的宏，但宏被自动禁用。使用以下步骤启用宏:选择“工具”菜单选项，然后选择“宏”“安全性”。在“安全性”对话框中单击“高”按钮将安全级别设为高。关闭该文件和计算机上当前运行的该应用程序的任何其他实例(关闭使用您当前正在运行的应用程序的任何应用程序)。再次打开该文件，然后检查可靠证书的详细信息，如果您信任由此发布者发布的证书，选中“总是相信来源于此发布者的宏”。单击“启用”按钮以允许宏运行。“高”。应用程序有签名的宏，但是在打开文件时出现的宏警告对框框中您选择了“禁用”。使用以下步骤启用宏:关闭该文件和计算机上当前运行的该应用程序的任何其他实例(关闭所有您当前正在运行的应用程序)。再次打开该文件，然后检查可靠证书的详细信息，如果您信任由此发布者发布的证书，选中“总是相信来源于此发布者的宏”。单击“启用”按钮以允许宏运行。“高”或“非常高”。宏未经签署，被应用程序自动禁用。如果您已验证可以信任未签署的宏的源，使用以下步骤启用宏:选择“工具”菜单，然后选择“宏”“安全性”。在“安全性”对话框中，单击选项按钮“中”将安全级设置为“中”。关闭该文件和计算机上当前运行的该应用程序的任何其他实例。再次打开该文件，当提示允许未签署的宏运行时单击“启用”。接受宏后，请将宏安全性级别重新设置为原来的设置。另一个应用程序实例已锁定安全设置，不允许对安全设置进行任何更改。在需要更改安全设置时，建议您关闭所有与Office相关的应用程序或该应用程序的其他实例。计算机上未安装VisualBasicforApplications(VBA)。如果未安装VBA，则不能接受附加到VBA宏的可靠证书。因此，任何试图运行的VBA宏(即使带有附加的可靠证书)都无法运行，因为系统中未安装必需的宏解释器。有两种情况可能导致此错误:管理员选择不安装VBA您运行的Office版本在默认情况下不安装VBA如果运行的Office不提供可安装VBA的功能，您将需要升级Office的版本以运行VBA宏。可靠证书无效-(在这种情况下，您不能选择“启用”按钮)该证书不再可信，已被颁发机构吊销或已损坏。可能需要采取几种其他方式来确定系统不再将该证书识别为有效的原因。建议您不要信任或运行具有无效证书的宏。
㈥ vba如何写word
在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!
㈦ 怎样在Word中用VBA操作表格
1.实例分析分析：的目的是将指定工作表找出来，并且将其激活为当前工作表，这里首先要找出工作表，这个操作我们可以直接通过sheets("工作表名称")来指定，这个工作表名称接收用户输入，这里用一个inputbox就可以；然后就是选中激活为当前工作表，这里有一个select关键字就可以。2.程序设计根据上面的实例分析，我们编写出下面这套程序：Sub SelSht() '工作表查找Dim Sht As StringDim str As StringOn Error Resume Next 【1】Sht = InputBox("请输入工作表名称：") 【2】Sheets(Sht).Select 【3】str = Err.Description 【4】If str <> "" Then 【5】MsgBox "不存在该工作表或名称输入有误！" 【6】End IfEnd Sub3.程序分析【1】这句代码的意思是如果下面程序有错误不报错，这样做的目的是为了防止，用户输入的工作表名称不存在而导致程序无法运行【2】接收用户输入工作表名称，并赋给Sht这个变量【3】如果工作表存在，那么这句代码就会选中工作表，并将其激活为当前工作表【4】如果前面代码出现错误，这个时候str就会被赋予一个变量，该变量值为所提示的错误字符串【5】对str进行判断，很明显如果str为空值说明前面的程序没有出错，也就是工作表找到了，但是如果不为空，说明出错了，工作表没有找到，进而进入if语句内执行【6】提示用户不存在该工作表或名称输入有误4.将程序制定到Excel界面按钮上在工具栏空白处，单击右键，选择窗体，弹出一个对象框，然后选择按钮，将指定的程序连接给该按钮。
㈧ 在excel里通过vba打开word文件并打印
在EXcel的VB编辑器中插入一个模块，输入如下代码试试看。Sub ExcelToWord()Dim WordObject As Object '声明一个对象变量，这里即将声明为Word对象On Error Resume NextSet WordObject = CreateObject("Word.Application") '用set来创建Word对象，这里是运行Word程序，但未新建文档WordObject.Visible = 0 '后台运行Word对象，只在任务管理器中存在WinWord.exe进程，但在任务栏上看不到word；如果为1或者True则可以看到word运行界面WordObject.Documents.Add DocumentType:=wdNewBlankDocument '新建一word文档'以下为获取Excel表格中的内容，准备把数据传送给Word,可以根据自己的实际需要定制代码，这里只是示例代码Excel.Application.Sheets(1).Activate '切换当前电子表格的表1为当前激活表Excel.Application.Sheets(1).UsedRange.Select '选中当前激活表的所有数据Selection.Copy '将选中的区域进行复制WordObject.Application.Activate '将后台运行的Word激活为当前窗口WordObject.ActiveWindow.Selection.Paste '将刚才从Excel中复制进剪贴板中的内容粘贴进word中来WordObject.Saved = True '将保存文档的Saved属性设置为True，这样后台运行的Word在保存文档时就不会弹出是否保存的对话框了，达到悄无声息的效果WordObject.ActiveDocument.SaveAs "D:\temp\导出数据.doc" '调用saveas命令保存文档，根据实际，指定文档的保存路径和名称WordObject.Application.Quit '退出并关闭程序文档Set WordObject = Nothing '释放对象End Sub
㈨ word怎么运行vba
Alt+F8就可以打开宏了，你编写的VBA代码的名称都会在这里，选中以后点击“运行”就可以了。
㈩ 怎样在word使用VBA编写的窗体
在Word2010文档窗口显示“开发工具”选项卡
“开发工具”功能区中包括VBA代码、宏回代码、模板和控件答等Word2010开发工具，默认情况下，“开发工具”选项卡并未显示在Word2010窗口中，用户需要手动设置使其显示，操作步骤如下所述：
第1步，打开Word2010文档窗口，依次单击“文件”→“选项”按钮，如图1所示。
图3“开发工具”选项卡
