salir de una tabla de word
Publicado por andrea (95 intervenciones) el 16/02/2006 19:07:15
Hola gente! estooy armando un documento de word desde vbasic pero cuando intento seguir agregando texto debajo de la tabla no logro que salga de la tabla!!!
Mi codigo es este:
Set objWord = New Word.Application
objWord.Documents.Add
objWord.ActiveDocument.SaveAs "c:\registro.doc"
objWord.Visible = True
With objWord.Selection
.Tables.Add .Range, 1, 6
.Tables(1).Rows.Add
.Tables(1).Cell(1, 1).Select
.TypeText Text:=Me.aduana.Text
.MoveDown
.TypeParagraph
.TypeParagraph
.InsertFile FileName:="c:\rich.rtf", Range:="", _
ConfirmConversions:=False, Link:=False, Attachment:=False
End With
Set docDeWord = Nothing
Set objWord = Nothing
Mi codigo es este:
Set objWord = New Word.Application
objWord.Documents.Add
objWord.ActiveDocument.SaveAs "c:\registro.doc"
objWord.Visible = True
With objWord.Selection
.Tables.Add .Range, 1, 6
.Tables(1).Rows.Add
.Tables(1).Cell(1, 1).Select
.TypeText Text:=Me.aduana.Text
.MoveDown
.TypeParagraph
.TypeParagraph
.InsertFile FileName:="c:\rich.rtf", Range:="", _
ConfirmConversions:=False, Link:=False, Attachment:=False
End With
Set docDeWord = Nothing
Set objWord = Nothing
Valora esta pregunta


0