Contenu récent par mromain

Bonjour onyirimba, Une solution en formule matricielle (à valider avec <Ctrl> + <Maj> + <Entrée>) ...

Re bonjour, @patricktoulon, Ton code du post #21 fonctionne normalement, mais tu utilises une MsgBox native. Comme je le disais dans mon précédent message : Si dans ton code je remplace MsgBox par Msg.Box (pour utiliser le composant de Dudu), alors le même problème précédemment décrit...

Re bonjour, Je suis allé voir dans le VBA quelle valeur tu affichais dans le TextBoxPrompt du formulaire en mettant un point d'arrêt. Aucun souci avec une simple MsgBox En re-regardant, là la MsgBox s'est bien affichée. Je me suis aperçu que : Si la fenêtre est sur mon écran principal, ta...

Bonjour patricktoulon, Effectivement, avec le Application.Trim la MsgBox affiche bien l'ensemble du message. A+

Bonjour à tous, Voici le résultat : <WindowCaptionDetails.xlsm - 2> 57 69 6E 64 6F 77 43 61 70 74 69 6F 6E 44 65 74 WindowCaptionDet 61 69 6C 73 2E 78 6C 73 6D 20 20 2D 20 20 32 ails.xlsm - 2 Par contre, chez moi ta MsgBox a un souci, j'ai dû bidouiller pour trouver le...

Bonjour Dudu2, Lolote83, Hecatonchire, le forum, Chez moi, c'est aussi - (Microsoft 365, version 2505). Voici une bidouille qui a l'air de fonctionner : Sub test Dim sep As String With ThisWorkbook If .Windows.Count = 1 Then MsgBox "Une seule fenêtre." Else...

Bonsoir Manu Bores et bienvenue sur le forum, Voici un essai à adapter. L'étape pathExcelFile est à adapter avec l'emplacement du fichier source : let pathExcelFile = "C:\...\Etat_Recouvrement-Perso.xlsx", SourceExcelFile = Excel.Workbook(File.Contents(pathExcelFile), null, true)...

Bonjour Kristelle1555, le forum, Tu trouveras ci-joint une base de solution avec PowerQuery. Si tes données changent, il faudra actualiser les données (onglet Données > Actualiser tout) pour mettre à jour les vues. Sinon, d'un point de vue subjectif, je trouve que le fichier a à redire : tu...

Bonjour @Rheeem, le forum, Je te fais totalement confiance sur ce point là, je ne maitrise pas du tout. Même si elle est faillible, la solution de Pierre Fauconnier fonctionne bien sur les quelques tests que j'ai fait et sur les exemples du classeur fourni. Après, je serais curieux (et très...

Bonjour à tous, Il est possible de définir un modèle par défaut pour les nouveaux classeurs Excel (équivalent au Normal.dotm de Word). Pour ce, il faut enregistrer le modèle Excel nommé Classeur.xltx dans le dossier C:\Users\<Utilisateur>\AppData\Roaming\Microsoft\Excel\XLSTART (le nom du...

Re-bonjour, @Alstroemeria Qu'est-ce qui ne fonctionne plus ? Les formules renvoient une erreur ? Elles renvoient 0 ? Dans le fichier exemple que tu as fourni au post #1, le Niveau est un texte et non un nombre. Est-ce toujours le cas dans ton fichier réel ? @sylvanu Ta proposition VBA du post...

Bonjour Alstroemeria, sylvanu, le forum, Une solution sans colonne supplémentaire avec la fonction MAP disponible sur Microsoft 365 : =SOMME(MAP($A$2:$A$890;LAMBDA(c;SI(ET(DECALER(c;1;0)*1<=c*1;c="2";DECALER(c;0;2)=2024);1;0)))) A+

Bonjour @Rheeem, le forum, En fouinant le code je m'étais aperçu de ça oui. J'ai fait une autre version se passant totalement des API. Elle génère le contenu d'un fichier svg qu'il reste ensuite à écrire dans un fichier et importer en tant qu'image. Cette nouvelle version devrait donc être plus...

Bonjour Christophe et bienvenue sur le forum, Tu trouveras une solution ci-dessous. Je n'ai pas utilisé les Scripts Office que je ne connais pas, mais PowerQuery pour récupérer les données du fichier csv et les envoyer vers un graphique croisé dynamique. Pour l'utiliser, il faut renseigner...

Bonjour oguruma, le forum, Ci-dessous une autre solution : Sub MakeDirP(hPath As String) Shell "cmd /c mkdir """ & hPath & """" End Sub A+