Bubblesort...wie?

tremere

Grünschnabel
Ich soll per VBA eine Sortierungsschleife (algorythmus) machen, mittels Bubblesort. Da ich mich da leider nicht so auskenne, und dringend Hilfe brauche, hoffe ich, ihr könnt mir helfen. Ich habe schon bei SUCHE geschaut, doch das was ich da gefunden habe, funktioniert nicht.

In meiner Arbeitsmappe soll die Sortierung mittels klick auf einen Button ausgelöst werden, dann soll sich eine InputBox öffnen, wo man die zu sortierenden Zahlen eingeben soll, dann werden zufallszahlen in Spalte A ausgespukt ab A1!
Nun soll er, wie ja bekannt von unten nach oben sortieren. Ich weiß, der ist nicht der schnellste Sortierungsalgorythmus, doch ich soll das mit dem machen, ist für INformatik aus der Schule. Ich hoffe ihr könnt mir helfen, und ich hoffe ebenfalls, da ich kein VBA Fachchinesisch beherrsche, dass ihr mir trotzdessen helfen könnt.

hier ein vermeindlicher, aber falscher ansatz (hier sind die zahlen nicht zufällig, glaube ich, und in einer begrenzten zahl)

For i = 1 To 22
For j = 22 To (i + 1) Step -1
If Array(i) > Array(j) Then
hilf = Array(i)
If Array(i) = Array(j) Then
hilf = Array(j)
End If
End If
Next j
Next i

Hoffe auf hilfe, cu
 
hi, danke für den link, doch leider hilft mir das nicht speziell auf mein problem wieter, bzw. ist das denke ich noch viel komplizierter, als das was ich wollte...
 
Hi,

1. Erklär bitte mal genau was du sortieren willst? Textdatei, Zahlen, Text?
2. Für welche Applikation soll das Tool sein?

Gruß Dignsag
 
Zurück