【excel数组怎么显示】“Excel-VBA”特殊-数组-03-数组和Excel单元格之间的读写

系统环境：Windows 10Excel:2016版

本系列介绍数组功能

今天，我们将讨论数组如何与Excel单元格传递信息，即数组如何读取单元格中的信息。数组信息写入Excel单元格的方式

第1部分：应用场景

有两份excel工作表。表1:excel读取。表2:写入数组、空表实现功能1、读取Excel中的信息：读取表1中的A1-C1单元格区域、分配数组arr1读取表1中的A2-C3单元格区域、分配给数组arr2实现功能2、数组由Excel表中的arr1写入表2中的A1-C1

图1 excel读取

第2部分：代码

Sub test1()

读取Excel数据

Set shtExcel=T('Excel读取')

Arr1=('A1:C1 ')

Arr2=('A2:C3 ')

阵列会写入Excel

Arr3=Array(1、2和3)

Arr4=array (array (4、5、6)、array (7、8、9))

转动

Arr5=Work(arr4)

Arr6=Work(arr5)

Set shtArr=T(“写入数组”)

(' A1 ')。Resize(1，3)=arr1

(' A2 ')。Resize(2，3)=arr2

(' E1 ')。Resize(1，3)=arr3

(' E2 ')。Resize(2，3)=arr4

(' E7 ')。Resize(1，3)=arr4(0)

(' E8 ')。Resize(1，3)=arr4(1)

(' E10 ')。Resize(2，3)=arr6

End Sub

图2执行程序

图3运行结果

第3部分：部分代码解释

Excel单元格将数据读取到数组中，如果将单元格区域分配给数组，则无论分配了值的第1行或第2行单元格是什么，该数组都是二维数组。通过Resize函数，首先是单元格区域单元格。请注意Resize(行、列数)，单元格构成矩形的左上角矩形区域，该数组必须是二维数组。否则，表2中的E2-G3区域(相应的代码(“E2”)。Resize(2，3)=arr 4；如果不成功，则返回多个#N/A)。如图4所示(更正前面句子错误)，每个元素可以旋转Work两次，以替换为实际的二维数组arr6。如果在本地窗口中查看两个数据(如图6所示)，则可以看到两种表示形式之间的差异。

图4 arr4

图5 arr6

上面，为了这次介绍的内容，下次见。

这篇文章在微信公众号Excel高效办公室的VBA上发行。排版和细节稍加修改，刊登在头条上