VBA应用经验：工作表函数和VBA代码,你选择哪种方案？

蓝字关注，加微信NZ9668获资料信息

《VBA代码解决方案》系列书作者
头条百家平台 VBA资深创作者
_______________________________

VBA是我们工作中,特别是对于长期与数据打交道、用EXCEL较多的朋友而言，是非常值得利用的一种工具,甚至说是可以起到立竿见影的效果，也不为过。之前用几小时甚至一天的工作,在用了VBA后可以在几分钟甚至几秒钟来完成。这种体验有朋友告诉我说就是一个字”爽”。每当我看到这些朋友的回复时，真是由衷得高兴。能引导大家走上方便工作的大路也是我最为高兴的事。
很多朋友在学习VBA的过程中,确实很下功夫,其中新入职场的年轻人，有近不惑之年的朋友,也有和我一样快50岁的朋友,甚至还有比我大的朋友,都在一起努力着。为了让自己的工作更出色,为了让可以节约出时间陪父母和亲人,都在尝试努力着。我的宗旨是不变的:分享成果,随喜正能量,就是把我20多年的VBA成果分享给需要的朋友,随喜正能量给同路人.我会把我的经验无保留的给大家.
今天和大家说的是EXCEL函数和VBA代码实现同一个目的谁优先的问题。最近很多朋友在纠结于这个问题,那么我给大家指导一二。
一什么是EXCEL函数，和VBA函数的区别
1什么是EXCEL函数呢?就是我们平时在EXCEL工作时用到的函数,如SUM () SUMIF()  COUNT()  COUNIF() 等等,
2 什么是VBA函数呢? 就是我们在VBA中可以直接利用的函数,这类函数比较少:如isdata ，isempty，isnumeric等等
3  EXCEL函数（下面称为工作表函数）和VBA函数的联系；有些函数是可以通用的如TRIM() LEFT() RIGHT() 等；有些是不可以通用的，如SUM() SUMIF 。
二：有没有办法在VBA中利用工作表函数呢？在《VBA代码解决方案》第二册中我专门的讲到这个问题：

在第49讲中我讲到：

这讲中我给出了了工作表函数，的普遍应用方法代码，如：
Setrng = Range("A1:H10")
d= Application.WorksheetFunction.Sum(rng)
或许正是这节内容的作用，很多的朋友在VBA代码中编写时常常采用工作表函数，而放弃了一些基本的VBA变量判断的方法，其实，这是有所偏见的。
这里需要提醒大家几点:
1我在《VBA代码解决方案》中突出讲的是程序运行的效率，其实在我们实际工作中，大多在运算效率上的要求并没有太高，无非是几秒钟的差异，完全可以不用考虑，
2  工作表函数在应用时各个参数有着非常严格的要求，不能出错。
3  工作函数在VBA中的表示和EXCEL中是不同的.
4  在VBA中，采用工作表函数还是变量的判断，需要较为灵活的运用。
三下面我们结合实际看看为了达到我们的目的，工作表函数和VBA代码中变量求解的方案有什么不同。
实例：如下的工作表，求数据1和数据2相乘后的和。

方案一：利用工作表函数在工作表中实现：这时在D7单元格中录入公式：=SUMPRODUCT(A2:A6,B2:B6)即可实现：

方案二：在VBA中利用工作表函数实现，函数要用WorksheetFunction为开头的，如下：
Sub SumProduct()
Range("d8") =WorksheetFunction.SumProduct(Range("A2:A6"),Range("B2:B6"))
End Sub

运行后的结果,在D8的单元格显示了最后的结果：225，这时要注意表示单元格名称的变化,前面加上了range().下面为运行的结果;
方案三：那么还有没有其他的办法呢？有的，用VBA变量求和来实现。我们看代码：Sub SumProduct2()
i = 2
k = 0
Do While Cells(i, 1)  ""
k = k + Cells(i, 1) * Cells(i, 2)
i = i + 1
Loop
Range("d9") = k
End Sub
代码截图：

最后看运行的结果：

方案四：还有没有其他的办法呢？如果你熟悉了《VBA代码解决方案》你一定会想到了第一册：

下面我们看看用这讲的内容来完成我们的要求：
代码：
Sub SumProduct3()
Range("d10").Formula ="=SUMPRODUCT(A2:A6,B2:B6)"
End Sub
代码截图：

看看运行的结果：

上述的四种方案给大家都列出来了，不知读者是认可哪一种方案呢？
其实我们不要拘泥于任何的固定模式，要实际问题实际分析，不要一味地追求运行的效率而忽视了我们的真正目的。在我的经验中，如果能在工作表中解决的在工作表中解决，如果需要复杂的函数，涉及到的参数很复杂的，就要发挥代码变量的作用，来达到目的。
所以大家在学习《VBA代码解决方案》时要理解，以实际的问题为切入点，要综合的考虑问题，千万不要片面。

_____________________________

觉得有启发，点个“在看”，转给朋友们
欢迎你“留言”，和作者直接交流

更多关联阅读