IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Fusionner des documents word


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Mai 2011
    Messages
    790
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Tunisie

    Informations forums :
    Inscription : Mai 2011
    Messages : 790
    Par défaut 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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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 !

  2. #2
    Membre Expert Avatar de _Ez3kiel
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2013
    Messages
    836
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Janvier 2013
    Messages : 836
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    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)





    Si rien ne te choque, alors je t'invite à documenter sur la programmation en Vb.NET : http://plasserre.developpez.com/cours/vb-net/

Discussions similaires

  1. Fusionner des documents words
    Par aquaesextiae dans le forum Word
    Réponses: 5
    Dernier message: 20/09/2011, 10h15
  2. Fusionner des documents WORD docm
    Par eGmBe dans le forum C#
    Réponses: 0
    Dernier message: 14/12/2010, 18h05
  3. [WD-2003] Comparer et fusionner des documents - Word 2003
    Par Etienne R dans le forum Word
    Réponses: 2
    Dernier message: 12/03/2010, 15h50
  4. Réponses: 8
    Dernier message: 04/04/2007, 19h38
  5. Réponses: 11
    Dernier message: 26/04/2005, 09h23

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo