[AccessD] OT: Passing an Array in VBA

Hello,

 

Sorry to bother with an Excel 2007 problem.

 

I try to pass an three-dimensional-array Werte(I, j. k) to a Procedure,
manipulate Werte() there. Then the manipulated Werte()-Array is passed again
to the main program.

 

My Code:

The main program

    Dim Werte(1 To 9, 1 To 42, 1 To 7) As Single

     ..

With Activesheet

    Select Case .Range("D" & "" & i + 1 & "").Value

        Case "ALICO"

            PopulateALICO Werte:=Werte, i:=1

        Case "ANTIGUA"

            PopulateANTIGUA Werte:=Werte, i:=1

         ...

    End Select

 

The called procedure

Sub PopulateALICO(ByRef Werte() As Single, i As Integer)

..

****************************************************************************
******

When I check in the main program, the array Werte() is still unmanipulated.

 

Saludos

Actuary Ralf Lister

La Paz, Bolivia

Registrado en ASFI

No. Registro: Act.Mat. 001

NIT: 1016725022

Skype Name: ralf.martin.lister

Tel.: 222 26 61, Cel. 70136531

rlister at actuarial-files.com

www.actuarial-files.com

Environment