Résultats de la recherche

  1. dionys0s

    Fonction LAMBDA et jours fériés

    dionys0s a soumis une nouvelle ressource: Fonction LAMBDA et jours fériés - Obtenir la liste des jours fériés de l'année, savoir si une date est fériée En savoir plus sur cette ressource...
  2. dionys0s

    Microsoft 365 [Résolu] VBA : bizarrerie création de fichier .zip

    Bonjour le forum, via divers recherches (ici notamment), j'ai la fonction suivante qui me permet de créer une archive vide : Public Function Create(ByVal ZipFileFullName As String) As Shell32.Folder Dim FileNumber As Long Let FileNumber = VBA.FreeFile Open ZipFileFullName For Output As...
  3. dionys0s

    Microsoft 365 Appliquer mise en forme conditionnelle sur plage variable

    Bonjour le forum, pour l'exemple, j'aimerais mettre en forme la prochaine ligne d'un tableau, c'est à dire la ligne située sous la dernière ligne d'un tableau (ListObject). J'utilise donc la formule DECALER pour définir une plage nommée : Puis je définis ma MFC avec l'assistant : Sauf qu'en...
  4. dionys0s

    Microsoft 365 Liste de validation : gestionnaire de noms avec la fonction UNIQUE()

    Bonjour le forum, J'ai un tableau de données et un tableau de choix. Dans le tableau de choix, je dois sélectionner une colonne du tableau de données, et ensuite sélectionner une valeur de la colonne demandée. Je cherche donc à obtenir la liste de validation des valeurs uniques en fonction de...
  5. dionys0s

    Microsoft 365 Projet verrouillé. Pas d'inputbox de mot de passe proposé

    Bonjour tout le monde, j'ai téléchargé un Add-in gratuit proposé par une entreprise (automateexcel). Bien entendu, le code d’icelui est verrouillé, mais ce que j'observe, c'est que quand j'essaie de le déverrouiller, il n'y a même pas de mot de passe proposé. Je crée moi-même des Add-ins...
  6. dionys0s

    XL 2013 VBA, liste des polices et pour chaque police, liste des styles

    Bonjour le forum, Je souhaite rédiger une procédure qui parcourt toutes les polices installées, et pour chacune de ces polices, qui parcourt tous les styles disponibles. Et ces styles ne sont pas forcément "Normal", "Italique", "Gras" et "Gras italique". La police "Times New Roman" a les...
  7. dionys0s

    XL 2013 VBA : tout le contenu d'une cellule est visible

    Bonjour le forum, je souhaite créer une fonction VBA qui permette de déterminer si tout le texte d'une cellule est lisible. Une fonction du genre AllTextIsVisible(ByRef Cell As Range) As Boolean, dont l'argument Cell est soit une cellule unique non fusionnée, soit une plage qui est une cellule...
  8. dionys0s

    Microsoft 365 VBA Microsoft 365 : MailItem.GetInspector.WordEditor

    Bonjour le forum, je poste dans la partie Excel puisque ce code est exécuté à partir d'un classeur Excel. Je suis passé tout récemment sur Microsoft 365, et un bout de code qui jusque là fonctionnait correctement ne fonctionne plus : Sub MacroSurOutlook(ByRef olApp As Outlook.Application, ByVal...
  9. dionys0s

    XL 2016 Application.Run sur une méthode de classe

    Bonjour le forum, j'aimerais savoir s'il est possible d'utiliser la fonction Application.Run() sur une méthode publique de classe. J'ai fait quelques essais, et si c'est possible, je ne trouve pas la bonne syntaxe. Merci d'avance !
  10. dionys0s

    Word VBA word : dupliquer paragraphe à la suite.

    Bonjour le forum, je me débrouille en VBA côté Excel mais je suis une buse totale dans Word. Je souhaiterais savoir comment copier coller un paragraphe entier (dont je connais l'index) et le coller à la suite (juste en dessous donc). D'avance merci pour votre aide !
  11. dionys0s

    XL 2013 VBA : modification du code (VBE) du classeur qui exécute le code [tordu]

    Bonjour le forum, Bonne année à tous ! 🥳 Pardon d'avance, c'est un peu long, j'espère que je vais réussir à être clair et limpide. J'utilise énormément les tableaux structurés (ListObject) pour mes projets. Je les trouve extrêmement pratiques. Bref. Et je passe mon temps à les modifier...
  12. dionys0s

    XL 2013 VBA (XL vers PPT) : copier un slide d'un ppt vers un autre et conserver la mise en forme

    Bonjour le forum, je m'arrache la tête sur ce sujet depuis un moment, et je n'y arrive pas. Je dois copier un certain nombre de slides d'une présentation source vers une nouvelle présentation (vierge et inexistante au début). Donc j'ouvre ma présentation source, je crée ma présentation cible...
  13. dionys0s

    XL 2013 VBA : comparaison de texte avec nombres immiscés à l'intérieur (TextAsNumber)

    Bonjour le forum je cherche à améliorer mon algorithme de tri rapide d'un tableau à une dimension, de telle sorte qu'il puisse trier correctement les chaînes de caractère qui contiennent des nombres. Pour le moment, le tableau {"10 blabla", "2 blabla", "1 blabla", "20 blabla"} après trié comme...
  14. dionys0s

    XL 2013 VBA : récupérer les valeurs de la liste déroulante du filtre automatique

    Bonjour le forum, je bute sur la chose suivante : j'aimerais récupérer la liste des valeurs proposées dans la liste déroulante d'une colonne de filtre automatique. Je précise qu'il ne s'agit pas seulement de mettre la liste des valeurs uniques d'un champ dans une liste (ça je sais faire), mais...
  15. dionys0s

    Microsoft 365 Trouver le nom du tableau structuré (ListObject) par formule

    Bonjour le forum, Mettons que j'ai un tableau structuré (Onglet Insertion - Tableaux - Tableau). J'aimerais savoir s'il est possible de bâtir une formule qui aurait comme unique paramètre une cellule du tableau, ou la ligne d'en-tête par exemple, et qui renverrait le nom du tableau. L'idée...
  16. dionys0s

    Microsoft 365 Declare Win32 / Win64

    Bonjour le forum, j'ai une fonction qui permet de lister le nom complet des imprimantes installées qui utilisent les fonctions suivantes : Private Declare Function RegOpenKeyEx Lib "advapi32" _ Alias "RegOpenKeyExA" ( _ ByVal hKey As Long, _ ByVal lpSubKey As String, _ ByVal...
  17. dionys0s

    XL 2016 VBA : Internet Explorer + upload de fichier

    Bonjour le forum, Dans le cadre de mon boulot, j'essaie de créer une macro permettant de faire de l'upload "en masse" de fichiers enregistrés sur mon disque dur. La méthode manuelle est classique : J'ai pour cela une page Intranet dédiée qui ne comporte qu'un bouton "Parcourir". On clique sur...
  18. dionys0s

    XL 2016 Rafraîchir la liste des onglets du classeur (LIRE.CLASSEUR(1))

    Bonjour le forum J'utilise la fonction LIRE.CLASSEUR(1) dans mon gestionnaire de noms pour obtenir la liste des onglets du classeur dans un tableau structuré. Mon problème est que lorsque que j'ajoute, supprime ou renomme un onglet, les noms affichés dans mon tableau ne changent pas. Je suis...
  19. dionys0s

    XL 2016 MFC : Doublons sur deux colonnes

    Bonjour le forum j'ai un onglet qui comporte un tableau (ListObject) avec juste deux champs (Nom et prénom par exemple). Je souhaiterais repérer par mise en forme conditionnelle (MFC) si des concaténations de nom + prénom existent en doublon, triplon etc. dans le tableau, mais sans ajouter de...
  20. dionys0s

    XL 2016 Verrouiller/déverrouiller projet VBA par macro

    Bonjour le forum J'ai un classeur dont l'accès au code est protégé par mot de passe. J'aimerais savoir s'il existe un moyen de déverrouiller et verrouiller le projet par macro. J'ai bien trouvé ce code pour la protection mais son exécution plante : Sub ProtectVBProject(WB As Workbook, ByVal...