VBA学习记忆点小记：www.51zxw.net

关于：

udf:

UDF顾名思义,就是Userdefined Function,用户定义函数。

其实没必要把udf转化成VBA的写法，直接用你会的语言写完后编译成dll在excel中用即可

 

1、变量的定义

语法

Dim [WithEvents]varname[([subscripts])] [As[New] type] [, [WithEvents]varname[([subscripts])] [As[New] type]] . . .

type是可选的。变量的数据类型；可以是 Byte、 Boolean、Integer、Long、Currency、Single、Double、Decimal（目前尚不支持）、Date、String（对变长的字符串）、String* length（对定长的字符串）、Object、Variant、用户定义类型、或对象类型。所声明的每个变量都要一个单独的As type 子句。

对象类型：应用程序通过自动化显露的对象的类型，例如，Application、File、Range，和 Sheet。使用对象浏览器或引用应用程序的文档可得到这些对象的列表。

也可以使用 Dim 语句来声明变量的对象类型。下面的语句为工作表的新建实例声明了一个变量。

Dim wsh As Worksheet

For Each wsh In Worksheets

n = n + 1

 Sheet1.Cells(n, 2) = wsh.Name

 Next

-------以上为取当前工作表集合中的每个成员名写到sheet1的第二列中---------------------

Dim rng As Range ‘为定义了一个单元格类型的变量rng
Dim rng As Range

For Each rng In Sheet1.Range("a2:a10")

If rng = "good" Then rng.Interior.ColorIndex = 3

Next

－－－－－－'a2:a10单元格中，把值为good的单元格填充红色



Worksheet 对象是 Worksheets 集合的成员。Worksheets 集合包含某个工作簿中所有的 Worksheet 对象。

Worksheet 对象也是 Sheets 集合的成员。Sheets 集合包含工作簿中所有的工作表（图表工作表和工作表）。

 

workbook与workbooks

2函数的调用

调用EXCEL工作表函数：Application.WorksheetFunction.

Application.WorksheetFunction.Sum

调用VBA函数(VBA自身函数）：VBA.

如：VBA.Abs

 

 

3\运算符

NOT\AND\OR\Xor(异或)\IMP\EQV

 3 mod 2表示3除以2的答数。

通配符：？：任何单一字符；*：零个或多个字符；#：任何一个数字；[charlist]:charlist中的任何单一字符；[！charlist]:不在charlist中的任何单一字符。

 

like比较两个字符串，区分大小写

4\ workbook,worksheet,cell

1-工作薄（workbooks）

 Workbooks (N)第N个工作薄
Workbooks ("工作薄名")
ActiveWorkbook活动工作薄
ThisWorkbook代码所在的工作薄

2-工作表（worksheets）

Worksheets (N)第N个工作表
Worksheets (" 工作表名")工作表名
sheetN
ActiveSheet活动工作表

3-单元格（cells）

 
Range ("单元格地址")
Cells(rowinedx,columnindex)
[A1]单元格简写
ActiveCell活动单元格
Selection当前选取的单元格