Fusionner des documents word
Bonjour ,
J'aimerais bien copier le contenu d'un fichier word 1 et fichier word 2 dans un fichier word (docx) word 3 lors d'un clique sur un button pour ce la j'ai utilisé ce code
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
| Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Namespace Sample
Friend Class Merge
Shared Sub Main(ByVal args() AsString)
'Load Document
Dim document AsNew Document()
document.LoadFromFile("D:\Documents\Introduction.docx", FileFormat.Docx)
Dim document2 AsNew Document()
document2.LoadFromFile("D:\Documents\History.docx", FileFormat.Docx)
'Merge
For Each sec As Section In document2.Sections
document.Sections.Add(sec.Clone())
Next sec
'Save and Launch
document.SaveToFile("Merge.docx", FileFormat.Docx)
System.Diagnostics.Process.Start("Merge.docx")
End Sub
End Class
End Namespace
End Sub |
mais il me dit que Cette instruction ne peut pas apparaître dans le corps d'une méthode.
que ce que je dois faire s'il vous plait tel que j'aimerais bien appeler ce code à l'intérieur d'un button merci !