首页 文章
  • 2 votes
     answers
     views

    Word VBA提取嵌入式文件的 Headers

    我正在尝试提取Word docx中的所有嵌入式Excel文件 . 我知道我可以通过将docx的文件名更改为zip来快速完成此操作,然后在word / embeddings文件夹中找到所有Excel文件 . 问题是word / embeddings中的Excel文件具有非常通用的文件名(例如,Microsoft_Excel_Macro-Enabled_Worksheet1.xlsm,Microsof...
  • 0 votes
     answers
     views

    Word VBA CompareDocuments多列表不编号

    我有一个Word VBA宏,它将文档与存储在SharePoint库中的文档进行比较(库已启用签入/签出) . 该宏按预期工作 . 没有错误,但我注意到多列表没有正确编号 . 所以列表可能如下: 列出项目 一个 . 项目清单 湾项目清单 一个 . 项目清单 C . 项目清单 该列表不会重新编号列表 . 当我使用Word的开箱即用比较功能比较两个文件时,列表正确显示 . 我重建了使用最少格式化的模...
  • 1 votes
     answers
     views

    Excel Listobject表插入行导致单元格公式错误

    背景:我创建了一个Word模板,其中包含一个例程,该例程创建一个数组,该数组在第一维中保存Project Headers ,在第二维中保存Goal Headers . 此数组转换为Excel中的表格,用于创建时间轴/甘特图 . 问题:转置将数组信息适当地放入Excel表中,并根据需要扩展该表的大小 . Cell B5是DataBodyRange的开头,也是我想粘贴数组信息的起点 . ' pas...
  • 2 votes
     answers
     views

    在Word中设置Excel范围时,VBA类型不匹配错误

    我有以下代码作为我的子尝试分配范围的一部分: 'Set xlApp = CreateObject("Excel.Application") Dim xlApp As Object Set xlApp = GetObject(, "Excel.Application") xlApp.Visible = False xlApp.ScreenUpdating =...
  • 1 votes
     answers
     views

    使用excel宏中的Word Selection对象

    我在Excel中编写一个宏来打开和操作Word文档 . 当我通过word中的vba编辑器运行代码时,代码可以工作,但是当我将代码行导入我的excel宏时,我得到运行时438错误 . Word宏 Selection.Collapse WdCollapseDirection.wdCollapseEnd 代码插入Excel宏,wtemp是word文档对象 wtemp.Activate wtemp.Ta...
  • 0 votes
     answers
     views

    在VBA中引用已打开的word文档

    我正在使用Excel VBA打开一个单词模板,它使用excel电子表格中的信息填充模板 . 从那里开始,我在电子表格上有一个按钮,然后我想在单击文档时填充word文档中的另一行 . 我遇到的问题是,当我运行按钮宏时,它只是打开另一个word文档并粘贴按钮信息,而不是在已打开的文档上执行 . 我将在下面附上我的代码,我相信这是一个简单的修复,我似乎无法找到解决方法 . Sub RepairCal()...
  • 2 votes
     answers
     views

    从Word中提取嵌入的Excel工作表数据

    我有一批嵌入了Excel工作表的Word文档 . 用户通过双击工作表图像并打开嵌入的Excel对象,在Excel工作表中输入数据 . 我需要获取用户输入的数据 . 下面是WORD VBA,引用了Microsoft Excel 15库 . (在Office 2010下创建的Word和Excel对象 . ) 我可以找到OLE对象,但我无法用它做任何事情 . 在下面的代码中,我尝试将对象分配给Work...
  • 4 votes
     answers
     views

    如何将嵌入的图片从Excel保存/复制到Word

    What I have :一个Excel文件,在一个列中(实际上它是自由格式化但在一列中对齐)一些元素嵌入了bmp图片,当你点击它们时显示公式 =EMBED("Paint.Picture","") . 查看Excel工作表时,仅显示代表图片的图标,而不是图片本身 . What I want :复制到新Word文档的嵌入图片(不是图标) . The Code...
  • 7 votes
     answers
     views

    通过VBA修改Word文档中的嵌入式Excel工作簿

    我有一个Word文档,其中包含两个嵌入的Excel文件(使用Insert - > Object - > Create From File添加),我希望使用Word VBA进行修改 . 我已经到了能够打开嵌入文件进行编辑的程度(参见下面的代码),但我无法处理Excel工作簿,我可以使用它来进行修改并保存嵌入文件 . 有人有解决方案吗?提前致谢 . Sub TestMacro() ...
  • 0 votes
     answers
     views

    将嵌入文件的内容合并为原始文档

    我正在尝试编写一个VBA脚本,找到Word文档中的所有嵌入(.docx)文件,并将其内容复制到父文档中,用文本替换嵌入的对象 . 我能够使用以下方法找到嵌入对象: Selection.GoTo What:=wdGoToObject, Which:=wdGoToNext, Count:=1, Name:= _ "Word.Document.12" 但是,我不清楚如何打开...
  • 0 votes
     answers
     views

    VBA / Word添加项目符号,编号等

    我一直在玩VBA代码,允许自动创建word文档 . 在下面的例子中,我写了一个Word段落6次 . 为了进行某些格式化(项目符号,编号,在表格中放置文本等),似乎需要进行第二次传递并在创建文本后应用格式 . 这可以在一次通过中完成,如VBA允许我们使用粗体或斜体吗? 示例: - 切换编号 - 写入行 Sub Sample() Dim oWordApp As Object, oWordDoc...
  • 0 votes
     answers
     views

    VBA将Word中的多行文本复制粘贴到Excel单元格中

    我的目标是使用VBA宏将多行格式化文本从Word复制到Excel工作表到一个单元格 . 现在我有一个需要两个单元格的多行文本 . 这是我目前的代码: With oWB.Worksheets("EPICS") ' Insert DESCRIPTION - todo ' ' HEADING xyz is selected, move o...
  • 2 votes
     answers
     views

    将许多Excel图表粘贴到Word作为链接

    我正在尝试将C#代码写入Excel中的复制粘贴图表并在MS Word中使用粘贴链接,因为使用Excel时,对表格,文本,图表等使用粘贴链接时,我可以单击更新Word中的所有字段在Excel中更改任何内容后 . 我试图使用OpenXML在Word中添加内容控件并将图表粘贴到这些位置,就像这位博主所做的那样 . http://www.dotblogs.com.tw/angus/archive/201...
  • 1 votes
     answers
     views

    将Excel图像粘贴到Word Headers 不在Office 2013中工作

    我有一个生成Word文档的Excel工作簿 . 有一次,它将Excel图像复制到生成的Word文档的 Headers 中 . 此代码在Office 2003,2007和2010中有效,但现在在2013年,它在Paste语句中失败,并在Paste方法中出现通用自动化错误 . 我希望有人可以帮我在Office 2013中完成这项工作 . 要复制,请使用包含单个形状的名为"Logo"...
  • 2 votes
     answers
     views

    Word 2007 vba - 未通过宏应用样式

    我有一个宏代码,基本上创建了一些表,然后在某些文本中键入一些,然后放置一些文本占位符 . 当我尝试将样式应用于文本时出现问题 . 起初我以为只有占位符不受代码影响 . 但似乎宏的选择的常规文本也不适用 . 代码基本上如下所示: Selection.TypeText Text:="Entreprisecost:" Selection.MoveRight Unit:=wdCell ...
  • 4 votes
     answers
     views

    如何在VBA中的范围/选择中替换Microsoft Word字符样式?

    我正在使用一个带有宏的Word 2007模板,该宏将字符样式应用于所选文本 . 似乎查找/替换功能是一个很好的起点,但我认为我发现了一个错误/限制,阻止宏按预期工作 . 这是我的vba代码: Sub restyleSelection() Dim r As Range Set r = Selection.Range With r.Find .Style = A...
  • 0 votes
     answers
     views

    Microsoft Word宏:循环选择文本范围并应用现有的字符样式

    QUESTION: I would like to know how to create a loop to find/select a range of data and apply a character style. Each range is identifiable by a start and end tag. 例如:aCS1a这些aCS1a和zCS1z标签之间的文本格式化为Word文...
  • 0 votes
     answers
     views

    Word VBA - 通过样式应用备用字体颜色不适用于已应用直接格式(字体颜色)的文本

    我已经创建了一个模板(一系列许多类似模板中的一个),它将分发给多个用户,用于创建(音频和数字文件)的成绩单 . 成绩单包括许多将专门用于格式化文本的样式 . 该模板包括一系列宏,这些宏临时更改每个自定义样式的字体颜色,以帮助快速校对格式,然后另一个宏将它们全部更改为黑色/自动字体颜色 . 只要在任何自定义样式中没有字体颜色的直接格式化,此过程就可以顺利运行 . 但是,我正在考虑某些用户可能选择选择...
  • 1 votes
     answers
     views

    将word文档的内容作为电子邮件正文发送时保留文本格式,

    我正在尝试将word文档的内容作为outlook电子邮件的正文发送,但是文本的格式(粗体,颜色等)在插入电子邮件后会丢失 . 我也尝试使用word文档作为Envelop项,它确实保留了原始格式,但.Display方法在这种情况下不起作用 . 以下是我的代码 bodi = wdDoc3.Content With wdApp.ActiveDocument .SaveAs This...
  • 1 votes
     answers
     views

    仅将Excel中的值复制粘贴到Word中

    我一直在使用这个网站一段时间,并且通常会研究我的所有问题,但是这个问题让我感到难过了几天 . 我有一个Excel工作簿,其中包含允许用户输入特定数据的工作表,一旦使用宏,将创建专门为每个宏格式化的Word文档 . 我正在尝试从excel复制范围,但并非所有行都将完成 . 范围目前是25行,但大多数用户只使用8-12: Set tbl = ThisWorkbook.Worksheets(Sheet4...
  • 0 votes
     answers
     views

    在单个单元格中粘贴多段格式

    我的单词文档中有一个表格,带有格式化的多段/行文本(包括编号列表和项目符号列表) . 我想使用VBA宏在单个单元格中复制此文本 . 当我将单词格式粘贴到Excel单元格中时,源的一个段落将粘贴到另一行 . 当我将其直接粘贴到单元格中(单击公式字段并粘贴剪贴板的内容)时,我会松开格式 . 由于Excel单元格不支持HTML标签,列表等,如果将格式化文本转换为普通文件,将编号列表替换为实数,则可以 ....
  • 4 votes
     answers
     views

    使用邮件合并从excel文件生成word文档

    我试图使用Microsoft Word中的邮件合并功能生成Word文档 . 为了尽可能清楚,我的梦想是: (1)将要创建的所有文档的所有值放在一个excel文档中(2)使用Word通过选择上述excel文件作为数据表来创建模板(3)运行将使用excel表中的值的宏并且可能是Word的内置邮件合并功能,使用其中一个单元格作为要保存的文件的名称,为Excel工作表中的每一行生成1个文件 . 最终结果是...
  • 2 votes
     answers
     views

    在MS Word 2007中使用VBA来定义页面元素?

    我希望能够创建一个页面元素,我可以提供文本,它将自己形成首选布局 . 例如: {MACRO DocumentIntro("Introduction to Business Studies", "FP015", "Teachers' Guide")} 使用它作为一个字段,输出应该是一行,前两个字符串是一定大小和字体,居中,另一行,然后第三...
  • -1 votes
     answers
     views

    更改日期格式[MS Word]

    我需要一个宏来更改Word中的日期和时间格式 来自:[11:47,9月21日2017] 致:21/09/2017,11:47 - 我有一个超过9000行需要更改的文档 . 这有可能吗?我已经阅读了一些允许我更改日期的内容,但没有任何内容可以让我更改日期和时间 . 任何帮助都将受到大力赞赏 谢谢 到目前为止我所拥有的: Sub GetDateAndReplace() Dim FoundOne As...
  • 2 votes
     answers
     views

    在Word-File中的每个单词上运行VBA宏

    我根据自己的需要改编了这个other answer . 我的更改通过填充的数组查看,并将所选文本与Header文本而不是Header编号以及其他一些小的更改进行匹配 . Sub InsertCrossRef() 'thank you stackoverflow: https://stackoverflow.com/questions/4...
  • -2 votes
     answers
     views

    从outlook vba访问单词变量或内容控件

    我正在尝试从Outlook VBA访问,这是我在单词Macro中创建的变量或内容控件ID . 基本上我试图设置一个等于字符串变量的文本字段,并将此变量加载到Outlook中的消息框 . 从outlook,我有创建一个单词对象的代码,并打开活动文档,但我很困惑访问变量 . 我试过让单词VBA中的变量成为一个没有运气的公共变量 . 从outlook访问变量的当前代码: Set oWordApp = C...
  • 0 votes
     answers
     views

    在Outlook 2016邮件中运行Word VBA宏以删除重复的段落

    我正在尝试调整一些MS Word VBA宏以在Outlook 2016中运行 . 我想知道是否有人可以帮我修改下面转载的宏,由Tomalak? (见问题33562468) 在Outlook中我引用了Microsoft Word 16.0对象库,我尝试使用http://www.vboffice.net/en/developers/use-word-macro-in-outlook/和https://...
  • 1 votes
     answers
     views

    如何在打开表单后将子文件添加到Word文档的末尾?

    我'm trying to write a macro that adds subdocuments to the end of a Word document when the Word document is opened. The document in question already has some text in it, so before running the macro I' ...
  • 0 votes
     answers
     views

    尝试使用多个附件创建个性化电子邮件

    根据Jeeped的建议更新: 我正在寻找一种方法来创建一组适合以下参数的电子邮件: 每封电子邮件将根据我的主管设置的模板信件进行个性化 . 会有一个问候语,上面有他们的名字和头衔,以及他们监督的部门的名字 . 每封电子邮件都有一组特定于该收件人的文档 . 在发送之前,应将其保存到文件中进行最终检查 . 以下代码中未引用的-column 5是包含部门名称的列 . 我最接近的是以下...
  • 24 votes
     answers
     views

    宏将MS Word表导出到Excel工作表

    我有一个包含许多表的word文档 . 有谁知道如何编写宏来将这些表导出到不同的Excel工作表?

热门问题