Extraire le mot

nur -  
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

comment on peut extraire le mot "horizontal" dans une phrase " c'est une machine horizontal" en utilisant macro

merci d'avance


1 réponse

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 313
 
Bonjour,

Sub demo()
Range("A2").ClearContents
If Range("A1") Like "*horizontal*" Then
     Range("A2") = "horizontal"
Else
     MsgBox " le mot ""horizontal"" ne figure pas dans la cellule A1 "
End If
End Sub

0