您的位置： 无忧文档所有分类 VBA教程

VBA教程

VBA使用技术教程简介

1. 前言：不要把VBA数组想的太神秘，它其实就是一组数字而已。

2. 数组的维数：

Sub 数组示例()

Dim x As Long, y As Long

Dim arr(1 To 10, 1 To 3) '创建一个可以容下10行3列的数组空间 For x = 1 To 4

For y = 1 To 3

arr(x, y) = Cells(x, y) '通过循环把单元格区域a1:c4的数据装进数组中 Next y

Next x

MsgBox arr(4, 3) '根据提供的行数和列数显示数组

arr(1, 2) = "我改一下试试" '你可以随时修改数组内指定位置的数据 MsgBox arr(1, 2)

End Sub

总结：二维是由行和列表示的数组，如ARR(3,2)表示数组中第3排第2列的元素。而一维数组只是由一个元素决定，如ARR（4）表示数组中第4个元素

3. 把单元格数据搬入内存：

一、声明：

Dim arr as Variant '声明一个变量，不能声明其他数据类型

Dim arr(1 to 10, 1 to 2 ) , 这种声明也是错误的，固定大小的VBA数组是不能一次性装入单元格数据

或：dim arr() 这种声明方式是声明一个动态数组，也可以装入单元格区域，构成一个VBA数组。

二、装入

arr =range("a9:c100") '装入很简单，变量 = 单元格区域

三、读出

装入数组后的单元格数值，可以按 数组名称(行数，列数) 直接读取该位置的值，如下面的代码。

Msgbox arr(3,2) '就可以取出搬过去的而构成的数组第3行第2列的内容

四、示例

第1页

你可能喜欢

  • VBA程序设计
  • Excel使用技巧大全(超
  • vba实例
  • VB基础教程
  • VBA数组
  • vb6.0高清教程系列
  • Excel_VBA对象
  • 批量打印

VBA教程的相关文档搜索

VBA教程相关文档

最新文档

返回顶部