Contenu récent par fredl

  1. F

    XL 2021 bug "lib32" suite à passage à office 2021

    Je viens de tester : coooool, ça marche! Merci beaucoup Fred
  2. F

    XL 2021 bug "lib32" suite à passage à office 2021

    Je te remercie pour ta réponse. Effectivement, un USF répond également au besoin, mais j'avais cette solution fonctionnelle bien séduisante que je souhaitais pérenniser dans ma nouvelle version d'office.
  3. F

    XL 2021 bug "lib32" suite à passage à office 2021

    Merci wDog66 pour ce précieux conseil. Je rectifie donc de ce pas en espérant que cela aidera à la résolution de mon problème. Bonne journée. '=============================================================================================== ' !!!ATTENTION affiche les bouton oui/non/annulé si...
  4. F

    XL 2021 bug "lib32" suite à passage à office 2021

    J'ai rectifié le Private Declare Function en Private Declare PtrSafe Function, et maintenant cela bugge sur : (message d'erreur : "erreur de compilation : Incompatibilité de type")
  5. F

    XL 2021 bug "lib32" suite à passage à office 2021

    Bonjour, suite à recherche infructueuse sur le forum, je me permets de faire appel à vos lumières. Récemment passé à office 2021 (et donc de 32bit à 64 bit?), j'ai un ensemble de fonctions qui buggent comme celle ci dessous (msgbox qui permet de personnaliser le type de réponses possibles). Je...
  6. F

    XL 2016 Texte du bouton qui disparait après avoir cliqué dessus

    Bonjour à tous, je viens faire appel à vos lumières suite à recherche infructueuse sur le forum. J'ai régulièrement les textes de mes boutons qui "disparaissent"(plus visible) après que j'ai cliqué sur ces derniers. Cela donne l'impression que la taille du texte s'augmente de façon importante...
  7. F

    XL 2016 Ajouter planning Outlook un rdv(sans activer de reference "Microsoft Outlook object library xx.x"

    meerciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii trop fort ! Tu m'enlèves une sacrée épine du pied Au plaisir! Frederic
  8. F

    XL 2016 Ajouter planning Outlook un rdv(sans activer de reference "Microsoft Outlook object library xx.x"

    Bonjour à tous, je viens faire appel à vos lumières suite à recherche infructueuse sur le forum. dans la macro "AjoutRdvPlanningOutlook1" ci dessous, j'ajoute au calendrier Outlook un Rdv (Jour férié) L'inconvénient pour cette dernière est l'obligation d'activer la ref "Microsoft Outlook object...
  9. F

    XL 2016 Envoi mail Outlook plage de cellule (qui ne se déforme pas)

    Bonjour fanch55 et kiki29, merci pour vos retours. j'ai sauté sur la proposition de fanch55 qui est au top! yoyoyo... trop biennnnnnnnnnn! Vraiment merci pour votre aide! kiki29, je vais garder sous le coude les infos du site de Ron de Bruin qui me serviront vraisemblablement plus tard. A...
  10. F

    XL 2016 Envoi mail Outlook plage de cellule (qui ne se déforme pas)

    Bonjour à tous, Je reviens vers vous suite à recherche infructueuse dans le forum. je souhaite envoyer un Email via outlook dont le corps de message serait la plage A1:E47 du fichier joint qui contient une photo et un dessin. L'utilisation de "ActiveSheet.MailEnvelope" de la plage en question...
  11. F

    En soutien à Gérard (alias Job75)

    Bonjour, Bon courage et à bientôt! Frédéric
  12. F

    Microsoft 365 Rechercher Majuscule dans cellule

    Bonjour, pas de formule pour moi, mais quelques lignes de code vba (cliquer sur le bouton) Dis moi si cela te convient. cordialement Frédéric
  13. F

    Microsoft 365 Afficher une listbox si sélection dans une autre

    Bonjour, la réponse dans ton fichier (joint) Cela répond il à tes attentes? Cdt nb : je te laisse reorganiser l'esthétisme de ton UF que j'ai un peu massacré. Frédéric
  14. F

    XL 2019 recherche "coordonnées" d'un caractère dans une matrice alphanumérique

    la reponse dans le fichier joint (pas de fonction, mais petit code vba) Dis moi. Cdt frederic
  15. F

    XL 2010 Boucle for next macro vba

    Sub Nouvelle_gamme() Dim ValCherch Dim ValRemplace Dim Plage, Desti As Range 'Stop rafraichissement ecran Application.ScreenUpdating = False Dim f1, f2, f3 As Worksheet Set f1 = Sheets("BD"): Set f2 = Sheets("Nouvelle_gamme"): Set f3 = Sheets("Liste_recherche") f1.Select 'Définition de la...
Retour