Visual Basic for Applications（VBA）是一种用于编写宏的事件驱动的面向对象编程语言，用于整个Office套件以及其他应用程序。 VBA不等同于VB.NET或VBS;如果您在Visual Studio中工作，请使用[vb.net]。如果您的问题专门针对编程任何MS Office应用程序，请使用相应的标记：[excel]，[ms-access]，[ms-word]，[outlook]或[microsoft-project]。
在 vba 中将 powerpoint 演示文稿另存为 pdf
我看了这个问题的很多答案，但不知道我做错了什么。我正在尝试创建一个 pdf 文件。我从 Excel 文件中获取数据并将其复制到 powerpoint 中。我...
是否有任何方法可以将 MS Outlook 文件夹连接/集成到 MYSQL 单表，包括 Outlook 收件箱、已发送项目以及用户创建的任何其他文件夹。 单表格式： |Id|文件夹路径|苏...
我有一些VBA代码可以过滤一些数据，在总计一列之前删除一些列和行。 我现在想要实现的是在总计之前出现一个弹出窗口，其中包含所有列表
我尝试使用命名范围来控制单元格格式，但它似乎没有按预期工作： 不使用命名范围的 Sub 工作正常： 子 COLOR_PATCH() ' ' 这改变了...
在 Excel VBS 中使用名称 Rang 在某些情况下不起作用
我尝试使用命名范围来控制单元格格式，但它似乎没有按预期工作： 不使用命名范围的 Sub 工作正常： 子 COLOR_PATCH() ' ' 这改变了...
以下代码允许用户从命名图表中删除文本框。 要选择图表，用户必须在宏中输入图表名称。 在此示例中，名称为“Chart xyz”。 ...
使用带有动态/部分已知 URL 循环的 MS XML、6.0 库发送 HTTP 请求
我正在尝试在 www.statmuse.com 上循环浏览投手的比赛日志。主要问题是，由于我试图在循环中执行此操作，因此部分 URL 目前未知。 例如，看着妈妈...
使用 VBA 将嵌入文件保存到某个位置（从 Excel 导出文件）
我有一个小宏，它会打开一个表单，您可以在其中输入详细信息， 当您点击一个按钮时，您将创建一个包含所有条目的列表，并保存嵌入在其他作品中的选定 pdf 文件...
我试图从 Sheet1 的单元格范围 C6:K105 获取所有数据并将其保存到 Sheet14，但我只从单元格范围 C6:C14 获取结果。谁能帮我解决这个VBA代码？谢谢 这是...
在 Word Doc 上调用方法错误：Excel VBA 引发运行时错误 438：对象不支持此属性或方法
我已经为一个更大的项目编写这个测试代码几天了，并且不断遇到这些 438 错误。我在这里收到了第一个帮助：438 错误，但现在它变得更远了......
我正在尝试向主题中具有特定字符串的任何传入邮件添加类别。这些字符串位于每天从本地数据库导出的文本文件中。我已经让它工作了......
Excel VBA：清除代码中的立即窗口，允许输出进一步的 Debug.Print 消息
我有一些代码 子测试2() 昏暗的工作表 Dim rCell 作为范围 暗淡我只要 将 resultArray() 变暗为字符串 暗淡结果索引只要 '清除立即窗口 '应用程序.VBE。
在同一脚本中使用此工作簿和 Word 应用程序时出现 Excel VBA 438 错误
我正在测试一个更大项目的方法，并且该脚本遇到了 438 错误。如果我先抓取工作表，错误来自于调用 word.application，如果我抓取单词 doc st...
我使用 Outlook 365 VBA 创建了一个邮件合并工具。它创建电子邮件并为其指定类别并将其保存在草稿文件夹中。然后我设置了一个子进程来发送包含该特定内容的电子邮件
我想将表A的数据复制到表B上。 因为数据很多，所以我不想使用复制粘贴。 尽管我在这个简化的代码中对其进行了固定，但我的范围发生了变化。 我不想...
我已经尝试了所有这些，但我无法让它工作。 我在 Excel 中有一个 URL 列表，我必须异步打开它，否则服务器将禁止我。 我使用这个宏： 子 OpenHyperLinks() 昏暗
VBA TextToColumns 函数在共享工作簿中不起作用
我已经在这里解决了通过 TextToColumns 函数将文本拆分为列的问题。但现在我遇到了问题，我必须将此 Excel 设置为共享，并且此功能不起作用...
我正在尝试添加代码来保存基于 3 个单元格值的工作簿。一点背景知识，我们在工作中有一个计划员，我们需要进行日常备份，或者根据需要进行复制而不改变原件...
我在替换范围变量中的值时遇到困难。 我的目标是找到 G 列并将其替换为 A 列中的范围变量。 查找值“0260203700”是...
我正在制作一个ping监控工具。 我需要让它从第 2 行运行到第 207 行，然后循环回到第 2 行并无限重复。 子 PingSystem() 暗条作为字符串 执行直到 Sheet1.Range("E215...