下图所示为带...
特殊的东西总是会得到特别的照顾。在Excel中,可以使用“定位条件”来选择一些特定的单元格,例如空单元格、带有批注的单元格、当前区域,等等。
下图所示为带有空单元格的工作表,我们要选择这些空单元格。这时,可以调出“定位条件”对话框,选取“空值”按钮,单击“确定”即可。
如果将上述操作使用宏录制器录制下来,则录制的代码如下:
‘ 宏1 宏
‘
‘
Selection.SpecialCells(xlCellTypeBlanks).Select
End Sub
从代码中可以看出,Excel使用了Range对象的SpecialCells方法并指定适当的参数值来达到选取工作表中所有空单元格的目的。这里,对应“空值”的参数值为xlCellTypeBlanks。那么,上图所示的对话框中的其它的单选按钮应该也对应着相应的参数值,来选择相应的单元格,如下图所示。
下面是SpecialCells方法的语法:
Range对象.SpecialCells(Type,Value)
怎么用excel vba开发学生管理系统
经过不断完善,我们的系统已经能够自由地将<员工基本信息表>中输入的信息灵活地导入<员工信息数据库>中。 现在,让我们能够查询<员工信息数据库>中的数据,并将查询结果自动显示到<员工基本信息表(查询)>中。 为此,我们建立一张与<员工基本信息表>完全相同的工
说明:
返回一个Range对象,代表与参数Type和Value指定的值相匹配的所有单元格。
参数Type是必须的,其参数值及相应的含义在上图中已标明。
参数Value可选,与xlCellTypeConstants(常量)或xlCellTypeFormulas(公式)配合使用来进一步确定所选单元格的类型。该参数的值可以自由组合。
在《Excel VBA解读(36):快速移动单元格——End属性》中,我们使用End属性来确定一列或一行中的最后一个被使用的单元格。之所以要找到最后一个单元格,很多情形下是因为我们要确定用于填充数据的下一个空行或空列,这里我们也可以使用SpecialCells方法来确定最后一个单元格。
如下图所示的工作表,运行下面的代码显示最后一个单元格为C7。
Sub testSpecialCells()
Dim rng As Range ‘声明单元格对象
Set rng =Selection.SpecialCells(xlCellTypeLastCell)
MsgBox “工作表中最后一个单元格是”& _
rng.Address(RowAbsolute:=False,ColumnAbsolute:=False)
End Sub
可以看出,SpecialCells方法得到的是工作表中行列值最大的单元格,即使该区域中包含有空行或空列。
告诉你单元格住在哪儿——使用Address属性获取单元格地址
在Excel工作表中,通过顶部行的字母标识和左侧列的数字标识,我们能够很直观地看出单元格或单元格区域的地址,即通常我们所说的单元格A1、单元格区域A1:B5等。 Excel对象模型也提供了Address属性,让我们通过VBA代码知道单元格或单元格区域的地址。下面,我们举几个简单的代码示例。 代码: ActiveC