VBA-Code zur Berechnung der Prüfziffer für Umsatzsteuer-ID

Hi Leute,
hat Jemand von euch das schon irgendwann einmal gemacht (Hoffe!!!), ich brauche das für die Schule machen gerade Access und ich kriege diesen gottverdammten Code nicht auf die Reihe. Ich habe anbei das Berechnungsschema von mehreren EU-Ländern als Word-Dokument beigefügt. Ich brauche es erstmal nur für Deutschland. Man muss da irgendeine MID-Funktion benutzen aber ich habe keine AHnung ich hoffe echt das Jemand das von euch schon mal gemacht hat, Danke schon mal im Voraus. Jungs und Mädels lasst mich bitte nicht hängen!!!