公式
taller_2000
不积跬步,无以至千里;不积小流,无以成江海
展开
-
VBA之正则表达式(47)-- 快速将公式转换为静态值计算
实例需求:工作表I列包含多种计算公式,为了便于演示,将I列公式显示在J列单元格中,现在需要将公式的单元格引用转换为静态值,如K列所示。原创 2024-08-27 12:59:20 · 499 阅读 · 0 评论 -
Excel公式逆天了--使用公式修改其他单元格格式
如果用户修改单元格填充色,例如选中C列和D列清除填充色,那么当工作表中任意单元格发生变化时,公式将重新计算,C列和D列的填充色将被恢复,相当于实现了挥之不去的单元格格式,效果如下图所示。同理,可以使用公式设置多个单元格的填充色,如A3单元格所示。第2行代码设置UDF为易失函数,任何单元格发生变化时,将重算此函数,注意如果大量单元格使用易失函数,可能会引起Excel卡顿。第5行代码设置UDF返回值,如果设置返回值为空,则设置了公式的单元格中为空白,相当于被隐藏了。,此句是整个解决方案的核心,替换为。原创 2023-12-15 08:07:39 · 546 阅读 · 0 评论 -
用户权限数据转换为用户组列表(2/3) - Power Query
使用Power Query实现数据转换,如下是AD用户的列表,每个用户拥有该应用程序的只读或读写权限,现在需要创建新的AD用户组,并根据用户当前的权限,将这些用户添加到相应的组中。原创 2023-09-10 03:21:51 · 285 阅读 · 0 评论 -
快速统计文本数字之和
实例需求:A列到F列为文本数据,每个单元格中包含3个数字,数字之间使用竖线分隔,现需要计算每个单元格中的数字之后。例如F15单元格内容为`10┃5┃18`,则需要计算10、5、18三个数字之和,结果为33,写入单元格M15,如下图所示。原创 2022-12-03 10:25:05 · 518 阅读 · 0 评论 -
如何在VBA中实现工作表函数SIGN
Excel中有一个公式`sign`,其返判断数字的符号,正数返回值为1,负数返回值为-1,0返回值为0。但是在VBA中即无法使用`Application.WorksheetFunction`调用工作表函数,也没有提供相应的VBA函数实现此功能,也许MS的产品经理认为根本不需要这个功能,呵呵。前一阵子在论坛看板有个帖子就是关于这个的提问,其实实现起来也很简单,单行`IIF`嵌套就可以实现,代码如下。原创 2022-12-02 04:35:57 · 570 阅读 · 0 评论 -
Evaluate自定义公式替换参数
实例需求:批号列包含L、W、H,公式列为计算公式,现需要计算“结果”列。批号列为11位数字,其格式为:LLLLWWxxHHH,其xx为填充位。示例代码如下。Sub demo() Dim arr, L, W, H, Rng Set Rng = [a1].CurrentRegion arr = Rng.Value lst = UBound(arr) For i = 2 To lst L = Left(arr(i, 1), 4) W原创 2022-05-08 12:54:01 · 504 阅读 · 0 评论 -
动态设置求和公式
实例需求:现有如下审计数据,有些项目为汇总费用,现在需要填充如下公式,由于分项的个数不确定,因此无法使用固定模板,也就是说每月报表的公式都不相同,只能使用VBA动态填充。原创 2021-08-01 07:25:32 · 444 阅读 · 0 评论