Bonjour à toutes et à tous
J'ai trouver le code suivant qui me permet d'importer les valeurs des cellules d'un tableau vers un autre,
en triant en fonction d'un critère de champs.
.Range("$A$3:$U$103").AutoFilter Field:=6, Criteria1:="VTT"
.Range("A4:D104").Copy
Sheets("Paraphes").Range("AW11").PasteSpecial Paste:=xlPasteValues
.Range("J4:J104").Copy
Sheets("Paraphes").Range("AZ11").PasteSpecial Paste:=xlPasteValues
le problème est que si dans
"critérial
" il n'y a pas "VTT" par exemple alors le code importe tout le tableau.
est il possible de mettre une condition "if then" qui permettrait de garde la fiche vierge en cas d'absence d'un critère ?
Merci d'avance pour votre aide.