Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VB.NET: Word MailMerge vb.net

Rypsi [05.04.2012 09:28:22]

#

Moikka,
Tarttis apua pieneen ongelmaan.
Olen tekemässä joukkokirjettä vb.netin kautta käyttäen wordia, homma toimiikin, mutta haluaisin yhden vaiheen siitä automatisotua.
Käytän referenssinä Microsoft Word 12.0 Object Librarya ja Imports Word = Microsoft.Office.Interop.Word

Ohjelma luo Excelin jossa on tarvittavat kentät ja tiedot, sekä minulla on word malli jossa on MERGEFIELD kentät.

Millä saan pois wordin kysymyksen, mitä sheettiä exelissä käytetään?
(Wordin yhdistämistoiminnon ikkunan nimi on "Valitse taulukko")
Alla mun räpellys vb.net 2010, jossa ei ole mitään virheen korjausta :-)

Private Sub TeeJoukkoKirje()
        Dim MSW As New Word.Application
        Dim Dokkis As Word.Document

        Dokkis = MSW.Documents.Open("c:\testi2.dotx")

        Dokkis.MailMerge.OpenDataSource("C:\aineisto.xlsx")

        Dokkis.MailMerge.Execute()
        Dokkis.Close(False)
        MSW.Visible = True

End Sub

neau33 [05.04.2012 12:30:51]

#

Moi Rypsi!

Et tarvitse Microsoft Word 12.0 Object Librarya referesseihin kun kerran käytät Microsoft.Office.Interop.Word assemeblyä, mutta mikäli käyttiksesi tukee SendKeys.Send-metodia niin tämä toimii:

 '...
   Try
      SendKeys.Send("{ENTER}")
      Dokkis.MailMerge.OpenDataSource("C:\aineisto.xlsx")
   Catch Ex As Exception
   End Try
'...

Rypsi [06.04.2012 23:03:36]

#

Moikka Nea

Sä olet loistava, Kiitos tuhannesti
ongelma ei ollut vika vaan harmillinen, mutta nyt toimii :-)
T:Mika (Rypsi)

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta