[kapetang]

Γιώργο, δεν ξέρω τι ακριβώς κάνει ο κώδικας.

Αν το 1/diam είναι η τιμή της συνάρτησης, δοκίμασε:

If node = "Εξ' ίσου" Then
Calculate_exp_part= 1 / diam
Exit function
Else
el_mm = "SELECT tbl_appartments.elevator_mm FROM tbl_appartments where id=" & app_id
End If

Επίσης θα πρέπει να μη είναι μηδενική η μεταβλητή diam .