RemBabar a écrit :
Bon,jour,
Rows(Selection.Row).Select
Mais évite de faire trop de sélection, cela ralenti le programme..
Je te conseille de faire l'insertion en une ligne
Rows(Selection.Row).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
RemBabar
Merci beaucoup, ça fonctionne parfaitement.
J'ai également une autre question, en fait j'ai un mot "bienvenue" dans plusieurs cellule mais je n'ai jamais le mot bienvenue seul, il est toujours accompagné. Par exemple en A2 j'ai "bienvenue à bord" or quand j'applique ma boucle, il ne trouveras jamais le mot bienvenue puisque il interprète la phrase entière.
Cela est-il possible de faire la recherche uniquement sur les premiers caractère de ma phrase donc sur les 9 premières lettres qui correspond au mot bienvenue ? J'ai cru voir qu'il y avait l'opérateur like mais je ne sais pas si cela est la bonne solution.
Merci
ActiveCell.Offset(i2) <> "bienvenue"