Hello lvcha.gouqizi,


Dim myChanges() as Change

ReDim myChanges(20)
ReDim nextChanges(50)
ReDim prevChanges(50)

Dim i as integer

for i = 1 to 20
myChanges(i).nextChanges(50)Type Change
myChanges(i).prevChanges(50)Type Change
next i

In this line where do you define and assign the values to Index and
SubIndex
myChanges(index).nextChanges(subIndex) = ***

This line saves the changes to the Array's data held the last
dimension. Redim only affects the last dimension of an array. Other
indexes remain unchanged.
Redim preserve myChanges(index).nextChanges(subIndex)

Sincerely,
Leith Ross


--
Leith Ross


------------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...o&userid=18465
View this thread: http://www.excelforum.com/showthread...hreadid=480258