[ Ερωτήματα ] Πρόβλημα με Right(Trim(tenant), InStr(1, RTrim(tenant), " "))

[anestaki]

Καλησπέρα σε όλους
Με τον παρακάτω κώδικα προσπαθώ να δημιουργήσω μηνύματα SMS αλλά το Right
Δεν μου επιστέφει σωστά τα ονόματα:
Καλησπέρα ΗΣ ΓΙΩΡΓΟΣ, Καλησπέρα ΜΗΧΑΛΗΣ, Καλησπέρα ΠΟΥΛΟΣ ΚΩΣΤΑΣ
Επίσης θα ήθελα να μάθω εάν υπαρχή τρόπος να αφαιρεθεί το τελικό (Σ).
Σας ευχαριστώ εκ των προτέρων Γιώργος

=[timer] & " " & Right(Trim([tenant]);InStr(1;RTrim([tenant]);" ")) & 
" Έχουν εκδοθεί τα κοινόχρηστα του μήνα" & " " & [olog] & "υ" & " " & 
"και είναι " & Calculate_sum_expenses([mhnas1];[etos1];[id];[heating]) & "€"