Min und Max bestimmen
29.05.2007 13:03:03
julia
Ich versuche hier gerade aus mehreren Zahlen das Minimum bzw. Maximun zu bestimmen, es sieht aber so aus, dass VBA alleine das nicht schafft. Oder Gibt es hier doch ein Trick?
Es sie so aus:
Sub max()
Dim i%, n%, x#()
n=6
ReDim x(n)
For i=1 To n
x(i)=Cells (1, 1+i)
Next
'Debug.Print max(x(i)), min(x(i))
'das klappt natürlich so nicht, wie soll man hier vorgehen?
Danke in Voraus
End
Sub