Résultats de la recherche

  1. anasimo

    Adapter l'utilisation de la macro à d'autres feuilles

    on peut combiner les 2 macros en une ?
  2. anasimo

    Adapter l'utilisation de la macro à d'autres feuilles

    je crois c bon...je vais vérifier. donc on dois garder les 2 macros c ça?
  3. anasimo

    Adapter l'utilisation de la macro à d'autres feuilles

    Désolé....je viens juste de voir votre PJ j'ai testé mais ça débug à ce niveau
  4. anasimo

    Adapter l'utilisation de la macro à d'autres feuilles

    oui ça marche la triple macro comme je l'ai fait...mais je trouve ça trop long comme macro...on peut par exemple supprimer les lignes qui se répètent inutilement et les doublons
  5. anasimo

    Adapter l'utilisation de la macro à d'autres feuilles

    par contre ce que je peux faire c'est ça tripler la macro :) Sub Alerte() Dim Ligne As Long, C As Range, Plage As Range, Tabl As Variant, I As Long, Teste As Boolean Dim Tot As Long With Sheets("Agr") Set Plage = .Range("J2", .Cells(.Rows.Count, 10).End(xlUp)) End With With...
  6. anasimo

    Adapter l'utilisation de la macro à d'autres feuilles

    Merci Sylvano J'ai rien compris :) et très très novice en VBA ... ce que je peux faire c'est copier la proposition et la coller dans la macro :)
  7. anasimo

    Adapter l'utilisation de la macro à d'autres feuilles

    bonjour J'ai déja 1 macro dans mon classeur qui me permet de vérifier s'il y a un nouveau utilisateur qui apparaît dans la feuille 2 "Agr" colonne J et qui ne figure pas dans la liste figurant dans la feuille "utilisateurs" colonne H. Le but est de le détecter et l'ajouter à la liste...
  8. anasimo

    Cacher les lignes sous conditions

    Merci beaucoup Jacku...c'est exactement ce que je veux. WTF....Merci pour la proposition, je crois que ça marche pas
  9. anasimo

    Cacher les lignes sous conditions

    Bonjour Je vous met en joint un fichier exemple....je voudrais que je choisi dans la cellule C7 option Math, il faut que les autres lignes PC, SVT et philos soient masquées.....et quand je choisis PC les autres lignes soient masquées Merci beaucoup...car ça va m'aider beaucoup dans un projet
  10. anasimo

    Pourcentage de dossier traités

    Merci infiniment jacky et excfl .....les deux cas marchent très bien
  11. anasimo

    Pourcentage de dossier traités

    Bonjour - Premièrement tu m'as fait savoir que tu réalisais un travail pour madame et en parallèle tu vas voir pour mon cas....et après j'ai reçu un MP de ta part que m'informant que pour mon cas le travail est assez difficile à réaliser.... je reprend ta phrase exacte, tu cites: "Mais en...
  12. anasimo

    Pourcentage de dossier traités

    Re y a t il un moyen de mettre ces formules présentes dans les cellules F3,4 et 5 sous forme de code à insérer dans la feuille en question ? pour que les formules ne soient pas visibles pas dans la barre de formule.... Merci
  13. anasimo

    Pourcentage de dossier traités

    vous parlez d'accord ? sioui le fichier joint n'est qu'un brouillon ....la feuille module n'est pas comme dans le fichier l'exemple Merci
  14. anasimo

    Pourcentage de dossier traités

    Merci beaucoup excfl et jacky .....ça marche très bien
  15. anasimo

    Pourcentage de dossier traités

    Bonjour Y a t il un moyen de connaitre le % de dossier traités....j'explique Dans mon tableau (feuille BD) j'ai à la dernière colonne (I) l'Etat des dossiers soit fermé soit encours Dans ma feuille Module je voudrais connaitre/afficher (cellule F5) le % de dossier traités (fermés) et dans...
  16. anasimo

    Ajouter un message box

    Bonjour Bruno....effectivement vous avez totalement raison. Votre code marche très bien. je l'avais copié dans le mauvais fichier. :)
  17. anasimo

    Ajouter un message box

    mais oui et c'est l'objet de ma demande :)
  18. anasimo

    Ajouter un message box

    la macro marche et je l'utilise depuis bien longtemps...je voulais juste ajouter le message comme option
  19. anasimo

    Ajouter un message box

    un truc comme ça que j'ai trouvé dans 1 macro (mais marche pas dans ce cas If Tot > 0 Then MsgBox Tot & " lignes supprimées" Else MsgBox "Pas de lignes supprimées" End If
  20. anasimo

    Ajouter un message box

    si j'ai fais un test.... 3 lignes supprimées sans génération de message