Utiliser Word avec Visual Basic 2010 Express

[foudefoot]

Bonjour,

Pour une application j'utilise Word 2007. Mais lorsque je quitte cette application, WINWORD.EXE reste toujours ouvert. Si j'ouvre à nouveau l'appli, un autre WINWORD.EXE s'ouvre et ne se ferme pas, et ainsi de suite.
voici les instructions qui me servent à ouvrir Word:

Imports Microsoft.Office.Interop
Imports Microsoft.Office.Core


 Private Sub BT_IMPRIMER_Click(sender As System.Object, e As System.EventArgs) Handles BT_IMPRIMER.Click

        objWord = CreateObject("Word.Application")
        objWord.Visible = True
        objDocument = objWord.Documents.Add
        Dim Question_A_Copier As String
        Dim Reponse_A_Copier As String
        For Ligne_A_Imprimer As Long = 0 To NB_QUESTION
            Dim Number As Long
            Number = Ligne_A_Imprimer + 1
            If Me.DataGridView1.Rows(Ligne_A_Imprimer).Selected Then
                Question_A_Copier = Me.DataGridView1.Rows(Ligne_A_Imprimer).Cells(3).Value
                Reponse_A_Copier = Me.DataGridView1.Rows(Ligne_A_Imprimer).Cells(4).Value
                Paragraphe = objDocument.Paragraphs.Add(objDocument.Bookmarks.Item("\endofdoc").Range)
                Paragraphe.Range.Text = Number & ") " & Question_A_Copier
                Paragraphe.Range.Font.Bold = True
                Paragraphe.Range.InsertParagraphAfter()
                Paragraphe = objDocument.Paragraphs.Add(objDocument.Bookmarks.Item("\endofdoc").Range)
                Paragraphe.Range.Text = Reponse_A_Copier
                Paragraphe.Range.Font.Bold = False
                Paragraphe.Range.InsertParagraphAfter()
            End If
        Next
    End Sub

Je sélectionne une ligne du DataGridVew, puis en cliquant sur Imprime, on ouvre Word et les cellules 4 et 5 de la ligne sélectionnée se copies dans Word.
Pouvez-vous me dire quelle instruction je dois utilisé pour fermer Word en quittant l'application.
-----

[invited8344905]

Bonjour,

J'ouvre et je referme un fichier Excel avec du VBA. Voici le code:

Set PlanningGlobal = Application.Workbooks.Open("N:\Planning\2015\Planning Global.xlsm", False, True)

[Bla Bla Bla des lignes de code...]

PlanningGlobal.Close False

A voir si tu peux adatper à ton cas.

[foudefoot]

Bonjour,

Merci pour cette réponse, je vais voir si je peux adapter quelque chose.

[invite0bbe92c0]

Bonjour,

Pour une application j'utilise Word 2007. Mais lorsque je quitte cette application, WINWORD.EXE reste toujours ouvert. Si j'ouvre à nouveau l'appli, un autre WINWORD.EXE s'ouvre et ne se ferme pas, et ainsi de suite.
voici les instructions qui me servent à ouvrir Word:
.

Déjà ce code fait fâcheusement penser à un portage de VB6.

En Interop .NET on utilise pas le CreateObject normalement; on instancie simplement un Microsoft.Office.Interop.Word.Application
Et à la fin, on fait un Application.Quit sur l'instance word après avoir fermé l'instance de document word.

Un tuto ancien mais toujours valable sur le sujet : http://jab.developpez.com/tutoriels/dotnet/word/
(il n'est pas en VerBeux mais en C#, mais la transcription est facile).

[A voir en vidéo sur Futura]

[foudefoot]

Bonjour Bluedeep,

Merci pour ta réponse, je vais essayé d'adapter la méthode que tu m'as donnée
A+
Denis