菜鸟谈VBA最最基础入门《原创》

louweilou · 发表于 2018-2-5 22:43

感谢分享楼主还上线吗

沧海一声笑NEW2 · 发表于 2018-2-7 05:09

现在看帖子，好想g版主。

ft4919226 · 发表于 2018-2-8 10:39

22、花名册分类(实例)
range(cells(i,1),cells(i,8))这样子里面使用变量是不行的。
要使用变量有两种方式：
range("A"&i, "L"&i)
range(cells(i,1).address,cells(i,8).address)
这个迷惑了好久才解决的

ching888 · 发表于 2018-2-8 17:04

chenyao868 发表于 2009-11-4 15:19
非常8错，整理下大家共同学习。

非常感激！！！！

ching888 · 发表于 2018-2-8 17:06

已下载，非常感谢！

xingjichaoren · 发表于 2018-2-10 11:09

ggsmart 发表于 2009-8-12 21:48
程序流程控制——Do While语句
===========================
Do While也是循环语句，它分为两种情况，一 ...

http://club.excelhome.net/forum. ... p;extra=#pid9413667
如上面帖子，前后判断条件，没有发现结果差异。请斑竹确认一下，谢谢。

ft4919226 · 发表于 2018-2-10 11:38

Application.WorksheetFunction
网上查一下意思，原来是可以调用工作表的函数

ft4919226 · 发表于 2018-2-10 13:54

数组arr()在赋值之后，是按横向排列的。[a1].resize(1,10) = arr
从a1单元格开始，一行，有10列的数据。
如果要变成纵向:Application.WorksheetFunction.Transpose(arr)。

ft4919226 · 发表于 2018-2-10 14:33

Dim arrInt(), arrStr(), arrSplit() As String
arrInt() = Array(1, 5, 3, 8) ' 使用Array不需要定义数组类型
arrStr = Array("张三", "李四", "王五", "赵六")
arrSplit = Split("apple,boy,cat,dog", ",") '使用Split要定义数组类型
[a1].Resize(1, 4) = arrInt
Range("a2:d2") = arrStr
Range("a3:d3") = arrSplit

ft4919226 · 发表于 2018-2-10 16:11

join函数只能对一维数组有效，对二维会出错
arr() = range("a1:c1")
这种赋值，数组会变成一个假二维数组
[a1] = arr(1)这种会报错，只能是[a1] = arr(1,1)

		自动登录	找回密码
密码			免费注册

菜鸟谈VBA最最基础入门《原创》

最新热点 /1