Ciao a tutti,
sto cercando di creare un programma per compilare un file word.
Sono riuscita tramite la libreria Microsoft.Office.Interop.Word a scrivere del semplice testo usando i segnalibri.
Ora avrei la necessità di inserire una combobox e di popolarla ma non sono riuscita a trovare il codice esatto da usare.
Vi posto quello che ho fatto fino ad ora:
Imports Word = Microsoft.Office.Interop.Word
Public objword As New Word.Application
Public progettoriginale, progettocopia As String
...
progettoriginale = My.Computer.FileSystem.SpecialDirectories.Desktop + "\progettoprova.docx"
progettocopia = My.Computer.FileSystem.SpecialDirectories.Desktop + "\progettocopia.docx"
objword.DisplayAlerts = Word.WdAlertLevel.wdAlertsNone
objword.Visible = False
objword.Documents.Add(CStr(progettoriginale))
nominativo = TextBox1.Text
cittadinanza = TextBox2.Text
nascita = TextBox3.Text
...
objword.Selection.Font.Size = 10
objword.Selection.Font.Name = "Lato Medium"
objword.Documents(1).Bookmarks.Item("Nominativo").Select()
objword.Selection.Font.Bold = 1
objword.Selection.Text = nominativo
objword.Documents(1).Bookmarks.Item("Cittadinanza").Select()
objword.Selection.Font.Bold = 1
objword.Selection.Text = cittadinanza
objword.Documents(1).Bookmarks.Item("Nascita").Select()
objword.Selection.Font.Bold = 1
objword.Selection.Text = nascita
objword.Documents(1).SaveAs(CStr(progettocopia))
objword.DisplayAlerts = Word.WdAlertLevel.wdAlertsAll
objword.Documents.Close()
objword.Quit()
releaseObject(objword)
Vi chiedo cortesemente aiuto.
Grazie