vba数组相加

VBA（Visual Basic for Applications）是微软Office套件中的编程语言，它允许用户自动化Excel等应用程序中的各种任务。在VBA中，数组是一种强大的数据结构，可以存储和操作多个值。数组相加是VBA编程中常见的操作之一，本文将详细介绍如何在VBA中进行数组相加。

VBA数组基础

在VBA中，数组可以是一维的，也可以是多维的。声明数组时，需要指定数组的维度和大小。例如，声明一个一维数组：

Dim myArray(1 To 5) As Integer

这将创建一个包含5个整数的一维数组。

一维数组相加

一维数组相加是最常见的情况，可以通过遍历数组中的每个元素，将它们相加到一个累加器变量中来实现。

Sub AddOneDimensionalArray()
    Dim numbers(1 To 5) As Integer
    Dim sum As Integer
    sum = 0 ' 初始化累加器

    ' 填充数组
    numbers(1) = 1 : numbers(2) = 2 : numbers(3) = 3 : numbers(4) = 4 : numbers(5) = 5

    ' 遍历数组并相加
    For i = LBound(numbers) To UBound(numbers)
        sum = sum   numbers(i)
    Next i

    MsgBox "数组的总和是："