Résultats de la recherche

Ok merci de tes réponses rapide est forte utiles, sa fonctionne, parfaitement. Là je peux passer en résolu:)

Autre questions si possible j'aimerais sélectionner plusieurs valeur différentes pour les copier dans ma feuille à la ligne: If .Cells(lig, 1) = "VA" Then J'aimerais inscrire en plus de "VA", d'autre caractère comme "CL", "EC" ect... Mais je ne sais pas comment inscrire cette suite de...

Petite question comment on valide une réponse pour clore la discussion?

Merci ton code m'a beaucoup aidé, j'y ai apporter quelque ajustement et cela fonctionne parfaitement merci encore Sub macopie() Dim Wb As Workbook If MsgBox("Avez-vous remplis des cellules en manuel?", vbYesNo, "Demande de confirmation") = vbNo Then 'ChDrive "S" 'ChDir "S:\XXX\XXX" rep =...

Bonjour a tous et merci d'avance pour l'aide que vous pourrez m'apporter. Voila mon problème, je cherche a faire une copie de donné depuis un classeur à aller chercher via GetOpenFilename, Voici la portion de code que j'ai mais à la ligne Set Plage = Sheets("Feuil1").Range("A4:A500") arrêt de...