PETIT YANNICK
XLDnaute Occasionnel
Bonjour à tous,
Le fichier joint me permet de supprimer des données Provenant d'une base de données, en supprimant des lignes suivant 3 listes
2 listes sont constantes et une change suivant le choix de la listebox1 dans modules Traitement_Demande_Validation_Plan
L'étape 3 pose problème
Le fichier mouline et ne s'arrête jamais, je pense que cela vient de l'affectation des valeurs a contrôler T3 = Array(Sheets("Feuil1").Range("B500").Value)
1) Je supprime toutes les lignes contenant "SOLIDWORKS Part Document", "SOLIDWORKS Assembly Document", "STEP File", "Foxit PhantomPDF PDF Document", "Adobe Acrobat Document", "PDF", "xls", "xlsm", "xlsx" dans la colonne D
2) Je supprime ensuite toutes les lignes contenant VALIDE", "PROTO", "ETUDE", "BIBLIO", "OK", "VALIDE BIBLIO", "NOK", "NON DIFFUSE", "PILOT LOT", "ETUDE BIBLIO", "VALIDE (à déplacer en BIBLIO)" dans la colonne V
3) et enfin je souhaite supprimer les lignes ne contenant pas le résultat de la listbox1 dans la colonne W
Auriez vous une idée pour résoudre mon problème?
Merci d'avance de vos retours
Le fichier joint me permet de supprimer des données Provenant d'une base de données, en supprimant des lignes suivant 3 listes
2 listes sont constantes et une change suivant le choix de la listebox1 dans modules Traitement_Demande_Validation_Plan
L'étape 3 pose problème
Le fichier mouline et ne s'arrête jamais, je pense que cela vient de l'affectation des valeurs a contrôler T3 = Array(Sheets("Feuil1").Range("B500").Value)
1) Je supprime toutes les lignes contenant "SOLIDWORKS Part Document", "SOLIDWORKS Assembly Document", "STEP File", "Foxit PhantomPDF PDF Document", "Adobe Acrobat Document", "PDF", "xls", "xlsm", "xlsx" dans la colonne D
2) Je supprime ensuite toutes les lignes contenant VALIDE", "PROTO", "ETUDE", "BIBLIO", "OK", "VALIDE BIBLIO", "NOK", "NON DIFFUSE", "PILOT LOT", "ETUDE BIBLIO", "VALIDE (à déplacer en BIBLIO)" dans la colonne V
3) et enfin je souhaite supprimer les lignes ne contenant pas le résultat de la listbox1 dans la colonne W
Auriez vous une idée pour résoudre mon problème?
Merci d'avance de vos retours
Pièces jointes
Dernière édition: