{"id":5186,"date":"2024-11-18T20:46:38","date_gmt":"2024-11-18T19:46:38","guid":{"rendered":"https:\/\/www.ralentirtravaux.com\/le_blog\/?p=5186"},"modified":"2024-11-18T20:46:39","modified_gmt":"2024-11-18T19:46:39","slug":"ecrire-une-macro-avec-chatgpt","status":"publish","type":"post","link":"https:\/\/www.ralentirtravaux.com\/le_blog\/ecrire-une-macro-avec-chatgpt\/","title":{"rendered":"\u00c9crire une macro avec chatGPT"},"content":{"rendered":"<p><video width=\"320\" height=\"240\" controls><source src=\"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-content\/uploads\/2024\/11\/macro.mov\" type=\"video\/mp4\">Your browser does not support the video tag.<\/video><\/p>\n<p>L&rsquo;id\u00e9e est la suivante (et je me demande pourquoi je ne l&rsquo;ai pas eue avant) : je voulais que chatGPT m&rsquo;aide \u00e0 cr\u00e9er une macro pour Word.<\/p>\n<p>Et cette id\u00e9e est toujours la m\u00eame que je d\u00e9cline encore et encore (voir par exemple <a href=\"https:\/\/www.ralentirtravaux.com\/le_blog\/lia-pour-aider-non-pour-remplacer\/\">L\u2019IA pour aider, non pour remplace<\/a>)\u00a0:\u00a0comment utiliser l&rsquo;IA soit pour faire des choses que je sais faire, mais plus rapidement\u00a0? Ou encore\u00a0:\u00a0comment faire faire \u00e0 l&rsquo;IA des choses que je ne sais pas faire ou pas bien faire et qui font de celui qui passe commande une sorte de \u00ab power user\u00a0\u00bb\u00a0?<\/p>\n<p>Parce que oui, on peut utiliser ceci ou cela (par exemple, dans le cas qui nous pr\u00e9occupe, <a href=\"https:\/\/www.cartablefantastique.fr\/outils-pour-compenser\/le-plug-in-word\/\">le ruban du cartable fantastique<\/a>), mais ici, on fait les choses soi-m\u00eame ou \u2013 parce qu&rsquo;il y a contradiction \u2014 on voit comment l&rsquo;IA nous assiste dans le processus de cr\u00e9ation de fonctions taill\u00e9es sur mesure.<\/p>\n<p>Enfin, bref, je voulais qu&rsquo;en un clic, on puisse passer d&rsquo;un texte quasi illisible pour un \u00e9l\u00e8ve dyslexique en un texte d\u00fbment format\u00e9, c\u2019est-\u00e0-dire avec<\/p>\n<ul>\n<li>Une police sans serif<\/li>\n<li>Une taille de 14px<\/li>\n<li>Un interligne de 1.5<\/li>\n<li>Un espacement entre les caract\u00e8res de 0.5<\/li>\n<li>etc.<\/li>\n<\/ul>\n<p>La macro fait tout \u00e7a en un clic. Mieux encore, elle aide l&rsquo;enseignant qui ignorerait tout des subtilit\u00e9s \u00e9ditoriales \u00e0 rendre son document <i>dyslexic friendly<\/i>. Voici donc la macro, pour ceux que \u00e7a int\u00e9resse, et si vous n&rsquo;avez jamais utilis\u00e9 ou cr\u00e9\u00e9 de macros, rappelez-vous, chatGPT sera tr\u00e8s <i>heureux<\/i> de vous aider.<\/p>\n<pre><code class=\"language-JS\">\nSub FormatForDyslexia_WithFootnotes()\n    Dim para As Paragraph\n    Dim doc As Document\n    Dim style As Style\n    Dim footnote As Footnote\n\n    ' Associer le document actif\n    Set doc = ActiveDocument\n    \n    ' Modifier le texte principal\n    For Each para In doc.Paragraphs\n        If Not para.Range.InlineShapes.Count > 0 Then\n            para.Range.Font.Name = \"Arial\"\n            para.Range.Font.Size = 14\n            para.LineSpacingRule = wdLineSpaceExactly\n            para.LineSpacing = 2 * 12 ' Interligne de 2\n            para.Alignment = wdAlignParagraphLeft\n            para.SpaceBefore = 6 ' Espacement avant\n            para.SpaceAfter = 6 ' Espacement apr\u00e8s\n            para.Range.Font.Spacing = 0.5 ' Espacement des lettres\n        End If\n    Next para\n\n    ' Modifier les titres\n    For Each style In doc.Styles\n        If style.Type = wdStyleTypeParagraph Then\n            If style.NameLocal = \"Titre 1\" Then\n                style.Font.Size = 24 ' Taille du titre 1\n            ElseIf style.NameLocal = \"Titre 2\" Then\n                style.Font.Size = 20 ' Taille du titre 2\n            ElseIf style.NameLocal = \"Titre 3\" Then\n                style.Font.Size = 18 ' Taille du titre 3\n            End If\n        End If\n    Next style\n\n    ' Modifier les notes de bas de page\n    For Each footnote In doc.Footnotes\n        With footnote.Range\n            .Font.Name = \"Arial\"\n            .Font.Size = 12 ' Taille l\u00e9g\u00e8rement plus petite que le texte principal\n            .ParagraphFormat.LineSpacingRule = wdLineSpaceExactly\n            .ParagraphFormat.LineSpacing = 1.5 * 12 ' Interligne de 1,5\n            .ParagraphFormat.Alignment = wdAlignParagraphLeft\n            .ParagraphFormat.SpaceBefore = 3 ' Espacement avant chaque note\n            .ParagraphFormat.SpaceAfter = 3 ' Espacement apr\u00e8s chaque note\n        End With\n    Next footnote\n\n    ' Afficher un message de confirmation\n    MsgBox \"Le texte et les notes de bas de page ont \u00e9t\u00e9 format\u00e9s.\", vbInformation, \"Formatage termin\u00e9\"\nEnd Sub\n<\/code><\/pre>\n","protected":false},"excerpt":{"rendered":"<p>Your browser does not support the video tag. L&rsquo;id\u00e9e est la suivante (et je me demande pourquoi je ne l&rsquo;ai pas eue avant) : je voulais que chatGPT m&rsquo;aide \u00e0 cr\u00e9er une macro pour Word. Et cette id\u00e9e est toujours la m\u00eame que je d\u00e9cline encore et encore (voir par exemple L\u2019IA pour aider, non [&hellip;]<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[28,66,44],"tags":[],"class_list":["post-5186","post","type-post","status-publish","format-standard","hentry","category-education","category-ia","category-technologie"],"_links":{"self":[{"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/posts\/5186","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/comments?post=5186"}],"version-history":[{"count":13,"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/posts\/5186\/revisions"}],"predecessor-version":[{"id":5200,"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/posts\/5186\/revisions\/5200"}],"wp:attachment":[{"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/media?parent=5186"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/categories?post=5186"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ralentirtravaux.com\/le_blog\/wp-json\/wp\/v2\/tags?post=5186"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}