seit ich etwas mehr mit Functions arbeite stelle ich sukzessive einige meiner häufig benötigten Codes daraufhin um. Heute Abend wollte ich eine Prozedur für die Sortierung von mehrdimensionalen Arrays auf das Function Prinzip umstellen. Der Code stammt im Original von Max Kaffl aus dem Jahr 2005. Einige von Euch werden ihn sicher kennen. In anderen Prozeduren habe ich es schon einmal geschafft, sie in eine Function umzuwandeln. Aber heute Abend bin ich nun gescheitert. Vielleicht mag sich der ein oder andere das Problem einmal ansehen. Im Modul modTest befindet sich eine einfache Prozedur, die ein Array mit Automarken und Nummern füllt. Dann wird über die Zeile arrAutomarke = ArrayMultiDimSorted(Array(2), arrAutomarke) die Function aufgerufen. Die Function läuft auch durch, nur ist das Array arrAutomarke danach nicht mehr existent LBound und UBound sind dann 0.
https://www.herber.de/bbs/user/73543.xls
Ich sehe nicht mehr durch und wäre froh einen Ansatz von außen zu bekommen.
Vielen Dank und Grüße, Andreas Hanisch