Excel VBA教程：使用一維陣列儲存資料並寫入Excel單元格

2021-03-11 06:00:08

Excel VBA中的一維陣列又被稱為清單，清單裡面的每個值都會對應著一個數組索引。

1、如何聲明一維陣列

Dim arr(5) As Integer

陣列的聲明和變數的聲明基本相似，都是使用Dim聲明。不同點就是陣列要加上()，需要指定長度的話要在()裡面寫上數字，不指定長度的就是動態陣列。

2、一維陣列的上標和下標

一維陣列的第一個成員的索引是0，也就是說一維陣列預設的下標是從0開始的。一維陣列的上標就是()裡面的數字，arr(5)的上標就是5.

3、一維陣列的賦值

需求：

將Excel表格第一列的課程名稱讀取出來，放入陣列中。

對應的VBA程式碼如下

Sub ss()

Dim arr(9) As Integer

Dim i As Integer

For i = 2 To 11

arr(i - 2) = Range("a" & i)

End Sub

Dim arr(9) As Integer 就是聲明一個上標為9的陣列（可以放10個成員）

For迴圈是遍歷獲取課程名稱單元格

arr(i - 2) = Range("a" & i)把迴圈出來的課程名稱賦值給到arr陣列成員

4、一維陣列資料寫入Excel單元格

需求

把arr陣列中儲存的課程名稱，寫入Excel表格d列，從d2單元格開始。

增加VBA程式碼如下

For i = 0 To 9

Range("d" & i + 2) = arr(i)

for迴圈是遍歷取arr陣列的值

Range("d" & i + 2) = arr(i)將遍歷的陣列的值賦值給到對應單元格。

執行後的效果如下

VBA中的一維陣列的基本用法暫時就說到這裡，你學會了麼？

~如果您喜歡的話，歡迎點贊+關注+留言哦，感謝您的支援！