\u2014David, me dis-je en me regardant droit dans les yeux (oui, je me parle \u00e0 moi-m\u00eame et <\/em>je me regarde dans les yeux), la situation est grave mais pas d\u00e9sesp\u00e9r\u00e9e \u00e0 ce point-l\u00e0. Apr\u00e8s avoir repris conscience, suite \u00e0 un auto-\u00e9tranglement rageur, pouss\u00e9 par mon insatiable curiosit\u00e9, ainsi que par la promesse d\u2019une tasse de th\u00e9, je me suis fait un script sur mesure qui :<\/p>\n\n C\u2019est une macro VBA test\u00e9e uniquement dans Word 2013, sous Windows. Pour que \u00e7a fonctionne, Calibre<\/a> doit \u00eatre install\u00e9 (test\u00e9 avec la version 1.10) car c\u2019est lui qui se charge de cr\u00e9er les ebooks (pourquoi pas r\u00e9inventer la roue et le fil \u00e0 couper le beurre, tant qu\u2019on y est ?).<\/p>\n\n Sub ExportDoc() <\/p><\/blockquote>\n\n Edit :<\/strong> le script au format TXT<\/a><\/p>\n\n Pour le lancer, il suffit de s\u00e9lectionner tout le texte de votre fichier (ctrl+a), ou seulement la section que vous souhaitez relire, et d\u2019ex\u00e9cuter la macro\u2026 Je vous sugg\u00e8re de lui assigner un raccourci clavier et de l\u2019ajouter \u00e0 la barre d\u2019acc\u00e8s rapide dont je ne cesserai jamais de dire \u00e0 quel point elle est pratique.<\/p>\n\n Comme je l\u2019ai d\u00e9j\u00e0 dit : \u00e7a me semble une fa\u00e7on acceptable de relire et annoter mon manuscrit sur une tablette\u2014notez que je ne parle pas de le r\u00e9\u00e9crire de fond en comble : je ne me vois pas faire \u00e7a sur une tablette, de toute fa\u00e7on.<\/p>\n\n Mais il y a un autre int\u00e9r\u00eat \u00e0 la chose : en le lisant comme un epub\/mobi, sur une tablette ou une liseuse, je vais lire mon roman exactement dans les m\u00eames conditions que mon (tr\u00e8s hypoth\u00e9tique) lecteur. C\u2019est pas mal, pour savoir si on a r\u00e9ussi \u00e0 \u00e9crire une histoire qui donne envie de tourner les pages, ou de faire d\u00e9filer l\u2019\u00e9cran, pour paraphraser le maitre incontest\u00e9 en tournage de pages : Stephen King\u2014t\u2019as vu comme je me greffe \u00e0 l\u2019actualit\u00e9 du moment ? Trop fort. <\/p>\n\n Je peux facilement imaginer aussi filer cet ePub \u00e0 mes beta lecteurs (enfin, si j\u2019en ai), et leur demander de me renvoyer uniquement leurs annotations.<\/p>\n\n Bref, c\u2019est une exp\u00e9rience \u00e0 tenter. Et le script me permet de le faire sans me prendre la t\u00eate. Et sans quitter Word.<\/p>\n\n Surement un paquet. Je ne vais vraiment commencer \u00e0 l\u2019utiliser, et voir si c\u2019est viable, que dans les jours qui viennent.<\/p>\n\n En plus de \u00e7a, mon but n\u2019est pas de faire un ebook destin\u00e9 \u00e0 la publication mais un fichier que je puisse (faire) lire sur tablette ou liseuse, pour corriger mon manuscrit : je me fiche des petits probl\u00e8mes \u00e9ventuels de mise en page. On notera quand m\u00eame que Calibre fait un assez bon boulot, pour pour peu que l\u2019on utilise correctement les styles dans Word.<\/p>\n\n <<\/p>\n\n p>Edit:<\/strong> Sur le m\u00eame sujet, Exporter les commentaires d\u2019un fichier Word<\/a><\/p>\n","protected":false},"excerpt":{"rendered":" Pr\u00e9ambule O\u00f9 je plante le d\u00e9cors et explique au lecteur stup\u00e9fait ce que je fais et le but de mon petit script. J\u2019\u00e9cris un roman, dans Word sous Windows. J\u2019aimerais pouvoir lire et annoter le manuscrit sur mon iPad, vautr\u00e9confortablement … Read more →<\/a><\/p>","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[13,12],"tags":[102,21,109,26,83],"class_list":["post-14984","post","type-post","status-publish","format-standard","hentry","category-ebooks","category-trucs-et-astuces","tag-ebooks","tag-ecriture","tag-trucs-et-astuces","tag-windows","tag-word"],"_links":{"self":[{"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/posts\/14984","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/comments?post=14984"}],"version-history":[{"count":3,"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/posts\/14984\/revisions"}],"predecessor-version":[{"id":15004,"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/posts\/14984\/revisions\/15004"}],"wp:attachment":[{"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/media?parent=14984"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/categories?post=14984"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.davidbosman.fr\/blog\/wp-json\/wp\/v2\/tags?post=14984"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}
\u2014C\u2019est vrai, j\u2019ai qu\u2019\u00e0 acheter une Surface 2, y a Word dessus !
\u2014Trop ch\u00e8re. En plus, t\u2019as d\u00e9j\u00e0 command\u00e9 le nouvel iPad mini.
\u2014Ouais, t\u2019as raison\u2026 Mais y a Word dess\u2026
\u2014Oublie Word et fais attention, STP. Sur ton iPad, tu peux facilement lire des ebooks, ePub et Mobi, non ? Et tu sais que tu peux aussi tr\u00e8s facilement les annoter ?
\u2014Oui, et alors ? me suis-je dis \u00e0 moi- m\u00eame.
\u2014Et alors<\/em> ? Seigneur, aidez-moi \u00e0 ne pas me donner de baffes\u2026 Comment tu les fais, tes ebooks, andouille ?
\u2014Dans Calibre, depuis un fichier Word.
\u2014Et\u2026
\u2014Et ? Ben\u2026 heu\u2026 \u00e7a marche bien !
\u2014Ouiiiii. Et\u2026 ? Tu vois o\u00f9 je veux en venir ?
\u2014Non, mais je veux bien un th\u00e9.
\u2014Gnnnnn<\/em>. Imagine un instant que \u00e7a soit automatis\u00e9.
\u2014Le th\u00e9 ?
\u2014Mais non ! La cr\u00e9ation d\u2019ebook ! Tu veux que je t\u2019\u00e9trangle, ou quoi ?
\u2014Non.
\u2014Donc, avec un script, tu aurais un nouvel ePub\/Mobi qui serait envoy\u00e9 sur ta tablette chaque fois que tu sauvegarderais ton manuscrit dans Word, ou chaque fois que tu le d\u00e9ciderais. L\u00e0, tu piges ?
\u2014\u2026 Non.
\u2014Tu pourrais lire et annoter ton ebook sur la tablette, puis r\u00e9cup\u00e9rer tes annotations pour travailler sur l\u2019ordi. Et tu serais toujours s\u00fbr d\u2019avoir la derni\u00e8re version.
\u2014Aaaah. Oui. C\u2019est une bonne id\u00e9e. Mais pour le th\u00e9, alors ?<\/p>\n\n
‘
‘ Macro to create an epub\/mobi from a copy of the active docx
‘ Save in a folder: ie, SkyDrive or Dropbox.
‘ So, you can read (and annotate) an epub\/mobi of you current manuscript
‘ from any tablet with SkyDrive\/Dropbox or whatever
‘ Download latest version: http:\/\/davidbosman.fr<\/a>
‘
‘
‘Get doc’s title from its metadata:
MyTitle = ActiveDocument.BuiltInDocumentProperties(“Title”).Value
‘Saving actual doc.
‘Copy selection from active doc to pasteboard
‘create new doc, paste selection and
‘save it as a new DOCX file in a temp folder on c: drive
‘To be clear: there won’t be any change made to the original doc
ThisDocument.Save
Selection.Copy
Documents.Add DocumentType:=wdNewBlankDocument
Selection.PasteAndFormat (wdPasteDefault)
Selection.HomeKey Unit:=wdStory
ActiveDocument.BuiltInDocumentProperties(wdPropertyTitle) = MyTitle
ActiveDocument.SaveAs2 FileName:=”C:\\export\\draft.docx”, _
FileFormat:=wdFormatDocumentDefault
‘Close the new docx and run Calibre CLI to convert it to epub and mobi,
‘in my case, files are saved into SkyDrive folder
‘–page-breaks-before=””\/\/h:h2″” insert a page break before Level 2 title,
‘change to h1 to insert the break before each level 1, and so on.
‘Change path with your user name and desired output folder:
ActiveDocument.Close
Shell “ebook-convert C:\\export\\draft.docx C:\\Users\\David\\SkyDrive\\draft.epub –page-breaks-before=””\/\/h:h2″””, vbHide
Shell “ebook-convert C:\\export\\draft.docx C:\\Users\\David\\SkyDrive\\draft.mobi –page-breaks-before=””\/\/h:h2″””, vbHide
End Sub
<\/p> ![\"Sans](\"http:\/\/davidbosman.fr\/blog\/wp-content\/uploads\/2013\/11\/Sans-titre_thumb.jpg\" "\\"Sans")
<\/a><\/p>\n\nTu peux me r\u00e9expliquer \u00e0 quoi \u00e7a sert ?<\/h2>\n\n
Il y a des limites ?<\/h2>\n\n