Recherche efface ligne - VB/VBA/VBS - Programmation
Marsh Posté le 27-10-2007 à 11:36:35
RE BONJOUR
EN FAISANT CETTE MODIF CA MARCHE Super
A = Sheets("modiffiche" ).Range("E10" )
Sheets("base" ).Activate
For Each ligne In Range("A5:A8000" )
If ligne = A Then
ligne.EntireRow.ClearContents
AIGLON74
Marsh Posté le 27-10-2007 à 08:36:30
BONJOUR A TOUS
Le but de ma macro et le suivant
Recherche dans la colonne A la ligne dans la page nome base
Dont le résultat correspond à la cellule E 10 de la page modiffiche
Et effacer le contenu de cette ligne
Voici ma séance
problème elle n’efface pas le contenu de la ligne juste la cellule dans la colonne A
A = Sheets("modiffiche" ).Range("E10" )
Sheets("base" ).Activate
For Each ligne In Range("A5:A8000" )
If ligne = A Then
ligne.ClearContents
Par avance merci
AIGLON74
Message édité par Elmoricq le 27-10-2007 à 11:36:07