| 共 107 篇文章 |
|
Vba遍历数组下面我们提供两种方法，在vba中实现遍历数组，分别如下:Sub RunA() Dim Arr As Variant Dim i As Integer Arr = Array(1, 2, 3, 4, 5) For i = 0 To UBound(Arr) Debug.Print Arr(i) Arr(i) = Rnd''修改数组 Next iEnd Sub.Sub RunB() Dim Arr As Variant Dim i As Variant Arr = Array(1, 2, 3, 4, 5) For ... 阅1879 转16 评0 公众公开 17-04-30 00:47 |
阅344 转6 评0 公众公开 16-11-04 16:39 |
re.MsgBox re.可能含有一些正则表达式字符—— 可选的4 正则表达式字符。正则表达式的强大并不是来自于用字符串做模式，而是在模式中使用特殊字符。在大部分情况下这种特殊字符只是减少了您的输入次数(或是一种有效的记忆方法)，但在有些情况下，比如遇到匹配制表符和其他不能打印的字符时，这就很有用了。正则表达式搜索的模式就是RegExp对象... 阅59 转0 评0 公众公开 16-11-04 16:36 |
VBA Excel 高级筛选AdvancedFilter应用实例总结最近在网上找到了一些比较好的关于AdvancedFilter应用的例子，总结和分享如下：expression.AdvancedFilter(Action, CriteriaRange, CopyToRange, Unique)Action XlFilterAction 类型，必需。CriteriaRange Variant 类型，可选。CopyToRange Variant 类型，可选。Unique Varian... 阅2909 转19 评0 公众公开 16-10-30 20:52 |
VBA的LENB()和Excel的LENB()区别Q：VBA的LENB和工作表中的LENB函数有啥区别？VBA中的LENB函数则不同，由于VBA中有各种变量类型，当用LENB计算时，实际返回的是该类型变量所占用的字节数。Sub MyLenB()Dim MyStr1#, MyStr2&, MyStr3$MyStr1 = 123456789MsgBox LenB(MyStr1) ''返回8。如果想让vba的lenb返回结果与工作表lenb返回结果... 阅291 转0 评0 公众公开 16-10-30 00:24 |
使用东亚排序方法对区域或数据透视表进行排序；SortSpecial(SortMethod, Key1, Order1, Type, Key2, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, DataOption1, DataOption2, DataOption3)第一个排序字段，可为文本（数据透视表字段或区域名）或者为 Range对象（例如，“Dept”或Cells(1, 1)）。分别对数字和文本数据... 阅772 转6 评0 公众公开 16-10-23 17:02 |
对数据透视表、单元格区域或活动区域（如果指定区域仅包含一个单元格）进行排序。第二个排序字段，可为文本（数据透视表字段或区域名）或者为 Range对象。本示例对工作表 Sheet1 上的单元格区域 A1:C20 进行排序，用单元格 A1 作为第一排序关键字，用单元格 B1 作为第二排序关键字。本示例对工作表 Sheet1 上包含单元格 A1 的区域（活动区域）... 阅16169 转62 评0 公众公开 16-10-23 16:59 |
在Excel中用VBA进行自定义排序。Sub CustomSort2() ''用数组中的序列自定义排序 Application.AddCustomList ListArray:=Array("张梅", "黄中", "李秋霞", "应军军", "孙萍", "刘梅波", "李菲", "吴燕", "艾筱竹", "王佳")... 阅9038 转98 评0 公众公开 16-10-23 16:29 |
阅1346 转20 评0 公众公开 15-12-20 21:05 |
VB 中Enum语句应用Enum 不是函数，是一种自定义枚举数据 Long 类型Enum 内部的元素可以不赋值，vb 会使用默认数值：首元素为 0，后面一个比前面一个大 1可以这样：Public Enum InterfaceColors My0 = -1 My1 = 3 My2 = 3 My3 My4.End Enum则：My0=-1，My1=3，My2=3，My3=4，My4=5也可以这样：Public Enum InterfaceColors My0 My1 My2 My3 My4. 阅4942 转11 评0 公众公开 15-12-02 13:01 |
