VBA - Feldberechnung basierend auf anderen Feldern

Hi :)

ich steh seit geraumer Zeit auf dem Schlauch was meine Feldberechnung angeht. Dabei möchte ich ein neues Feld aktualisieren, anhand von Inhalten in einem anderen Feld.
Ich habe schon viel nachgeschaut und probiert, habe auch Lösungsansätze gefunden, die sich mit der gleichen Sache beschäftigen, nur irgendwo scheine ich bei der Syntax in vba was falsch zu machen.

Folgendes Problem:

Ich habe ein Feld Hoehe und ein Feld Alter. Je nachdem, was im Feld Alter steht, soll er mir über die Feldberechnung von mir festgelegte Werte einfügen.

Mein Code dazu sieht so aus:

dim abis As Short
dim hoeh As Short

abis = [Hoehe]
hoeh = [ALT_BIS]

if abis >= 100 then
hoeh = 15

elseif abis < 100 then
hoeh = 17

end if

Dieser wird jedoch nicht berechnet. Ich bekomme einen Error mit dem Hinweis "Expected end of statement".

Hat da vielleicht jemand eine Lösung?

Grüße und vielen Dank im Voraus :)