jiliqiang1986的博客

CurrentRegion属性与UsedRange属性是我们在VBA编程中经常用到的2个极为重要的属性，它们有相同之处，也有不同处。下面先介绍CurrentRegion属性。　　CurrentRegion属性是一个非常有用的属性，返回活动单元格所在的周围由空行和空列组成的单元格区域(即通常所说的当前区域)，如图1所示。该区域为活动单元格附近不为空的单元格范围，该范围截止区域为空

带解释的 VBA 短句[VBA起步]常用的、带解释的 VBA 短句[A65536].End(xlUp).Row                            'A列末行向上第一个有值的行数[A1].End(xlDown).Row                               'A列首行向下第一个有值之行数[IV1].End(xlToLeft).

1、查找算法，函数返回整型变量Function Searchcheci(checi As String) As Integer   '获取查找内容所在的单元格    Set c = Sheets("表名称").Range("C3:C200").Find(checi, lookat:=xlWhole)  '获取单元格的行数/列数    Searchcheci = c.rowE

sub称为过程， function称为函数，他们之间的唯一区别是function有返回值。完全可以把sub写成function，只要不用function的返回值就可以了。C语言就只有函数而没有过程，因此一般情况下都可以用function来代替sub。但这两段代码对于excel的运行位置不同。sub会出现在宏里，而function会出现在插入函数中。Function Sqr_Fu

获取当前的Excel版本内置的工具栏的名称和类型    Dim oCmdBar As CommandBar    Dim i, temp    [a1:c1] = Array("在集合中引用的名称", "当前系统的菜单名称", "类型")    i = 2    For Each oCmdBar In Application.CommandBars        Selec

一、定义字典  Set d = CreateObject("Scripting.Dictionary")二、呼之即来，挥之即去d("张三“)=1     '相当于给字典赋值，张三过来（没有就生成）拿个1站一边去d("李四”)=2     '相当于给字典赋值，李四过来（没有就生成）拿个2站一边去d("李四”)=3     '相当于改变值，字典中已经有李四了，李四跑过来，丢