convertir en lots des fichiers doc en docx Fermé

Question

Bonjour, 
Sur mon ordinateur j'ai à la fois des fichiers word avec l'extension doc et avec l'extension docx. Je voudrais convertir tous mes fichiers doc en docx. Je sais convertir un par un mes fichiers de doc en docx, mais je voudrais pouvoir le faire pour plusieurs fichiers à la fois. 
Merci,
Cordialement,

eljojo_e · Answer

Bonjour,

tu créer un nouveau fichier .txt, tu écrit ça :


echo off
cls

ren *.doc *.docx



ensuite tu remplace l'extension de ce fichier ".txt." par ".bat"

tu place ce fichier dans le dossier où il y a tes fichier à modifié et tu clique sur ce ".bat"


ren *.doc *.docx-> ca veu dire renomme tout les ".doc" en ".docx" en gardant leur nom.

exemple : a.doc   devient    a.docx

Cordialement,

malapprenouf · Answer

Oui, j'avais essayé de renommer par lots et j'ai vu que cela ne marchait pas. 
Cordialement,
malapprenouf

m@rina · Answer

Bonjour,

Tu peux le faire par macro :

Tu crées une macro qui convertit un fichier et te l'enregistre sous le format docx :

Sub conversion()
Dim nom As String
nom = ActiveDocument.Name
With ActiveDocument
    .Convert
    .SaveAs2 FileName:=nom & "x", FileFormat:=wdFormatXMLDocument, CompatibilityMode:=14
    .Close
End With
End Sub

puis tu utilises la batchmacro pour appliquer cette macro à tous tes documents. J'ai mis la batchmacro est ici :

https://faqword.com/index.php/word/faq-word/vba-solutions/688-comment-executer-sur-une-serie-de-fichiers-une-macro-creee-pour-un-seul-fichier

Mais à ma connaissance, la macro n'écrasera pas l'ancien fichier doc. Il te suffira ensuite de supprimer les doc.

m@rina

malapprenouf · Answer

Merci Marina, mais je ne sais pas comment faire ce que tu indiques. Je savais faire une macro très simple, en enregistrant les manoeuvres pas à pas, comme dans photoshop pour les scripts, mais ça je ne sais pas le faire.
Y-aurait-il une macro plus simple ?
malapprenouf

malapprenouf · Answer

Bonjour Marina,
La macro que tu m'as indiquée, qu'est-ce que je fais avec ? j'écris sur un document word 
"Sub conversion()
Dim nom As String
nom = ActiveDocument.Name
With ActiveDocument
    .Convert
    .SaveAs2 FileName:=nom & "x", FileFormat:=wdFormatXMLDocument, CompatibilityMode:=14
    .Close
End With
End Sube "
Je ne crois pas que je l'écrive sur un document word, n'est-ce pas ?
Cordialement,
malapprenouf

eriiic · Answer

Bonjour,

regarde ici pour afficher le ruban Développeur.
Ensuite tu ouvres l'éditeur VBE et tu colles le code dedans.

eric

malapprenouf · Answer

Merci !
Demain je vais m'atteler à créer cette macro. Je vous dirai si j'y suis arrivée. 
Bonne soirée,
malapprenouf

malapprenouf · Answer

J'ai essayé de créer cette macro, de télécharger la batchmacro et j'ai eu des messages d'erreur :erreur d'exécution 4605, pas possible d'ouvrir ce fichier, etc.
J'ai alors essayer de créer une macro pas à pas (en me plaçant dans word, enregistrer une macro / ouvrir un fichier word en doc dans un dossier / l'enregistrer sous docx/fermer le fichier). Cette macro l'a fait pour un fichier et pas pour tous les fichiers du dossier. 
Auriez-vous une idée pour faire une macro à la main, en indiquant avec la souris les actions que l'on veut faire, et qui marche pour tous les fichiers d'un dossier ?
Cordialement,
malapprenouf

Convertir en lots des fichiers doc en docx

8 réponses

Discussions similaires