Contenu récent par fanch55

  1. fanch55

    XL 2019 Procédure VBA - Adresses absolues

    Bonjour à tous, Le post de @Staple1600 fonctionne parfaitement sur des formules ayant des adresses de base ou des Noms simples. En cas de formules faisant référence à des éléments de tableau structuré avec des crochets, le code devient destructif dans la mesure où le convertformula remplace...
  2. fanch55

    Microsoft 365 Récupérer les données suivant mois et années

    Bonjour, avec la formule traditionnelle que vous pouvez trouver partout sur internet, à condition de ne mettre que les mois et années en colonne G =SOMME.SI.ENS(Tableau1[Montant];Tableau1[Date];">="&DATE(ANNEE($G10);MOIS($G10);1);Tableau1[Date];"<="&FIN.MOIS($G10;0))
  3. fanch55

    XL 2016 VBA - Évènement TextBox_Enter() non géré en module de Classe

    Après différents tests avec le modèle cité, j'ai quand même des exits non pris en compte quand je change de page dans le multi-page .... 🙄
  4. fanch55

    Microsoft 365 Épurer les lignes vides d'une cellule puis fractionner la cellule en plusieurs lignes

    Salut à tous, Pour le Fun et les aficionados des macros : Sub Onglet3() Dim Line As Variant, Li As Variant Dim L As Integer Dim FSource As Worksheet, FTarget As Worksheet Set FSource = Sheets("Initial") Set FTarget = Sheets("Feuil2"): FTarget.Cells.Delete L = 1 For Each Line In...
  5. fanch55

    Microsoft 365 comment rendre l'affichage d'une cellule bien plus visible, lors du résultat d'une recherche dans un tableau.?

    Salut à tous, La méthode d'agir sur les polices et taille des colonnes sur une grande plage est assez destructrice et consommatrice de mémoire et de temps . Tel que c'est proposé, cela est une bonne idée si l'utilisateur se fout complètement de la mise en page et des largeurs de colonnes...
  6. fanch55

    XL 2016 VBA - Évènement TextBox_Enter() non géré en module de Classe

    Tous les Textbox ne font pas partie de la Classe, ceci explique peut-être cela ... ;) Sinon le dernier classeur que tu as fourni est pas mal mais il a un ti défaut: l'initialize parait ne pas prendre en compte l'état et si tu fais un Tab sur les Textboxs, on dirait que le code est un peu perdu...
  7. fanch55

    Microsoft 365 Afficher onglets quand toutes les questions sont répondues

    C'est contradictoire avec : Le classeur joint devrait être conforme à la dernière demande : ( en fait j'avais interprété la première demande en me disant qu'il fallait avoir tous les OUI pour afficher les autres feuilles ) A l'ouverture, on efface les colonnes OUI et NON et on produit un...
  8. fanch55

    XL 2016 VBA - Évènement TextBox_Enter() non géré en module de Classe

    Pas du tout, c'est celui que j'ai joint au Post#4
  9. fanch55

    XL 2016 VBA - Évènement TextBox_Enter() non géré en module de Classe

    Salut @patricktoulon , Ton code fonctionne correctement avec la souris, pas le clavier . 🤔 Celui que j'ai récupéré au post #2 semble fonctionner également au clavier 😶
  10. fanch55

    XL 2016 VBA - Évènement TextBox_Enter() non géré en module de Classe

    Saut @Dudu2, J'ai testé: https://codes-sources.commentcamarche.net/forum/affich-10062379-classe-de-textbox-et-evenements-exit-et-enter Cela semble fonctionner
  11. fanch55

    Microsoft 365 Afficher onglets quand toutes les questions sont répondues

    Il y a 2 colonnes qui selon moi devraient être toujours renseignées, à savoir OUI ou NON. Il est vrai que l'événement SelectionChange est un peu trop "inflexible" tel que codée ( je n'avais pensé qu'au clic souris ). Aussi , j'ai remplacé l'événement SelChange par un BeforeDoubleClick qui...
  12. fanch55

    Microsoft 365 Afficher onglets quand toutes les questions sont répondues

    Normalement, le classeur au #2 vérifie l'état à l'ouverture et ne donc plus produire de message .
  13. fanch55

    XL 2016 VBA - Impossible de trouver le nom d'un complément !

    Salut @Dudu2, Le Application.Addins(i).Title, peut-être ?
  14. fanch55

    Microsoft 365 Afficher onglets quand toutes les questions sont répondues

    Edit: codes corrigés car oubli du message à produire .... 😵‍💫 Bonjour, Le classeur avec macros ci-joint devrait répondre à votre demande . Dans le module "ThisWorkboook", le code ci-dessous s'exécute à l'ouverture du Classeur : Private Sub Workbook_Open() ' Appel de la Sub Is_Tout_Oui de la...
  15. fanch55

    Microsoft 365 Clavier virtuel: SelectionChange, empêche la répétition

    Bonsoir, Il n'existe pas d'autre méthode à ma connaissance . Vous pouvez simplifier cependant : Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.EnableEvents = False ' Pour éviter de boucler dans l'événement Select Case True Case Target.Count > 1 Case Not...