Question

我有一个整数数组（dfArray），并希望创建一个新的第二个String数组，它由整数组成，并在开头附加“G”。最好的方法是什么？我在考虑For Each但却无法让它发挥作用。提前致谢。

Set dfArray = [dff]
Set dfArray2 = ["G" & dff]  'incorrect but you get the idea?

Answer 1

Dim dfArray() As Variant
Dim dfArray2() As String

dfArray = [dff].Value

ReDim dfArray2(UBound(dfArray)) As String

Dim i As Double

For i = 1 To UBound(dfArray) Step 1
    dfArray2(i) = "G" & dfArray(i, 1)
Next i

无论如何，从我个人的角度来看，我不喜欢只在需要的时候将一个完整的Range作为数组。我更喜欢使用Lbound或Ubound循环并始终控制数组。要将范围设置为数组，您需要将Array变量设置为Variant类型，并且您不能轻松使用Preserve。查看此问题以获取更多信息

Issues about Variant Arrays

从另一个创建一个新的String Array

1 个答案: