VBA : Balayer chaque ligne d'une colonne

Question

Bonjour, 

Je souhaite balayer chaque ligne d'une même colonne et effectuer une action en fonction de ce qui apparait dans la chaîne de caractère lue.

J'ai un tableau sous Excel.

Je veux lire le texte de chaque ligne de la colonne D par exemple, et chaque fois que le mot "bonbon" apparaitra dans une cellule je remplirait la cellule d'à coté par "bonbon". 
(ie : colonne D ligne1 => "le bonbon de maman"       colonne E ligne 1 =>"bonbon"
       colonne D ligne 2 => "casse bonbon"                 colonne E ligne 2 =>" bonbon"
       colonne D ligne 3 => "bonjour"                           colonne E ligne 3 => " "

Je débute en VBA.
J'ai essayé plein de choses, je n'y arrive pas.

Si quelqu'un a une idée. Merci d'avance.


Configuration: Windows XP / Firefox 3.6.3

michel_m · Answer

bojour

dans ton balayage tu pourrais utiliser "like"
application.screenupdating=false 'fige le défilement de l'écran
for ligne=2 to 100
    if cells(ligne,"D") like "*bonbon*" then cells(ligne,"E")= "bonbon"
next

VBA : Balayer chaque ligne d'une colonne

1 réponse

Discussions similaires

Newsletters