单元格在VBA的表示方法：
1、Range("单元格地址") 如Range("a1") 即为A1单元格
2、CELLS（行，列） 如CELLS（1，1）也为A1单元格，CELLS（2，1）为 A2单元格
工作表在VBA中表示方法：sheets("工作表名")
每个函数前都要加Application.WorksheetFunction.？
答：如果是单个调用必须加
如果是多个调用就可以用WITH语句省去后面的
如Sub 矩形1_单击()
Dim i As Integer
For i = 1 To 20
Sheets("sheet1").Cells(i, 1) = i
Next
With Application.WorksheetFunction
Range("a21").Value = .Sum(Range("a1:a20")) 注意SUM前面要有个点才行
Range("a22").Value = .Average(Range("a1:a20"))黄自元
End With
End Sub
COLUMN是指列,COLUMNS是指列的集合
ROW是表示行,ROWS是行的集合
中学生心理咨询如果用Sheets("sheet1").columns.lect 会选定所有列即整个工作表
SUB 语句，需要有个事件触发它，才能执行，就比如一个箱子，只有去搬、推等外力施加与它时，它才会动。设置个按纽目的就是为了执行SUB语句
Range("A1:A22").ClearContents该语句是清除内容的语句
Private 的中文意思是私有的，Private Sub中的程序只能在本程序内部运行而不能被其他程序调用，而SUB语句则可以
如：
SUB BB（）
END SUB
SUB AA（）
BB
END SUB
Range("B65536").End(xlUp).Row
是指B列最后一个非空单元格，END（XLUP）是向上数第一个非空单元格，为了准备找到最下面的非空单元格，当然要从RANGE（"B65536"）开始向上找了
MSGBOX 有时带()
比如AAA=MSGBOX()
这种情况下可以取到用户点击对话框按纽的返回值,以确定下一步该怎么做
而不带括号只是提示的作用,不能取得返回的值
如MSGBOX ......
以下是引用playgirl在2004-10-5 15:18:00的发言：
那为为什么要用K=K+1。
如果向下数第一个非空单元格就是range("b1").end(xldown).row
向左数第一个非空单元格：range("iv1").end(xlleft).column
向右数第一个非空单元格：range("a1").end(xlright).column
是这样吗？谢谢！
向右是End(xltoright) 向左End(xltoleft)
K=K+1是在原来的基础加1
如选取Sheet1第一行有内容单元格区域（假设A1不为空）:
银行开业sheets("sheet1").range("a1",range("a1"）.end(表演游戏教案xltoright)).lect
选取B列有内容单元格区域：(假设B1不为空）:
sheets("sheet1").range("B1",range("B65536").end(XLUP)).lect
以下是引用老荷才露在2004-10-5 16:30:00的发言：
a = Application.WorksheetFunction.CountIf(Range("b:b"), ">106")
If a > 1 Then
九十年代经典老歌MsgBox "大于106的数有" & a & "个", 1
皮肤衰老的原因最后这个，1 怎么解释；a 这个变量是不是省略了dim的声明，不声明也行吗？
兰老师的最后一句中的 1+64，怎么解释
其实这个程序是加了个判断，如果统计的结果有>106的值（即A>1）就显示提示对话框,否则就不显示,
1+64参考下面的贴子:
lhome/dispbbs.asp?boardid=5&star=13&replyid=297359&id=62008&skin=0&page=1
姐姐要爱
变量在程序中如果事先约定,就必须声明,如果没有约定,就根据实际情况而定,一般来说声明最好,这样可以减少运行程序所占用的内存.
注:约定:相关图片如下(VBE编辑器---工具---选项)
此主题相关图片如下：
Function panduan(aa As Range)
If aa.Value > 0 Then
panduan = "大于零"
ElIf aa.Value = 0 Then
panduan = "等于零"
考研攻略El
panduan = "小于零"
End IfEnd Function
Function panduan(aa As Range) panduan即是你定义的函数名称，就如IF，MATCT等函数名称一样
(aa As Range) aa是该函数的参数，aa As Range是定义该参数为单元格，在本例中是要判断正负或零的引用单元格即=panduan(A1)中的A1
If aa.Value > 0 Then
panduan = "大于零"
是对引用单元格aa的值进行判断,把判断的结果返回给该函数所在单元格
在下面两句中间输入Workbooks后再输入个点("."),就会出现一个下拉框,框中的带小手指的就是工作薄集合的属性,带飞行的小书本的是方法,比如:新建(ADD),关闭(CLOSE),打开(OPEN)就是方法
MsgBox是VBA中的一个函数.可以以对话框形式显示或返回信息,如:当你在关闭工作薄时的提示
