copy 1 array to another array
 

Is there a function in VBA that will allow me to copy from 1 array to
another. I know that I can loop throught each element and assign 1 array to
the other. But I want to know if there's a faster way such array1 = array2.
Assume they both have the same size.

Thanks
M

copy 1 array to another array
 

Hi,

This works if it helps (you cannot assign to an array):

Sub a()

Dim array1(10, 10), array2() As Variant

For i = 1 To 10
For j = 1 To 10
array1(i, j) = i ^ j
Next j
Next i

array2 = array1

For i = 1 To 10
For j = 1 To 10
Debug.Print array2(i, j)
Next j
Next i
End Sub

"matelot" wrote:

Is there a function in VBA that will allow me to copy from 1 array to
another. I know that I can loop throught each element and assign 1 array to
the other. But I want to know if there's a faster way such array1 = array2.
Assume they both have the same size.

Thanks
M

copy 1 array to another array
 

With VB6 (XL2000 or later), use array1=array2, though the target array
cannot be dimensioned.

Option Explicit
Option Base 0

Sub testArrays()
Dim Arr1(2), Arr2()
Arr1(0) = 1: Arr1(1) = 2: Arr1(2) = 3
Arr2 = Arr1
MsgBox Arr2(2)
End Sub

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions

In article ,
says...
Is there a function in VBA that will allow me to copy from 1 array to
another. I know that I can loop throught each element and assign 1 array to
the other. But I want to know if there's a faster way such array1 = array2.
Assume they both have the same size.

Thanks
M

copy 1 array to another array
 

Just to add, for all versions incl. XL97 declare the target variable as a
non-array variant. In Tushar's demo change -

Dim Arr1(2), Arr2()
to
Dim Arr1(2), Arr2

Regards,
Peter T


"Tushar Mehta" wrote in message
om...
With VB6 (XL2000 or later), use array1=array2, though the target array
cannot be dimensioned.

Option Explicit
Option Base 0

Sub testArrays()
Dim Arr1(2), Arr2()
Arr1(0) = 1: Arr1(1) = 2: Arr1(2) = 3
Arr2 = Arr1
MsgBox Arr2(2)
End Sub

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions

In article ,
says...
Is there a function in VBA that will allow me to copy from 1 array to
another. I know that I can loop throught each element and assign 1 array
to
the other. But I want to know if there's a faster way such array1 =
array2.
Assume they both have the same size.

Thanks
M

copy 1 array to another array
 

Thanks for the response. That's what I need it.
BTW, what is the i^j? Is it supposed to be i power to j?

"Peter T" wrote:

Just to add, for all versions incl. XL97 declare the target variable as a
non-array variant. In Tushar's demo change -

Dim Arr1(2), Arr2()
to
Dim Arr1(2), Arr2

Regards,
Peter T


"Tushar Mehta" wrote in message
om...
With VB6 (XL2000 or later), use array1=array2, though the target array
cannot be dimensioned.

Option Explicit
Option Base 0

Sub testArrays()
Dim Arr1(2), Arr2()
Arr1(0) = 1: Arr1(1) = 2: Arr1(2) = 3
Arr2 = Arr1
MsgBox Arr2(2)
End Sub

--
Regards,

Tushar Mehta
www.tushar-mehta.com
Excel, PowerPoint, and VBA add-ins, tutorials
Custom MS Office productivity solutions

In article ,
says...
Is there a function in VBA that will allow me to copy from 1 array to
another. I know that I can loop throught each element and assign 1 array
to
the other. But I want to know if there's a faster way such array1 =
array2.
Assume they both have the same size.

Thanks
M