如何将值数组分配给Excel VBA中的范围

Question

我正在为一堆列创建列标题。我想在下面这样做 - 但我无法正确使用语法。有人可以帮忙吗？

Range("AB1:AE1").Value = ("UnitPriceUSD","TotalCostUSD","UnitPrice", "TotalCost")

Answer 1

试试这个。

Dim arr As Variant
arr = Array("UnitPriceUSD", "TotalCostUSD", "UnitPrice", "TotalCost")

Range("AB1:AE1").Value = arr

甚至更简单：

Range("AB1:AE1").Value = Array("UnitPriceUSD", "TotalCostUSD", "UnitPrice", "TotalCost")