Contenu récent par mmalzert

  1. M

    XL 2013 Valeur de la frequence max avec l'objet Dictionnary

    En effet ça sort les mêmes résultats. Pour le coup je ne connaissais pas cette fonction. Merci JB.
  2. M

    XL 2013 Valeur de la frequence max avec l'objet Dictionnary

    Merci pour ces précisions et pour votre aide. Bonne fin de journée.
  3. M

    XL 2013 Valeur de la frequence max avec l'objet Dictionnary

    Bonjour à tous les deux, @BOISGONTIER Merci pour ton lien. Pour tout dire je suis sur ton site depuis ce matin en tentant de voir quelle partie pourrait m'être utile. J'avais effectivement vu ces deux exemples. Mais je suis incapable d'adapter. @job75 Merci pour ton code. J'ai adapté et ça...
  4. M

    XL 2013 Valeur de la frequence max avec l'objet Dictionnary

    Bonjour le Forum, Je cherche à récupérer la valeur correspondant à la fréquence max d'une clé (je ne sais pas trop comment l'expliquer autrement). Je voudrais utiliser l'objet Dictionnary mais je bute dessus. On va dire que j'arrive à adapter le code à mes besoins mais dans le cas présent, je...
  5. M

    XL 2013 Création d'une demande d'envoie de email lors de l'enregistrement d'un fichier excel

    Bonjour Guilda, A voir si ça correspond à ce que vous souhaitez. 1. Si votre enregistrement se fait en VBA, alors vous ajoutez ce code à la suite : If MsgBox("Voulez vous envoyer par mail ?", vbYesNo, "Demande de confirmation") = vbYes Then 'nom de la macro qui envoie le mail...
  6. M

    Insertion de données d'un fichier A dans un fichier B

    Bonjour Meylan, Ci joint un essai. A voir si cela vous suffit. Chaque mois vous devez tout de meme copier coller vos données dans l'onglet Donnee à la suite en complétant la colonne mois et en recopiant vers le bas la formule de la colonne Clé. Pour récupérer les données du mois 4 il vous faut...
  7. M

    XL 2013 VBA - Concatener lignes ordre alphabétique sur 5 colonnes

    Bonjour Dranreb, C'est parfait ! Merci beaucoup.
  8. M

    XL 2013 VBA - Concatener lignes ordre alphabétique sur 5 colonnes

    Bonjour le forum, Je cale sur un problème peut etre basique mais je ne trouve rien sur le net qui pourrait m'aider. Je cherche - en vba - à concatener plusieurs colonnes selon un tri alphabétique. Je pensais à : extraire les 5 colonnes concernées les transposer les trier croissant les...
  9. M

    XL 2013 Accélérer une macro dictionnary

    Re, bonjour Nicole Et la rapidité est là. Merci. Je vais regarder la différence avec ce que j'avais fait pour comprendre. A quoi sert la fin du code ? [M2].Resize(UBound(tablo)) = Application.Index(tablo, , 13) Range("M" & UBound(tablo) + 2 & ":M" & Rows.Count) = "" 'RAZ en dessous Je fais...
  10. M

    XL 2013 Accélérer une macro dictionnary

    Je viens de modifier la macro. Par contre je ne sais pas si c'est le top comme code. J'aurais voulu aussi avoir la formule directement dans la macro plutot que de repartir de la formule en m2.
  11. M

    XL 2013 Accélérer une macro dictionnary

    Bonjour job75, Non je ne me rends pas bien compte et c'est pour cette raison que je pose la question. Dans un 1er temps j'avais fais avec selection.autofill qui était plus rapide. Mais je me suis dit que ça serait plus propre avec un dico. (J'ai adapté de ce fil...
  12. M

    XL 2013 Accélérer une macro dictionnary

    Bonjour le forum, Je viens de créer cette macro qui met 20 secondes à s’exécuter (environ 11000 lignes) Sub Copie_NbVoyages() Application.ScreenUpdating = False Sheets("Data ligne").Select tablo = Range("A2:M" & Range("A" & Rows.Count).End(xlUp).Row) Set dico =...
  13. M

    XL 2013 VBA - concatener selon critères

    Re, Merci pour cette anticipation. Par contre dans l'exemple je n'avais mis qu'un seul expéditeur. De fait j'en ai plusieurs et les clés générées sont plutôt nombreuses. En pièce jointe un nouvel exemple pour illustrer mon problème. L'ajout que tu as fait pour les totaux et écarts est ok sur un...
  14. M

    XL 2013 VBA - concatener selon critères

    Merci pierrejean, C'est parfait.
  15. M

    XL 2013 VBA - concatener selon critères

    Re pierrejean, Je ne vois pas de modification. As-tu mis le bon fichier ? Oui en effet le prix doit être à 200. Les MeF pourraient passer mais je ne sais pas toujours moi meme quel montant est correct. Dans l'exemple ca reste simple. Je suis en train de construire une BDD avec les tarifs...