Forum |  HardWare.fr | News | Articles | PC | Prix | S'identifier | S'inscrire | Aide | Shop Recherche
778 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Diviser un gros document Word en plusieurs Word unique (1200 pages)

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Diviser un gros document Word en plusieurs Word unique (1200 pages)

n°2334110
nicolasmey​er
Si je peux aider...
Posté le 28-05-2019 à 15:50:24  profilanswer
 

Bonjour,
 
j'aimerais trouver une solution pour découper un gros fichier word qui comprend 1200 pages à l'intérieur, afin que je puisse sortir non pas un fichier qui comprend les 1200 pages, mais 1200 documents word (en fait séparé).
 
Le contraire, c'est facile, mais ce que je veux, je ne trouve pas.  
 
J'ai essayé via VBA, mais ça me sort 3 pages par document (1 page avec le haut de page, 2eme page avec le bas de page, et une 3eme page avec rien dedans),
j'ai essayé aussi avec l'application Kutools for Word (ça marche bien), mais ça prend beaucoup beaucoup beaucoup trop de temps (d'après mes calculs, au moins 1 semaine de traitement pour la division des 1200 pages).
 
Bien entendu, je veux trouver une solution automatisée.
 
Avez-vous une idée à mon problème que je galère depuis 2 semaines?  :pt1cable:  :pt1cable:  :hello:  
 
Merci par avance, cher spécialiste..

mood
Publicité
Posté le 28-05-2019 à 15:50:24  profilanswer
 

n°2335261
daniel-12
Posté le 15-06-2019 à 22:46:05  profilanswer
 


je viens de tester ce code, il marche, et il est rapide
il sort du RTF, mais on peut peut être le modifier
 
https://superuser.com/questions/428 [...] -documents
 
For i = 1 To 100
    Application.Browser.Target = wdBrowsePage
    ActiveDocument.Bookmarks("\page" ).Range.Copy
    Documents.Add
    Selection.Paste
    ChangeFileOpenDirectory "C:\test\"
    ActiveDocument.SaveAs FileName:="DCX_" & i & ".rtf", FileFormat:=wdFormatRTF
    ActiveDocument.Close
    Application.Browser.Next
Next i


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Diviser un gros document Word en plusieurs Word unique (1200 pages)

 

Sujets relatifs
pb script VBA sous Word pour export feuilles - laisse 1 pageScript qui récupère données fichier Excel vers document
macro vba/word concaténer 2 paragraphesAide vba word choix dans une liste
Copier tableau Excel sous Word page définiePlusieurs pages html appellent le même menu. Possible svp ?
[MySQL] Plusieurs tables ou une seule grosse dans ce cas?Plusieurs tableaux mais avec couleurs différentes ?
copier coller plusieurs feuilles dans une feuille 
Plus de sujets relatifs à : Diviser un gros document Word en plusieurs Word unique (1200 pages)


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite) / Groupe LDLC / Shop HFR