Öhm, du machst das ganze sehr kompliziert
Wenn du den Text setzt, dann brauchst du kein Clear und anschließendes Add, da der Text so direkt ersetzt wird. Die Variable lMax brauchst du auch nicht, da du dich innerhalb einer Funktion befindest und somit die Variable Result zur Verfügung steht.
Und bzgl. dem variablen Tabellenname: Schau dir DeddyH's Funktion mal genauer an
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)