Change the end of first name (1 Viewer)

[Gasman]

It will be equal to whatever name you pass to the function?
Could just as easily be the LastName ?

 

[moke123]

In a standard module you create a function, like gasman suggested.

Public Function LastNameChar(strName as string) As String

Select case  Right(strName, 2)

case  "ος"
LastNameChar = Left(strName, Len(strName) - 1) & "υ"

Case  "ης"
LastNameChar = Left(strName, Len(strName) - 2) & "ου"

case else
LastNameChar =strName    'if there are no matching right 2 characters

end select

end function

Add whatever other cases you need between the select case and end select lines.

in your afterupdate event put

Me.txtFirstName = LastNameChar(Me.txtFirstName)

 

[mikekal]

Thank you all