VBA 数组运行非常缓慢的嵌套循环 - 寻找解决方案

[英]VBA Nested Loop with Array running very slowly - Looking for Solutions

我正在运行一个嵌套循环，我向其中添加了一个数组以试图加快速度，但它仍然运行得相当慢。 当我在“活动”表中有 100 行和 41 列数据，在“已关闭”表中有 1000 行和 41 列数据时，运行代码和 output 数据到“CompSheet”大约需要 7 分钟 我添加了数组来尝试加快速度，但我不确定 ...

Outlook 中搜索文件夹编程的正确过滤器（高级搜索）

[英]Correct filter for search folder programming in Outlook (AdvancedSearch)

我经常需要搜索特定日期的所有电子邮件。 为了不每次都更改搜索文件夹的条件，我编写了一个宏，它在询问日期并显示该文件夹后创建一个合适的搜索文件夹。 工作正常，但是在 Outlook 中手动创建的搜索文件夹只列出了这一天的邮件，编程版本还显示了与我共享日历的同事的日历约会 - 与我无关的约会和会议几乎 ...

在 Excel 中使用 VBA - Static 多页 object 发生更改事件（更改页面）时不保留变量

[英]Using VBA in Excel - Static variable not retained when Multipage object has change event (changing pages)

我无法在 Excel 用户表单中丢失 static 个变量。 我一直在为 excel 做例程。我是一个（非常）新手编码器。 我正在尝试将单元格范围填充到数组中。 我已经能够毫无问题地做到这一点。 但是，当我尝试将数组存储为 *static * 变量时，只要我希望它保留，变量就不会保留。 我认为问题发 ...

遍历文件夹并将具有特定名称的 csv 复制到活动工作簿中

[英]Looping through folder and copying csv with a certain name into active workbook

我正在尝试遍历包含不同 csv 文件的文件夹并复制前缀为 AB 的文件。 但是，我的循环卡在它找到的第二个文件上，并不断复制和粘贴它。 有没有人发现这可能发生在哪里？ ...

将信息从一张纸复制到另一张 VBA

[英]Copying information from one sheet to another VBA

我需要以下 VBA 代码的帮助来自动执行延迟故障报告： 通过复制信息并将其粘贴到目标工作表中，您正在重复额外的数据，例如，当您找到满足最初给定的过滤器的数据时，您将单元格分开，复制范围内的数据A 到 H 并将它们粘贴到目标单元格中，但是随后，它再次复制相同的数据，只是这次从源工作表中的 B 到 I ...

我怎样才能修复我的循环，以便找到所有匹配项？

[英]How can i fix my loop, so that all matches are found?

我的代码就是这样做的。 它在我当前的工作表中搜索单词：“KENNFELD”。 然后它将变量 label 设置为“KENNFELD”右侧的单元格。 现在我想在我的整个工作簿中找到变量 label 的匹配项，不包括我当前所在的那个，因为那是我首先得到它们的地方。 问题是，这适用于找到的第一个 labe ...

如何从另一个电子表格运行宏并等待执行？

[英]How to run macro from another spreadsheet and wait for execution?

我有一个需要定期刷新的电子表格（我们将其命名为 Spr1）。 不想每次打开都刷新，因为很费时间。 我创建了另一个“启动器电子表格”（Spr2）以在参数中使用宏启动 Spr1。 Spr2 正在打开：Private Sub Workbook_Open() Application.Visible = ...

避免硬编码路径和错误处理

[英]Avoiding hard coding a path and error handling

我是 VBA 的新手，似乎无法理解这个问题。 所以我有一个源 excel 文件，我从选定的工作表中复制必要的数据，然后使用我的宏将其粘贴到主工作簿（日常使用）到确切的工作表。 我想做的是避免对源文件的路径进行硬编码，这样如果源文件名发生变化，它仍然会找到并打开必要的源文件并获取所需的数据。 另外我想 ...

带有 For 循环的 WorksheetFunction.Sum

[英]WorksheetFunction.Sum with For loop

你好！ 我发布这个问题是希望它还没有得到回答！ 正如您在图像中看到的，我想使用 VBA 获得曲线下的面积。使用简单公式 (B4 - B3) * (C4 + C3) / 2 的梯形方法的结果在 E 列中给出（浅黄色阴影）和总和在单元格 F4 中给出，这是我想要的区域。 为了测试我的 VBA 代码是否 ...

通过在每一行中使用循环来创建具有条件的数字格式

[英]Create a number format with criteria by using a loop every row

如果 USD = 4 位数字，IDR = 0 位数字，JPY = 2 位数字，我想使用 excel 中的宏制作一个带标准的数字格式，因为有很多行谢谢您的帮助我用过这个模块，但它不起作用 ...

从 vba 更改 powerpoint 艺术字的字体边框的颜色和粗细

[英]change the color and thickness of the font border of a powerpoint wordart from vba

如何从 vba 更改 powerpoint 艺术字的字体边框的颜色和粗细？ 我正在尝试 with.TextFrame.TextRange 但我找不到方法我有一个旧的 web 页面生成一个 powerpoint 文件，我想修改它包含的 wordart 中文本字母的边框 ...

从工作表范围中提取日期

[英]Extract the day of date from a worksheet range

我正在处理月度报告宏，这需要我从一个范围中提取天数和月数并获得最大天数（例如 1、5、7、9）以继续下一步。 我的代码似乎不是理想的解决方案。 举例来说，我正在从范围 A1:A4 中提取日期，尽管在编写实际代码时它将是从 A1 到最后一行。 所以范围 A1 到 A4 的值如下 A1= 12/10/2 ...

VBA 查找和替换不断更改以“$”开头的单元格内容的格式

[英]VBA Find and replace keeps changing formatting of cell contents starting with "$"

下面的代码从 A2 中获取以“$”开头的值，并将工作表上的所有值替换为输入框。 唯一的问题是在查找和替换之后，它将单元格 A2 更改为货币格式，因为它以 $ 开头并删除了 $。 有什么办法可以避免这种情况吗？ ...

Word VBA：根据条件语句修改范围

[英]Word VBA: Modify range based on conditional statement

我正在编写一个脚本，该脚本从 Word 文档中提取括号内的文本引用，例如“（作者，1992 年）”，并将它们复制到另一个文档。 该代码可以很好地提取所有括号，但在某些情况下，引用的形式为“如作者（1992 年）中引用的那样......”如果括号以数字开头，我想将前一个词拉入范围并将两者都复制到新文档 ...

Pivot 表计算字段仅在标签/小计行

[英]Pivot Table Calculated field only on Label/Subtotal Rows

我在 pivot 表中有一个计算字段，返回我的期间总计的运行总计（每个期间的期末余额）。 当我的期间字段完全折叠时，它看起来很棒，但是当我展开一个期间以查看单个交易时，计算字段也在所有这些行上。 我很想看看是否有人有纯粹的 pivot 设置解决方案。 我试过在表更新时使用 VBA 清除内容，但遇到错 ...

使用“mailto”时我需要做什么才能停止收到语法错误消息

[英]What do I need to do to stop getting a syntax error message when using "mailto"

不是编码员，但在我的工作中必须使用 VBA 宏。 其中一项任务使用宏通过 Outlook 发送 email。email 没有产生任何问题，但我试图在 email 的正文中放置一个 email 链接，以便点击它并打开 88388258813701 例如“如果您有任何问题，请通过 ABC 联系我们”，其 ...

防止来自不同 VBA 脚本的 MsgBox 弹出

[英]Prevent a MsgBox from a different VBA script from popping up

我在工作簿中编写了一个脚本，该脚本发送一个 msgbox 警告用户不要复制和粘贴单元格。 问题是我已经将其他脚本分配给按钮，这些按钮用于在调用 function 时复制和粘贴特定单元格，但是当发生这种情况时，我会弹出自己的警告消息。 有没有办法防止在这些情况下弹出 msgbox？ 我努力了; Ap ...

属性错误的使用无效：对于表中的每一行，仅应用于第一列的单元格

[英]Invalid use of Property Error: For each row in Table, apply to only the cells of the first column

我如何修改以下内容以循环遍历 word 中表格的第一列而不是将其应用于表格的所有单元格？ 此外，我怎样才能遍历文档中的每个表？ 我探索的尝试是： 但是，我遇到了属性错误的无效使用。 ...

如何抓取不包括隐藏行的多行并将它们移动到 Excel VBA

[英]How to grab multiple rows excluding hidden ones and move them in Excel VBA

我正在尝试将尽可能多的行从一张纸复制并粘贴到另一张纸上，然后在使用循环移动该行后将其删除； 但我需要能够跳过隐藏的行。 现在我的代码只适用于我选择的第一行——它将完全移动它，包括删除它并隐藏隐藏的行。 我添加了 m integer，因为在添加它之前，仅使用 k integer（并在每个循环中将其放 ...

多选下拉列表不适用于受保护的 excel 工作表

[英]multiple selection dropdown list not working on a protected excel sheet

如果工作表受到保护，则多选不起作用，即使包含下拉列表的实际单元格已解锁。 它的行为就像一个普通的数据验证列表，即代码被忽略。 即使工作表受到保护，有什么方法可以让它工作。 它的行为就像一个普通的数据验证列表，即代码被忽略。 我希望能够从锁定的电子表格的列表中多出 select。 ...