Effacer les cellules du dessous si condition remplie

Y compris Power BI, Power Query et toute autre question en lien avec Excel
P
PG59180
Membre habitué
Membre habitué
Messages : 106
Inscrit le : 21 janvier 2013
Version d'Excel : 2003

Message par PG59180 » 4 septembre 2017, 09:34

Bonjour à toutes est tous,

Pouvez-vous m'aider à modifier le code ci-dessous,

Il me sert à remplacer des mots clés par un mot spécifique.

Je souhaite y ajouter une portion de code qui me permettrait d'effacer le contenu de la cellule en dessous de laquelle on trouverait le mot recherché.
Columns("B:M").Select
Selection.Replace what : ="HBO*", Replacement:="AAB", lookat:=xlPart,_
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False,_
ReplaceFormat=False
Merci beaucoup pour votre aide
U
U. Milité
Membre impliqué
Membre impliqué
Messages : 1'558
Appréciations reçues : 88
Inscrit le : 30 novembre 2016
Version d'Excel : Office 365

Message par U. Milité » 4 septembre 2017, 11:39

Bonjour,

Ce que tu utilises là, c'est un Rechercher-Remplacer ... Quand tu fais cette manipulation "à la main", tu ne disposes pas d'options supplémentaires qui permettraient de modifier le contenu d'une autre cellule ... En VBA, c'est pareil: il n'y a pas de "portion de code" que tu puisses ajouter.

Il faut donc t'y prendre autrement! La bonne nouvelle est que c'est sans doute possible ... mais le mieux serait de fournir un fichier représentant les données que tu dois traiter (le contenu des autres colonnes peut être supprimé ou modifié). Précise aussi le volume à prendre en considération: 200 lignes ou 500.000 ?
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message