Dernier mot d'une cellule - VBA

Hello les amis,

Comment peut on récupérer le dernier mot d'une cellule?

par exemple en Range("A1") j'ai "le pays" et je souhaiterais obtenir "pays"

ou si j'avais eu "au bord du lac", j'aurais souhaité avoir "lac",

Merci d'avance,

Salut Grizou,

avec la fonction Split.

Dim tTab
Dim sMot As String
'
sMot = Range("A1").Value
tTab = Split(sMot, " ")
'
[D1] = tTab(UBound(tTab))

A+

121splitmot.xlsm (16.94 Ko)

merci beaucoup ça marche