word-vba - IT屋-程序员软件开发技术分享社区

如何从Excel检索数据并将其添加到Word

我有一个Word模板文件，该文件从Excel文件中检索数据以填充表单. 代码看起来像这样: Dim myXL As Object Set myXL = Getobject("myfile.xls") myXL.Application.Visible = True myXL.Parent.Windows(1).Visible = True 此代码在Office 2010和2007中工 ..

发布时间：2020-07-02 00:52:21 excel vba ms-word word-vba office-2013 其他开发

我正在尝试利用在 THIS中找到的信息POST . 我有2个问题: 下面的行不确定地挂起.固定---它只是隐藏的，没有任务栏项目，简单的搜索告诉我如何将其显示在最前面 strAddress = objWordApp.GetAddress(，strCode，False，1，，，True，True).GetProperty(" http://schemas.microsoft.com/mapi/ ..

发布时间：2020-07-02 00:50:59 vba excel-vba word-vba office-2010 excel 其他开发

VBA MS-Word是否可以使用多个不连续选择?

我正在尝试做多项选择.我想在每个选定的段落之前添加一些文本，但是当我选择多个不连续的段落时，如果执行Selection.Paragraphs.Count，我总是得到"1". 我如何分开处理所有段落? 示例: Paragraph1(Selected first) Paragraph2 Paragraph3(Selected second) 当我尝试在这些段落的开头添加一些文本时 ..

发布时间：2020-07-01 02:46:16 vba ms-word word-vba multipleselection 其他开发

VBA是否包含注释块语法？

在VBA中，有一种简短的方法可以注释掉一段代码，就像Java使用 /*...*/ 一样？解决方案尽管没有语法，但仍可以使用内置的块注释按钮来关闭：如果尚未查看“编辑”工具栏，请右键单击该工具栏并启用“编辑”工具栏：然后，选择一个代码块，然后点击“评论栏”按钮；或已被注释掉，请使用“取消注释块”按钮：快速简便！ ..

发布时间：2020-06-01 00:10:56 vba excel-vba access-vba word-vba outlook-vba 其他开发

在没有标题的单词中插入新页面

我正在尝试在单词中插入新页面，即插入分节符.问题是我想将此页面更改为A3横向并删除所有标头，而我的代码当前不执行此操作.如何在下面修改我的代码以实现此目的? 下面是我当前插入新页面的代码，但保留标题和a4纵向: If wordDrawingExist Then Selection.EndKey Unit:=wdStory Selection.InsertFile Fil ..

发布时间：2020-05-25 05:31:08 vba pdf ms-word word-vba 其他开发

将活动的打开文档另存为pdf文件

我有以下代码，它们从excel复制范围单元格值，并作为图片粘贴到新的word文档中. 我想将活动文档另存为pdf文件，文件名作为单元格"A2"中的值. 如果您可以帮助我在下面的代码中添加相同的内容，那将是一个很大的帮助. Sub Picture() Dim objWord, objDoc As Object ActiveWindow.View = xlNormalView Range("A2 ..

发布时间：2020-05-25 04:52:13 excel vba excel-vba pdf word-vba 其他开发

更新或刷新Word ContentControls

我有一种情况，需要(以编程方式)将ContextControls添加到Word表中. 我的例子是，当用户向表(第一个单元格)添加ContentControl，然后向该行添加重复的ContentControl时，这是完美的！如果用户随后转到2单元格表的单元格2(为简单起见)并添加了另一个ContentControl-请记住，此行已经是重复的ContentControl，现在只有一个附加 ..

发布时间：2020-05-19 21:22:19 ms-word word-vba office-interop 其他开发

为什么range.find这样搜索?

我正在尝试在Word文档中搜索特定字符串的出现. 该代码应仅在目录之后搜索. 我完成的代码如下: Private Sub cmdFindNextAbbr_Click() Dim myRange As range 'CREATING DICTONARY for Selected Items If firstClickAbr = True Then ..

发布时间：2020-05-13 02:00:53 vba ms-word word-vba 其他开发

将超链接和带书签的单词转换为html< a>使用VBA宏在Word中标记

我有一个带有书签的单词，如"单击此处". 如何使用VBA宏将其转换为HTML锚标记 click here 然后，如果一个带有内部或外部书签的单词，如何转换文本，例如，在诸如"t20 CTRL +单击链接"之类的单词上出现一个弹出框 Introduction Matthew ..

发布时间：2020-05-13 02:00:49 vba ms-word word-vba 其他开发

在第一个文档中打开/卸载后，Word Userform将无法在第二个当前处于活动状态的文档中打开

标题确实说明了一切，但这是我的情况:我设置了一个用户窗体来收集用户输入，然后在宏中使用该输入并执行它.就其本身而言，它的工作方式完全符合我的要求.打开多个文档时出现问题. 为了说明:我有两个文档，"doc a"和"doc b".我打开两个文档，然后选择"doc a"，使用show userform宏打开用户窗体，输入我的数据，然后单击“确定"或“取消"(将两者都设置为在单击时卸载用户窗体). ..

发布时间：2020-05-13 02:00:34 vba ms-word word-vba userform 其他开发

通配符掩码“或"运算符不起作用

在MS Word中查找并替换通配符“或"运算符不起作用. 什么是'或'运算符，以及如何将其与查找和替换宏中的通配符一起使用? 我想找到以各种大写字母写成的English字，例如:EnGlish，enGLish. 所以我想使用OR运算符解决方案 Word的“查找"功能没有OR运算符，但是对于此特定要求，您可以使用以下“查找"术语:[eE] nGlish 如果要用英语 ..

发布时间：2020-05-13 02:00:29 vba ms-word find word-vba 其他开发

删除内容控件所在的行

我要删除内容控件所在的行. 当前文档具有以下文本: t1 t2 Status: Draft Valid from: 01.01.2012 Valid for: All Emplyoees Created by: a Released by: . 我有一个变量controlff，它是对控件的引用.不管 ..

发布时间：2020-05-13 02:00:25 vba ms-word word-vba 其他开发

接受Word页眉，页脚和主要文档中的格式更改

我正在使用以下VBA代码接受文档中的所有格式更改.我还需要添加哪些行才能接受页眉和页脚中的更改? ActiveDocument.ShowRevisions = True ActiveDocument.ActiveWindow.View.ShowFormatChanges = True ActiveDocument.ActiveWindow.View.ShowComments = False ..

发布时间：2020-05-13 02:00:06 vba ms-word word-vba 其他开发

使用VBA将文件嵌入到Word文档中

我正在尝试使用Word 2010在Access 2010中执行此操作.我有一个WordDoc对象，无法找到嵌入文件的方法. 我尝试使用书签从零开始: bmFile.Range.InsertFile "C:\Users\Me\Desktop\TestFile.xlsx" 并引发了有关文件已损坏的错误. 我尝试使用WordDoc.InlineShapes(1)编辑现有的嵌入文件， ..

发布时间：2020-05-13 01:59:31 vba ms-word word-vba 其他开发

Document.Save显示“另存为"对话框

我有一个Visual Studio 2010 VB.NET 4.0 Windows应用程序项目.该代码正在填充Word 2010文档.在30到60个表的区域中的任何地方，以及在30到50个嵌入式图表的区域中的任何地方(均定义为嵌入式形状(InlineShape)). 由于出现以下错误，我不得不开始进行常规的Document.Save()调用:There are too many edits ..

发布时间：2020-05-13 01:59:19 vb.net ms-word word-vba ole-automation 其他开发

VBA-日期减去从今天起的X天

这是我的发票生成器的摘要，尤其是爬网程序SUB，它从URL包含汇率日期的网页上获取汇率.我正在尝试如果引用日期(datIzd，从datIzdCtrl内容控件中拉出)是星期日或星期一，则强制它从星期六开始进入URL，因为那一天尚未生成页面.当前，星期日和星期一发出“超出范围"错误. 也许更好的方法是让日期继续前进1天，直到它碰到一个存在的页面(并在MsgBox中通知它前进了多远)，因为同样的事 ..

发布时间：2020-05-13 01:59:17 ms-word word-vba 其他开发

如何将文本框从MS Word复制/粘贴到Powerpoint幻灯片?

我当前正在创建一个文档，它将采用MS Word文档中的格式和文本并将其粘贴到PowerPoint模板的文本框中.我四处张望，看看该如何做，却发现不多.任何帮助将不胜感激！ Public Sub CommandButton1_Click() Dim pptApp As Object Dim pptPres As String Dim folderPath, file As String ..

发布时间：2020-05-13 01:58:54 vba ms-word word-vba powerpoint-vba powerpoint-2010 其他开发

是否可以在VBA中创建一个“输入框"，以将多行文本选择作为输入?

我正在尝试创建一个宏，该宏将从某些选定的文本(小于一页长)中过滤掉相关信息.然后，此信息将用于填写MS-Word模板. 我一直在通过.txt文件打开所选文本，但是我认为，如果可以复制&将所选文本粘贴到某种形式的输入框中. 我尝试了以下操作: Dim text As String text = InputBox("Enter selected text here:") 但是，它 ..

发布时间：2020-05-13 01:58:44 vba ms-word word-vba inputbox 其他开发

使用宏在Word中搜索表以查找单元格中的特定字符串，然后在同一行中的另一个单元格上设置排版

我有一个Word文档，其中包含3列的表，行数未知，并且我需要一个可以在第1列中搜索字符串"Sum"的宏. 如果找到完全匹配的宏，则必须将行中剩余的两个单元格的版式设置为Word中的两个不同的版式，并删除单元格1中的字符串"Sum". 该表可以包含字符串"sum"的许多实例，但是它们始终位于第一列中. 我尝试过的代码，由于我缺乏编码技巧而深表歉意，但是我只在一周内这样做，直到第一 ..

发布时间：2020-05-13 01:58:27 vba ms-word word-vba 其他开发

我需要为程序创建一个停止条件

我有一个程序，突出显示起点和终点之间的所有单词，并在提取物中循环查找相同的条件.程序运行良好，但不会停止循环.我必须中断正在运行的程序才能停止它.有人可以帮我写一个条件，说是否达到了结束条件，并且开始条件和结束条件不存在，请停止程序. Sub SomeSub1() Dim StartWord As String, EndWord As String Dim Find1stRange As ..

发布时间：2020-05-13 01:57:49 vba ms-word word-vba 其他开发

word-vba相关内容