# Excel VBA 數組：帶示例的動態多維類型 > 原文： [https://www.guru99.com/vba-arrays.html](https://www.guru99.com/vba-arrays.html) ## 什么是 VBA 陣列？ 數組定義為能夠存儲多個值的存儲位置。 這些值都必須具有相同的數據類型。 假設您要在單個變量中存儲自己喜歡的飲料列表，則可以使用數組來實現。 通過使用數組，可以使用相同的名稱引用相關值。 您可以使用索引或下標來區分它們。 各個值稱為數組的元素。 它們從索引 0 到最高索引值是連續的。 本教程假定您正在使用 Microsoft Excel 版本 2013。該知識仍然同樣適用于其他版本的 Microsoft Excel。 在本 VBA 編程教程中，您將學習- * [數組的優點是什么？](#2) * [數組的類型](#3) * [如何在 Excel VBA 中使用數組](#4) * [測試我們的應用程序](#5) ## 數組的優點是什么？ 以下是數組函數提供的一些好處 1. 將邏輯上相關的數據分組在一起-假設您要存儲學生列表。 您可以使用單個數組變量來為學生類別（例如，更親切的花園，小學，中學，高中等）分配不同的位置。 2. 數組使編寫可維護代碼變得容易。 對于相同的邏輯相關數據，它允許您定義一個變量，而不是定義多個變量。 3. 更好的性能–定義數組后，檢索，排序和修改數據的速度就會更快。 ## 數組類型 VBA 支持兩種類型的數組： * **Static** – These types of arrays have a fixed pre-determined number of elements that can be stored. One cannot change the size of the data type of a Static Array. These are useful when you want to work with known entities such as the number of days in a week, gender, etc. **例如**：Dim ArrayMonth（12）作為字符串 * **Dynamic** – These types of arrays do not have a fixed pre-determined number of elements that can be stored. These are useful when working with entities that you cannot predetermine the number. **例如**：Dim ArrayMonth（）作為變量 **聲明數組的語法** **靜態數組** 聲明 **STATIC** 數組的語法如下： ``` Dim arrayName (n) as datatype ``` **此處，** | **代碼** | **動作** | | 昏暗的 arrayName（n）數據類型 | 1. 它聲明了一個名為 arrayName 的數組變量，大小為 n，數據類型為。 大小是指數組可以存儲的元素數。 | **動態數組** 聲明 **DYNAMIC** 數組的語法如下： ``` Dim arrayName() as datatype ReDim arrayName(4) ``` **HERE,** | **Code** | **Action** | | 昏暗的 arrayName（）數據類型 | 1. 聲明了一個名為 arrayName 的數組變量，但未指定元素數 | | ReDim arrayName（4） | 2. 它在定義數組后指定數組大小。 | **陣列尺寸** 數組可以是一維，二維或多維。 * **一維**：在這一維中，數組僅使用一個索引。 例如，每個年齡段都有許多人。 * **二維**：在此維度中，數組使用兩個索引。 例如，每個班級有許多學生。 它要求班級數和每個班級的學生人數 * **多維**：在此維度上，數組使用兩個以上的索引。 例如，白天的溫度。 （30，40，20）。 ## 如何在 Excel VBA 中使用數組 我們將創建一個簡單的應用程序。 此應用程序使用數組變量中的數據填充 Excel 工作表。 在此示例中，我們將執行以下操作。 * 創建一個新的 Microsoft Excel 工作簿并將其另存為 Excel Macro-Enabled Workbook（* .xlsm） * 將命令按鈕添加到工作簿 * 設置命令按鈕的名稱和標題屬性 * 對填充 Excel 工作表的 VBA 進行編程 讓我們逐步進行這項練習， **步驟 1 –創建一個新工作簿** 1. 開啟 Microsoft Excel 2. 將新工作簿另存為 VBA Arrays.xlsm **步驟 2 –添加命令按鈕** **注意**：本部分假定您熟悉在 excel 中創建接口的過程。 如果您不熟悉，請閱讀教程 [VBA Excel 表單控件& ActiveX 控件](/vba-operators.html)。 它將向您展示如何創建界面 1. 將命令按鈕添加到工作表  2. 將名稱屬性設置為 cmdLoadBeverages 3. 將標題屬性設置為“加載飲料” 您的 GUI 現在應如下所示  **步驟 3 –保存文件** 1. 單擊另存為按鈕 2. 選擇 Excel 啟用宏的工作簿（* .xlsm），如下圖所示  **步驟 4 –編寫代碼** 現在，我們將為我們的應用程序編寫代碼 1. 右鍵單擊“加載飲料”按鈕，然后選擇查看代碼 2. 將以下代碼添加到 cmdLoadBeverages 的 click 事件中 ``` Private Sub cmdLoadBeverages_Click() Dim Drinks(1 To 4) As String Drinks(1) = "Pepsi" Drinks(2) = "Coke" Drinks(3) = "Fanta" Drinks(4) = "Juice" Sheet1.Cells(1, 1).Value = "My Favorite Beverages" Sheet1.Cells(2, 1).Value = Drinks(1) Sheet1.Cells(3, 1).Value = Drinks(2) Sheet1.Cells(4, 1).Value = Drinks(3) Sheet1.Cells(5, 1).Value = Drinks(4) End Sub ``` **HERE,** | **代碼** | **動作** | | 細線飲料（1 到 4）作為琴弦 | * 它聲明了一個名為 Drinks 的數組變量。 第一個數組索引為 1，最后一個數組索引為 4。 | | 飲品（1）=“百事可樂” | * 將值 Pepsi 分配給第一個數組元素。 其他類似的代碼對數組中的其他元素執行相同的操作。 | | Sheet1.Cells（1，1）.Value =“我的最愛飲料”。 | * 將值“我的最愛飲料”寫入單元格地址 A1 中。 Sheet1 引用該工作表，而 Cells（1,1）引用第 1 行和第 1 列（B） | | Sheet1.Cells（2，1）.Value = Drinks（1） | * 將索引為 1 的數組元素的值寫入第 1 列的第二行。 | ## 測試我們的應用程序 選擇開發人員選項卡，并確保“設計模式”按鈕為“關閉”。 指示符是，它將具有白色背景，而不是彩色（綠色）背景。 （見下圖）  單擊加載飲料按鈕 您將獲得以下結果  下載包含以上代碼的 Excel [下載上面的 Excel 代碼](https://drive.google.com/uc?export=download&id=0ByI5-ZLwpo25NVJIV2ZBRTJSNms) **摘要** 1. 數組是一個能夠存儲多個值的變量 2. VBA 支持靜態和動態數組 3. 與聲明邏輯上相關的數據的許多變量相比，數組使編寫可維護的代碼更容易。