Excel-VBA-Aufruf sub aus einem anderen sub mit mehreren Eingängen, Ausgängen in verschiedenen Größen

Ich nennen möchte eine sub aus einem anderen sub-innen im selben Modul. Der erste sub würde mein main-code und da würde ich rufen Sie die zweite Unterroutine. Zweite Unterprogramm erhält mehrere Eingänge als integer, double, double-arrays double-Matrizen. Die Größe des arrays und Matrizen sind bekannt und gespeichert in eine integer-variable. Der sub gibt auch mehrere Ausgänge. Also, ich möchte so etwas wie dies tun.

sub Main()
    Nc As integer
    Dim kij(1 To Nc, 1 To Nc), xi(1 to Nc), a1 As Double
    'I assign values to my variables from the excelsheet e.g. Nc=Cells(1,1) etc.

    CalculateA(Nc,kij, xi, a1, a)
    Cells(5,5)=a
end sub

sub CalculateA(Nc as integer,kij as matrix double, xi as array double, a as Double)
    a=0
    For i=1 To Nc
       For j=1 To Nc
          a = a + kij(i,j)*x(i)*x(j)
       Next j
    Next i
    a = a*a1
end sub

Woher weiß er, welcher sub ist der sub main, wo es beginnt zu laufen. Kann ich den sekundären sub auf der Oberseite und den code irgendwie beginnt unten Unterprogramm?

InformationsquelleAutor der Frage user2421555 | 2013-05-26

Schreibe einen Kommentar