Dieses Beispiele zeigen, wie man eine Aufgabe umständlich lösen kann - auch
wenn's einfacher geht... Gut - da es um Beispiele für Programmierung geht, macht
das natürlich Sinn.
Wir haben hier ein Beispiel für die Rekursion. Der als Spaltenbezeichner
übergebene String wird in seine einzelnen Elemente zerlegt und die Funktion
ColNumRec entsprechend häufig durchlaufen. Der Zähler iLevel ist beim ersten Aufruf
der Funktion 0 und wird bei jedem durchlauf um 1 erhöht. Erreicht er die Länge
des Strings, wird die Funktion beim nächsten Aufruf ohne weitere Aktion verlassen.
Anschließend werden die durchlaufenen Funktionen beendet und dabei der Spaltenzähler
ColNumRec um die jeweiligen Ergebnisse kumulativ addiert.
Für alle, die es nicht so kompliziert mögen - eine codezeile reicht für diese Aufgabe
aus:
MsgBox ColNumRec=Columns("IV").Column