问题标签 [excel-udf]

例子：

我正在尝试计算 B:B 范围内前 10% 的图书数量平均值。
尝试让它与基于以下的数组公式一起使用：

当我试图让它使用数组公式时，我意识到我有很多数据，并且在添加新数据时需要花费很多时间来计算。

这可以通过 VBA 中的用户定义函数来加快速度吗？

我每天都在处理无限的新数据行，我需要一个UDF，它可以找到相似的行值，而不管其顺序如何。正如您在下面的示例中看到的那样，A9:F9和A4:F4具有类似的行值，标记为SIMILAR ROW 1。您需要查看行内的整体数据，以查看它具有相同的值但顺序不同。如果有人可以帮助我，我不熟悉 VBA，我将不胜感激。我现在一直在网上搜索这个。

公式示例：

我的工作表如下图所示：

我在单元格 A1 中有一个可变文本字段，其中包含以下内容：

文本;#Number;#Text;#Number

• 这种格式可以不断重复，但模式始终是 Text;#Number。
• 数字可以从 1 位到 n 位不等（限制 7）

例子：

原始值

MyName;#123;#YourName;#3456;#HisName;#78

所需值：

123, 3456, 78

根据我的理解，该字段对于 excel 公式来说太易变了。

我尝试使用正则表达式，但在编码方面我是初学者。如果您可以用一些解释文本分解代码，将不胜感激。

我已经尝试了下面的一些建议，它们工作得很好。还有一个问题。

现在我可以从文本中拆分数字，有什么方法可以利用下面的代码并添加另一层，我们将数字拆分为 x 个单元格。

例如：一旦我们运行函数，如果我们在同一个单元格中得到 1234、567，则函数会将 1234 放在单元格 B2 中，将 567 放在单元格 C2 中。这将不断更新同一行中的所有单元格，直到字符串用尽从函数中检索到的所有数字。

谢谢

我连续处理 956 个值。我在获取每个值中的行距离时遇到问题，因为它们太多了。有没有办法使用带有按钮的 Excel-VBA 来实现这一点？

例如：这显示了计算行距的次数。

我在计算相似值之间的距离时遇到了麻烦，因为 excel 中没有可以实现这一点的函数，我处理了 2000 行值。为此，我更喜欢 excel-vba，这个按钮可能会生成示例中的距离。当值太多时，数组公式会滞后于 excel。一个接一个地计算它们是浪费时间。请我想完成这个。如果有天才能做到这一点，我将不胜感激。

下面的示例显示了一个特定值与另一个值的距离：

我想以绿色计算 excel 中某个单词的出现次数。例如，我的 excel 看起来像这样：-

我想计算绿色（X）和红色（X）的出现。

我在我的计算机中开发了一个用户定义的函数并将文档保存为 XLSM。当我将它分发给我公司的其他用户时，只要他们打开工作簿然后点击“启用宏”，他们就会收到“找不到项目或库”错误。

如果他们击中Debug，黄线将落在用户定义函数的头线上，像这样

然后我检查了 VBE 的工具 - 参考，但在所有计算机（我的和其他用户的）中都没有发现任何缺失。

但是参考有点不同，

在我的电脑里是

在其他用户的电脑上，

唯一的区别是突出显示的行。在我的计算机中，它是 Microsoft office 16.0对象库，因为我使用 Excel 2013 安装了 Project 2016。而其他的是15.0。

顺便说一句，我在点击“启用宏”按钮之前得到了上面的图片，因为一旦我点击它，错误消息将无限次显示，我将永远无法进入 VBE 中的参考。因此，当代码实际运行时，可能会有一个 MISSING 引用。

我想在excel VBA中输入公式时得到一些帮助我假设在不同的列中输入某种突出显示颜色（在本例中为绿色）的所有数字，但在列范围内的同一行中。

Excel表1

为了让事情更清楚，我在上面上传了一张图片。该图像中的表格在最右边的列中说明了我想要的结果。如果可以显示相同颜色的两个或多个单元格值，我也希望它。

绿色细节：http ://www.htmlcsscolor.com/hex/00B050

任何帮助将不胜感激，请向我询问您需要的任何问题。谢谢你。

编辑：如果可能的话，我能否获得一个代码，在单独的列中显示两个或多个绿色单元格值，而不是与 + 号一起显示？

我在 excel 中有一个 UDF，它在技术上 非常完美。但是，有时，当切换到具有调用该 UDF 的单元格的工作表时，它会返回 #N/A。当我打开文件然后切换到该工作表时，它始终如一地发生。
我说它“完美运行”的原因是因为当我进入该单元格并按 Enter 键（即手动运行该函数）时，它确实返回了正确的值！以及任何时候更改依赖单元格之一中的值。
我已经尝试排除故障以找出导致问题的原因，并且我意识到我的 udf 甚至没有被调用！（我在那里的 debug.print 语句没有被打印出来）

这是我的udf：

我想我忽略了一些简单的东西......

我的想法是在 Excel 中创建一个比以下更容易设置的函数：（ =INDEX($A$1:$A$5,AGGREGATE(15,6,ROW($B$1:$B$5)/($B$1:$B$5=1),ROW(1:1)))
请参阅ScottCraner 在此答案中对实践中该函数的评论）

我创建了以下 UDF：

它几乎可以工作。除了，当我从第一行向下拖动时，数据不会更新。我必须单击单元格以“重新触发”该功能以获取要显示的正确数据：

（D列是那个公式，输入正确）。

但是，如何让公式自动更新，而无需重新输入单元格？

我还尝试添加第四个变量：

并输入 like:=findUnique($A$1:$A$5,$B$1:$B$5,1,ROW()) 但它只是返回一个#VALUE错误

（另外，我该如何避免ActiveCell.Row，因为我已经把它钻到我的头上以避免使用Active任何东西......）

感谢您的任何想法或建议！