Zirkelbezüge/Rekursion

Von: Lorenz Hölscher
Stand: 10. Juni 2011
Anmelden um Kommentare zu schreiben

Rekursion in VBA-Funktionen

Rekursion ohne Ende

Das folgende Listing zeigt ein Beispiel für eine fehlerhafte Prozedur, die sich beliebig oft selbst aufruft.

Sub UnendlichTiefVerschachtelt()
	Static lngTiefe As Long

	Application.StatusBar = "Tiefe: " & lngTiefe
	lngTiefe = lngTiefe + 1
	UnendlichTiefVerschachtelt
End Sub

Dann meldet Excel irgendwann Nicht genügend Stapelspeicher und stoppt die Verarbeitung. In diesem Fall geschieht das erst nach über 5.800 Aufrufen, so dass es grundsätzlich eine gute Idee ist, per Statusbar anzuzeigen, woran die Prozedur gerade arbeitet.

Diese Seite ist für Mitglieder von akademie.de reserviert.

Möchten Sie die Mitgliedschaft 14 Tage kostenlos testen und den Beitrag komplett lesen?

Oder möchten Sie zunächst mehr über diesen Beitrag erfahren und die Leseproben sehen?

Ich bin bereits Mitglied
Jetzt Probemitglied werden
Ich kann in den 14 Tagen Probezeit formlos z.B. per E-Mail stornieren. Wenn ich das nicht tue, entscheide ich mich für ein