Contenu récent par bof

  1. B

    XL 2010 Fonction Id existe

    Bonjour, Plus simplement : Function No_Existe(quoi$) As Boolean No_Existe = Application.CountIf(Range("Tb[No_Id]"), quoi) End Function Attention il y a de nombreux espaces parasites colonne 1 soit au début soit en fin de chaine : cela risque de donner des résultats aléatoires... A+
  2. B

    XL 2016 Classe défectueuse

    Bonjour, Ben, j'ai également vu ce type de réponse sur d'autres conversations. Si tu as d'autres solutions à proposer sur la base du fichier joint, je suis près à étudier ta solution ! A+
  3. B

    XL 2016 Classe défectueuse

    Oui c'est ce que j'avais vu dans d'autres conversations... Bon pas grave. Je n'utilisais ces autres évènements que pour vérification. Ça m'aura au mois permis de découvrir qu.qu. chose ! Merci.
  4. B

    XL 2016 Classe défectueuse

    Bonjour, Yaka la décocher : j'utilise pas mal de références qui me sont utiles dans pas mal de projets... A+
  5. B

    XL 2016 Classe défectueuse

    Bonjour, Ma classe est bancale mais je ne comprend pas pourquoi : Je n'arrive pas à lui faire digérer autre chose que l'évènement Change : Je précise que j'ai aussi essayé en externalisant la création des boutons dans Module1 mais le résultat est identique. Ou est le loup ? Merci. A+
  6. B

    XL 2019 echeance de paiements

    Bonjour, Pour moi un prévisionnel trésorerie c’est d’abord une base de données qui recense toutes les factures et les dates d’échéance. Une feuille avec une quinzaine de colonnes (une par mois) ou mieux une cinquantaine qui dispatche ces échéances semaine par semaine. Il faut indiquer ta...
  7. B

    XL 2016 Difficultés pour extraire des données d'une BDD et autres petits détails !!!

    Bonjour, Ce n'est qu'un avis mais la BD suffit amplement puisqu'un seul filtre te permet de visualiser les mêmes informations que sur toutes autres. Dupliquer les données ne fera que multiplier tes soucis de coordination entre toutes les feuilles. Il sera temps si cela s'avère vraiment...
  8. B

    Microsoft 365 actualisation cube olap et vba

    Bonjour, Wait : surement par glop ! Par contre je verrai bien un petit coup de DoEvents A+
  9. B

    Microsoft 365 aide sur macro pour une asso

    Mais NON ! Tu lis ce que je t'écris ? Auparavant ce que tu avais fait dans ctrl_inscription a été mémorisé. Tout se qui se trouve dans base_inscriptions_helloasso est alors versé dans ctrl_inscription et écrase l'existant. Puis ce qui a été mémorisé de ton travail précédent est alors restitué...
  10. B

    Microsoft 365 aide sur macro pour une asso

    Non mais ce que tu m'envoies n'a aucun rapport avec le classeur du début ! L'onglet ctrl_inscription est vide et les colonnes ont changé La macro est prévue pour ajouter des lignes à l'onglet ctrl_inscription, tout ce que tu supprimes ne sera pas remis à jour. Comprend bien : Tout se qui existe...
  11. B

    Microsoft 365 Afficher une image dans usf

    Si j'ai bien compris ... Un modèle de liste de paramètres à compléter et je verrai pour adapter le UserForm.
  12. B

    Microsoft 365 Afficher une image dans usf

    Alors on parle d'un autre sujet. Si tu modifie des ateliers et des types d'équipement en fonctions des ateliers ça peut se discuter mais il faut en dire plus. Expliquer quels ateliers portent des blouses blanches et des gantes et lesquels ont des bleus et des chaussures de sécurité... Alors oui...
  13. B

    Microsoft 365 Afficher une image dans usf

    Ça nécessite rien du tout : Je n'ai pas touché à la feuille info. Ça nécessite seulement que vos images soit nommées comme moi avec les 3 derniers chiffres de la référence : 112, 113... Quand tu cliques sur le combo le programme lit la référence dans le TextBox à coté donc il sait quelle image...
  14. B

    Microsoft 365 aide sur macro pour une asso

    Comment ça n'incrémente pas ? Tu veux dire que ça ne rajoute pas les nouvelles lignes ? Moi je n'ai pas de problème : J'ai rajouté 2 lignes à mon csv et elle sont bien importée.
  15. B

    Microsoft 365 aide sur macro pour une asso

    Bonjour, Essaie comme ça : Private Sub CommandButton2_Click() Dim wkb As Workbook, sh As Worksheet, Arr, ArrC nf = Application.GetOpenFilename("Fichiers Csv,*.csv") If Not nf = False Then Set sh = ThisWorkbook.Sheets("base_inscriptions_helloasso") ArrC =...