Discussion :

[Veronique45]

Bonsoir à tous,
Est ce que quelqu'un aurait un code pour une macro qui me permettrait de chercher un mot dans les colonnes D,E,F,G,H,I et de pouvoir eventuellement le supprimer ....
J'ai une macro de recherche, mais je ne sais pas la modifier ...
Merci d'avance ...

[Invité]

Bonjour

J'ai une macro de recherche, mais je ne sais pas la modifier ...

Ce serait bien que tu la mettes sur le forum (en oubliant pas les balises).

Car au lieu d'avoir un code tout fait, tu apprendras comment modifier un code existant, ce qui sera beaucoup plus formateur pour l'avenir

Philippe

[leyeno]

exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Dim a as Integer
Dim mot as String
 
mot="patate"
a=0
For a=0 To 25 
if (Range("F1").offset(a).Value= mot) Then 
Range("F1").offset(a).Clear 
End if
Next a

Voila cela te permet de rechercher dans ta colonne F (de F1 a F25) ton mot et si il est trouvé, d'effacer le contenue de ta cellule.

[Invité]

Bonjour,

Je pense qu'il manque quelque chose dans votre macro Leyeno.

Ce code fonctionne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub Essai()
Dim a As Integer
Dim mot As String
 
mot = "patate"
 
For a = 0 To 24
 
        If Range("F1").Offset(0, a).Value = mot Then
        Range("F1").Offset(0, a).Clear
        End If
 
Next a
End Sub