Seleccionar un lugar especifo de un documento word

31/08/2005 - 02:03 por Nacho | Informe spam
Hola, en la macro que realizo abro un documento de word y le pego algunas
lineas, pero me las pega en la primer línea del documento, hay alguna manera
de pegarlos en un lugar asignado?

El texto viene de un text box y uso la siguiente instruccion.

Dim X As Object
Set X = CreateObject("Word.Application")
X.Visible = True
X.Documents.Open ("C:\doc1.doc")
X.Selection.Text = TextBox1.Text

Muchas Gracias
Saludos

Preguntas similare

Leer las respuestas

#1 KL
31/08/2005 - 02:34 | Informe spam
Hola Nacho,

Podrias dar algun ejemplo de "un lugar asignado"?

Saludos,
KL


"Nacho" wrote in message
news:
Hola, en la macro que realizo abro un documento de word y le pego algunas
lineas, pero me las pega en la primer linea del documento, hay alguna
manera
de pegarlos en un lugar asignado?

El texto viene de un text box y uso la siguiente instruccion.

Dim X As Object
Set X = CreateObject("Word.Application")
X.Visible = True
X.Documents.Open ("C:\doc1.doc")
X.Selection.Text = TextBox1.Text

Muchas Gracias
Saludos
Respuesta Responder a este mensaje
#2 Nacho
31/08/2005 - 15:26 | Informe spam
Si, claro.

Me gustaría poder decidir la línea en el documento y si es posible la columna.
Por ejemplo escribir Hola en la línea 5 de la página 2

Saludos

"KL" escribió:

Hola Nacho,

Podrias dar algun ejemplo de "un lugar asignado"?

Saludos,
KL


"Nacho" wrote in message
news:
> Hola, en la macro que realizo abro un documento de word y le pego algunas
> lineas, pero me las pega en la primer linea del documento, hay alguna
> manera
> de pegarlos en un lugar asignado?
>
> El texto viene de un text box y uso la siguiente instruccion.
>
> Dim X As Object
> Set X = CreateObject("Word.Application")
> X.Visible = True
> X.Documents.Open ("C:\doc1.doc")
> X.Selection.Text = TextBox1.Text
>
> Muchas Gracias
> Saludos



Respuesta Responder a este mensaje
#3 KL
31/08/2005 - 19:53 | Informe spam
Hola Nacho,

Me gustaria poder decidir la linea en el documento y si es posible la
columna.
Por ejemplo escribir Hola en la linea 5 de la pagina 2



Cuando te refieres a una columna, imagino que se trata de una tabla, no? Las
tablas en word son objetos independientes diferentes al texto normal.

Abajo te pongo dos ejemplos, uno modifica el texto en un parrafo especifico
y otro modifica el texto de una celda especifica de una tabla. En el primer
caso debe existir el parrafo 5, y en el segundo y al menos una tabla con al
menos 2 filas y 3 columnas.

Sub test1()
Dim WDApp As Object, miDoc As Word.Document, Texto As String
Texto = "Prueba"
Set WDApp = CreateObject("Word.Application")
With WDApp
.Visible = True
Set miDoc = .Documents.Open("C:\doc1.doc")
End With
miDoc.Paragraphs(5).Range = Texto & Chr(10)
End Sub

Sub test2()
Dim WDApp As Object, miDoc As Word.Document, Texto As String
Texto = "Prueba"
Set WDApp = CreateObject("Word.Application")
With WDApp
.Visible = True
Set miDoc = .Documents.Open("C:\doc1.doc")
End With
miDoc.Tables(1).Rows(2).Cells(3).Range = Texto
End Sub

Saludos,
KL
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida