Cita:
Iniciado por pkj 
Posiblemente el error lo da el caracter dos puntos (:) antes del igual.
Lo ví, pero no lo quité porque al no saber sobre el tema pensé que a lo mejor lo estropeaba.
Prueba:
objWord.Selection.InsertBreak Type=wdPageBreak
o
objWord.Selection.InsertBreakType=wdPageBreak
Suerte.
No creo que sea el caracter (:) porque en la misma aplicación tengo esta sentencia puesta:
.Selection.TypeText Text:=" 1. Escrito numero 1"
Y me funciona perfectamente, he probado la sentencia que venia sobre el salto de linea y me da error tb por error al pasar el parámetro error 4120 ..., es un coñazo. Estoy emulando esto mismo escribiendo líneas en blanco sin nada ... pero es muy chapucero y tedioso.
Te pongo parte de mi código:
Código:
Dim objWord As Object
Set oConexion = CurrentProject.Connection
Dim MyRS As ADODB.Recordset
With oConexion
.Close
' Se cambia la cadena de conexión
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sNombreBd & ";"
.Open
End With
Set objWord = CreateObject("Word.Application")
objWord.Visible = False
Screen.MousePointer = vbHourglass
With objWord
.Documents.Add
' configuramos la página
.ActiveDocument.PageSetup.LeftMargin = 70
.ActiveDocument.PageSetup.RightMargin = 70
.ActiveDocument.PageSetup.TopMargin = 30
.Selection.Font.Name = "Tahoma"
.Selection.Font.Size = 16
Set MyRS = New ADODB.Recordset
MyRS.Open "sentencia que ataca bd", oConexion, adOpenKeyset, adLockOptimistic
.Selection.TypeParagraph
' Esta es la sentencia de llamada a la tabla
Call .application.ActiveDocument.Tables.Add(objWord.ActiveWindow.Selection.Range, 2, 1)
.ActiveDocument.Tables(1).Cell(1, 1).Select
.ActiveDocument.Tables(1).Cell(1, 1).WordWrap = True
.ActiveDocument.Tables(1).Cell(2, 1) = sTitulo
End With
A través de recordset ataco a una base de datos para sacarle datos e introducirlos en el documento de word y llamao a la función de crear una tabla que es call.
Introduzco un texto despues de llamar a la tabla pero me escribe en la primera celda no entiendo porque.
Luego intento crear otra tabla llamando de nuevo al call pero me trabaja con la tabla anterior que habia introducido antes.
jejeje, disculpa si no me explico muy bien pero tampoco soy muy conocedor del tema. gracias