VBA COUNTA |如何在Excel VBA中使用COUNTA工作表功能？
Excel VBA中的COUNTA工作表功能
在我们之前的文章“ Excel COUNTA”中，我们已经看到了如何使用COUNT函数从值范围内对数值进行计数。如何计算单元格范围内的所有值？是的，我们也可以算。要计算单元格范围内的所有单元格值，我们需要在excel VBA中使用公式“ COUNTA”。在本文中，我们将向您展示如何在VBA中使用COUNTA函数对所提供范围内的所有像元值进行计数。
VBA中COUNTA函数的示例
事实之一是“ COUNTA”功能不是VBA功能。我知道您的问题是，如果它不是VBA函数，那么我们如何使用它呢？即使它不是VBA函数，也不必担心，我们仍然可以在VBA编码的工作表函数类下使用它。
您可以在此处下载此VBA COUNTA Excel模板– VBA COUNTA Excel模板好的，让我们编写代码以应用excel VBA COUNTA。
步骤1： 创建一个子过程名称。
第2步： 现在，首先确定我们将VBA COUNTA函数的结果存储在何处。在此示例中，我想将结果存储在单元格C2中。所以我的代码将是Range（“ C2”）。Value。
代码：
Sub Counta_Example1（）Range（“ C2”）。Value =结束Sub
第三步： 在单元格C2中，我们需要VBA COUNTA函数的值。因此，要应用excel VBA COUNTA函数，首先要应用工作表函数类。
代码：
Sub Counta_Example1（）Range（“ C2”）。Value =工作结束Sub
第4步： 在应用工作表函数类后，请通过加点选择公式COUNTA。
代码：
Sub Counta_Example1（）Range（“ C2”）。Value = WorksheetFunction.Count End Sub
步骤5： 现在我们需要提供要计数的单元格范围。在此示例中，我们需要计算从A1到A11的单元格范围。因此，请使用VBA RANGE对象提供单元格。
代码：
Sub Counta_Example1（）Range（“ C2”）。Value = WorksheetFunction.CountA（Range（“ A1：A11”））End Sub
好的，让我们运行代码以在单元格C2中获取结果。
因此，VBA COUNTA也返回了相同的结果。
这样，我们可以使用COUNTA来计算提供范围内的非空或非空白单元格。
用变量编码
VBA变量是构建项目的关键。现在对于相同的数据，我们可以声明VBA变量并得出结果。
例如，请看下面的代码。
代码：
Sub Counta_Example2（）将Dim CountaRange作为范围Dim CountaResultCell作为范围将CountaRange = Range（“ A1：A11”）设置为CountaResultCell = Range（“ C2”）CountaResultCell = WorksheetFunction.CountA（CountaRange）结束子级
现在，让我们解释上面的代码。
首先，我声明了变量“ CountaRange”作为引用值范围的范围。
昏暗CountaRange作为范围
接下来，我将参考设置为范围A1到A11。
设置CountaRange = Range（“ A1：A11”）
第二个变量是引用COUNTA结果单元格。
昏暗的CountaResultCell作为范围
对于此变量，我将单元格设置为C2。
设置CountaResultCell = Range（“ C2”）
现在，像往常一样，我使用变量而不是硬编码范围来应用COUNTA函数。现在，查看旧代码和此VBA代码。
代码1：
代码2：
在代码1中，我们具有范围C2，在代码2中，我们具有变量名称“ CountaResultCell”。此处，变量“ CountaResultCell”将引用设置为C2单元格。所以这个变量现在是C2单元格。
在代码1中，COUNTA功能范围是A1到A11，在代码2中，变量是称为“ CountaRange”。此变量保留对A1到A11范围的引用。
这就是旧代码和带变量的代码之间的区别。
因此，COUNTA函数可帮助我们计算所提供范围内的所有非空单元格，而不管其具有的数据如何。
