如果我们在Excel中选择了一些单元格,可以通过下面的VBA代码来统计所选单元格的数量。例如,如果需要统计表格中某种类型的单元格数量,可以这样操作:
1.单击菜单“编辑→定位”,在弹出的“定位”对话框中单击“定位条件”按钮。
2.如果要统计包含文本的单元格数量,选择“常量”,然后仅勾选“文本”,单击“确定”按钮。如果要统计包含数值的单元格数量,则仅勾选“数值”。如果要统计包含错误公式的单元格,则选择“公式”,仅勾选“错误”。
excel自定义一个具有Like运算符功能的工作表函数
我们知道VBA中的Like运算符是用来比较两个字符串的,其语法为: result = string Like pattern 如果string与pattern匹配,则result为True,如果不匹配,则result为False。Like运算符的比较方式比较灵活,除了可以使用通配符外,pattern中还可以使用中括号&
3.按Alt F11,打开VBA编辑器,在右侧的代码窗口中输入下面的代码:
Sub Count_Selection()
Dim cell As Object
Dim count As Long
count = 0
For Each cell In Selection
count = count 1
Next cell
MsgBox "共选择了" & count & "个单元格。"
End Sub
4.将光标定位到代码中,单击“运行”按钮。
如何用VBA输出带英文引号的字符串?
在VBA中,赋予变量或属性的字符串都是用引号 “" "”括起来的。如果字符串中要包含英文双引号,可以在代码中将输出时包含引号的文本用两对双引号括起来,然后再将整个字符串用引号括起来。例如下面的代码: Range("A2") = ""&q