Array zurückgeben

13/05/2011 - 16:22 von MI | Report spam
Hallo Zusammen,

wie kann man ein Array in einer Sub Prozedur bzw. an eine Funktion
übergeben und dort befüllen und an die aufrufende Prozedur zurückgeben
lassen? Hierzu hàtte ich einige Fragen.

1. Kann man das nur in einer sub prozedur machen oder auch in einer
Funktion
2. Welche wichtigen Punkte muss man hierbei beachten
3. Kann man diese Vorgehensweise irgendwo in Kompakt nachlesen
(Google: Zu viele Treffer)

Programm soll ungeführt wie folgt funktionieren:

Sub ArrayZurückGeben()
Dim arr() As String
Dim WSH As Worksheet
Set WSH = ThisWorkbook.Worksheets(1)
ReDim arr(0 To 9)
arr = Test1(WSH)
End Sub
Function Test1(WSH) As String
for i = 1 to 10
test(i) = wsh.cells(i,1)
next i
' Soll eine befülltes array an die aufrufenden prozedur zurückgeben
und zwar an arr()
End Function

Wenn möglich, soll dieses Array nicht PUBLIC sein.

Vielen Dank
 

Lesen sie die antworten

#1 Claus Busch
13/05/2011 - 16:33 | Warnen spam
Hallo MI,

schau mal hier rein und eigne dir zuerst einmal ein paar Grundkenntnisse
an:
ftp://ftp.fernuni-hagen.de/pub/pdf/...129911.pdf


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

Ähnliche fragen