XL 2016 Si une cellule contient un mot alors le copier dans une autre cellule

[Ragnarok001]

Bonjour,
Je cherche une formule, peut être applicable avec une MFC ou VBA,
par exemple, si la cellule A1 contient "*EXCEL*", alors je souhaite que cette cellule (toute entière) soit copiée en A9 et sinon pas d'action

J'ai essayé avec =IF(COUNTIF(A1;"*EXCEL*");A1;A9) mais en vain..

Si ça vous parle je suis preneur
Merci bp !!

 

[Phil69970]

Bonjour @Ragnarok001

Je te propose ceci à mettre en A9

=SI(A1="EXCEL";A1;"")

Si cela ne correspond pas à ta demande met un fichier représentatif de ta demande.

Merci de ton retour

@Phil69970

 

[job75]

Bonsoir Ragnarok001, bienvenuesur XLD, Phil69970,

Entrez en A9 =REPT(A1;ISNUMBER(FIND("Excel";A1)))

La casse sur "Excel" doit être respectée.

A+

 

[job75]

Bonjour le forum,

Si l'on veut aussi pouvoir modifier manuellement A9 il faut du VBA :

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False 'désactive les évènements
If [A1] Like "*Excel*" Then [A9] = [A1] 'la casse est respectée
Application.EnableEvents = True 'réactive les évènements
End Sub

La casse est respectée.

A+

 

[Ragnarok001]

Bonjour,

Tout d'abord, merci bp pour vos réponses,
je joins un exemple dans le 1er tableau excel joint dans ce fil, et je m'aperçois avoir fait une erreur dans mon pitch initial, en effet , si le mot Excel est compris dans une des cellules colonne A (nommée HN) alors copier/coller ou reporter toute la cellule dans la colonne I (nommée IP)

encore merci et bon aprem

 

[JHA]

Bonjour à tous,

Pas sur de tout comprendre mais peut-être avec un filtre avancé.

JHA

 

[Phil69970]

Bonjour à tous

Je te propose ce fichier

Le mot a chercher est en A1 (modifiable dans le code)

Merci pour ton retour

@Phil69970

 

[Ragnarok001]

merci à vous 2, je pense que je vais plutôt utiliser la version VBA, je vais mettre plus de temps à comprende ta version JHA mais je vais m'y pencher
merci encore !!

 

[Phil69970]

@Ragnarok001

La logique est de valider le post contenant la réponse que tu as choisi et non pas ton propre post car tu n'as rien trouvé du tout

@Phil69970

 

[Ragnarok001]

@Ragnarok001

La logique est de valider le post contenant la réponse que tu as choisi et non pas ton propre post car tu n'as rien trouvé du tout

@Phil69970

au temps pour moi !