concaténation de word c'est possible?

Version imprimable

19/05/2011, 11h43
Blunt

concaténation de word c'est possible?

Bonjour,

Je souhaite concaténer plusieurs fichiers word lors de la génération, je m'explique, je génère plusieurs fichiers word sauf que je les enregistre un par un qui peut ralentir mon traitement, est ce qu'il y a un moyen de concaténer les fichiers word et d'enregistrer le tout à la fin?, merci beaucoup.
19/05/2011, 11h51
Niitaku

Bonjour,

Je ne comprends pas très bien : veux-tu mettre tous les fichiers en un seul puis enregistrer, ou les garder séparés et enregistrer tous les documents à la fin de la génération ?
19/05/2011, 11h53
Blunt

Citation:

Envoyé par Niitaku

Bonjour,

Je ne comprends pas très bien : veux-tu mettre tous les fichiers en un seul puis enregistrer, ou les garder séparés et enregistrer tous les documents à la fin de la génération ?

Exactement, merci infiniment.
19/05/2011, 14h20
Niitaku

Je ne sais pas si j'ai résolu ton problème à partir de ma question, mais en fait je te demandais quel était ton problème plus exactement.

Est-ce que tu veux faire la première ou la deuxième proposition de ma question ?

Si ton problème est résolu, n'oublie pas de l'indiquer et pourquoi pas en apporter la solution au cas où d'autres personnes auraient la même question que toi. ;)
19/05/2011, 15h34
Blunt

Citation:

Envoyé par Niitaku

Je ne sais pas si j'ai résolu ton problème à partir de ma question, mais en fait je te demandais quel était ton problème plus exactement.

Est-ce que tu veux faire la première ou la deuxième proposition de ma question ?

Si ton problème est résolu, n'oublie pas de l'indiquer et pourquoi pas en apporter la solution au cas où d'autres personnes auraient la même question que toi. ;)

Désolé, je veux mettre tous les fichiers en un seul puis enregistrer le tout.
J'ai fais des tests de performance, pour générer 1000 fichiers, je met 1h ce qui est excessivement long, je pense qu'il y a une perte de temps lors de l'enregistrement, donc je souhaite faire un test de faire un seul enregistrement et pas 1000, merci d'avance.
19/05/2011, 15h59
Niitaku
Pas de soucis. ;)

Pour te répondre, il nous faudrait savoir de quelle manière tu génères tes documents Word (un extrait de code). :?

Sinon, de tête, tu as plusieurs fonctions te permettant d'insérer du texte dans un document comme par exemple :
```
InsertAfter();
InsertFile();
InsertParagraph();
InsertParagraphAfter();
```
En fonction de ton besoin, peut-être qu'une de ces fonctions pourra t'aider. :)

[Edit] A savoir que ce sont des fonctions de VSTO et que si tu utilises du VBA, il doit y avoir un équivalent proche.

Citation:

Envoyé par Niitaku

Pas de soucis. ;)

Pour te répondre, il nous faudrait savoir de quelle manière tu génères tes documents Word (un extrait de code). :?

Sinon, de tête, tu as plusieurs fonctions te permettant d'insérer du texte dans un document comme par exemple :

InsertAfter();
InsertFile();
InsertParagraph();
InsertParagraphAfter();

En fonction de ton besoin, peut-être qu'une de ces fonctions pourra t'aider. :)

Merci de me répondre

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
 
            foreach (string s in FUSIONSS_1)
            {   
 
 
                String[] tbStr2 = s.Split(new Char[] { ';' });
                string nb = tbStr2[0];
                Object oMissing = System.Reflection.Missing.Value;
                Object oTrue = true;
                Object oFalse = false;
                Microsoft.Office.Interop.Word.Application oWord = new Microsoft.Office.Interop.Word.Application();
                Microsoft.Office.Interop.Word.Document oWordDoc = new Microsoft.Office.Interop.Word.Document();
                oWord.Visible = true;
                oWord.Visible = false;
                Object oTemplatePath = modelee;
                oWordDoc = oWord.Documents.Add(ref oTemplatePath, ref oMissing, ref oMissing, ref oMissing);
                bool sympb = false; bool E = false; bool n = false; bool p = false; bool r = false;
 
                foreach (Microsoft.Office.Interop.Word.Range range in oWordDoc.Words)
                {if (range.Text.Trim().Contains("P"))
                    {   int pos = range.Text.Trim().IndexOf("P");
                        string str = range.Text.Trim().Replace("P", "O");
                        range.Text = str;} }
                Directory.CreateDirectory((Object)path + "./PUBLI/" + nb);
                Object oSaveAsFile = (Object)path + "./PUBLI/" + nb + "/" + nb + ".doc";
                oWordDoc.SaveAs(ref oSaveAsFile, ref oMissing, ref oMissing, ref oMissing,
                ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
                ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
                ref oMissing, ref oMissing);
                oWordDoc.Close(ref oFalse, ref  oMissing, ref oMissing);
                oWord.Quit(ref oMissing, ref oMissing, ref oMissing);
            }

sachant que la liste FUSIONSS contient l'ensemble des fichiers (1000 fichiers), au lieu de faire le bout

Citation:

Code:

1
2
3
4
5
6
oWordDoc.SaveAs(ref oSaveAsFile, ref oMissing, ref oMissing, ref oMissing,
                ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
                ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
                ref oMissing, ref oMissing);
                oWordDoc.Close(ref oFalse, ref  oMissing, ref oMissing);
                oWord.Quit(ref oMissing, ref oMissing, ref oMissing);

1000 fois, je pense de le faire une seule fois à la fin, merci d'avance.

Si la liste FUSIONSS_1 contient tout les textes des différents documents, tu peux essayer de créer un document avant le foreach, insérer le texte que tu auras formaté selon tes souhaits dedans, puis sauvegarder le tout après le foreach.

J'utilise le using suivant : using Word = Microsoft.Office.Interop.Word;.

Cela donnerait en exemple :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 public void Fonction() { //Liste pour l'exemple. List<String> lstDocumentsContent = new List<String>(); //Instanciation d'un application Word et création du document global. Word.Application wordApplication = new Word.Application(); Word.Document concatDoc = wordApplication.Documents.Add(); foreach (String currentContent in lstDocumentsContent) { //Opération sur le texte selon tes souhaits. //Ajout du contenu au document global. concatDoc.Content.InsertAfter(currentContent); } //Sauvegarde du fichier. concatDoc.SaveAs("Chemin de sauvegarde"); }
Note : Si tu utilise le Framework 4.0, tu n'as pas besoin de spécifier tous les arguments de la fonction SaveAs() ou encore Close(), pas obligatoirement non plus sous forme d'objet et pas non plus en référence (ref).
Par exemple, pour le chemin de sauvegarde, tu peux une simple String. ;)

20/05/2011, 16h56
Blunt
Merci beaucoup pour votre réponse, cependant je viens de découvrir un autre problème, il ya plein de processus 'winword.exe' dans le gestionnaire de tâche et ça fait planté mon serveur, malgré que j'ajoute bien :
Code:

1 2 oWordDoc.Close(ref oFalse, ref oMissing, ref oMissing); oWord.Quit(ref oMissing, ref oMissing, ref oMissing);
pourquoi ces processus n'ont pas été terminés ? Merci beaucoup.
20/05/2011, 21h14
Niitaku

Dans des add-ins que j'ai développé, les processus se terminent lorsque je quitte l'application Office concernée par d'add-in.

Il en est certainement de même pour toi : les processus devraient se fermer une fois ton application quittée. :?
20/05/2011, 22h53
Blunt

Bonjour,

Comment je pourai fermer les processus winword.exe correctement?, j'ai l'impression que les deux lignes ci dessous ne sont pas exécutées en plus j'ai un warning :

Citation:

Ambiguity between method 'Microsoft.Office.Interop.Word._Document.Close(ref object, ref object, ref object)' and non-method 'Microsoft.Office.Interop.Word.DocumentEvents2_Event.Close'. Using method group

A force de ne pas terminer les processus, le serveur devient très lourd.

Merci de m'aider à résoudre ce gros problème.
22/05/2011, 21h51
Blunt

Bonjour,

Je remarque aussi que l'Util. fichier dans le gestionnaire de tache passe de 600mo à plus de 4go, comment peut on libérer les winword.exe, est ce qu'il y a d'autres paramètres ? merci d'avance de votre aide.
22/05/2011, 22h52
MABROUKI

libere les references COM
BONJOUR
Rajoute la liberation des references COM ce qui permettre au GC liberer les handles d'application detenues par le GC.
Code:

1 2 3 4 oWordDoc.Close(ref oFalse, ref oMissing, ref oMissing); oWord.Quit(ref oMissing, ref oMissing, ref oMissing); oWordDoc = null;
bon code...