de vb a word
Publicado por Gerardo Duran Aguilar (1 intervención) el 10/12/2004 14:27:40
hola, les explio lo q necesito, tengo un formulario desde el cual desde un boton "exportar a word" envio todo el contendio de un textbox (q tiene mas de 25 lineas) a un documento word, hasta ahi todo bien, lo q quiero es q ese mismo contenido este con alineacion JUSTIFICADA, cuando abro el documento de word el texto esta desalineado, uso el siguiente codigo para enviar el texto, solo falta q se guarde con alineacion JUSTIFICADA, les estoy agradecido
Dim MSWord As New Word.Application
Dim Documento As Word.Document
Dim Parrafo As Paragraph
Set Documento = MSWord.Documents.Open("c:\resolucion.doc")
Set Parrafo = Documento.Paragraphs.Add
Parrafo.Range.InsertAfter txtcuerpo.Text <-- tiene mas de 25 lineas
MSWord.Visible = False
nombre = txtproveido & ".doc"
MSWord.Documents(1).SaveAs "C:\" + nombre
MSWord.Documents.Close
MSWord.Quit
MsgBox "El archivo se guardo como " + nombre, vbInformation, "Nombre de archivo"
Dim MSWord As New Word.Application
Dim Documento As Word.Document
Dim Parrafo As Paragraph
Set Documento = MSWord.Documents.Open("c:\resolucion.doc")
Set Parrafo = Documento.Paragraphs.Add
Parrafo.Range.InsertAfter txtcuerpo.Text <-- tiene mas de 25 lineas
MSWord.Visible = False
nombre = txtproveido & ".doc"
MSWord.Documents(1).SaveAs "C:\" + nombre
MSWord.Documents.Close
MSWord.Quit
MsgBox "El archivo se guardo como " + nombre, vbInformation, "Nombre de archivo"
Valora esta pregunta


0