¿Cómo escribo en una posición específica en un documento de Word, por ejemplo, línea 5, carácter 50? He buscado durante un par de horas, pero no he podido encontrar una solución.¿Cómo agregar texto en documentos de Word en una posición específica?
estoy usando Microsoft.Office.Interop.Word
Si no está satisfecho con la más sencilla frase, en lugar de líneas:
ActiveDocument.Sentences(1).Characters(5).Select
Selection.Collapse
Selection.InsertBefore "added "
cinco párrafos y 50 plazas en VBA
Selection.Text = String(5, vbCrLf)
Selection.Collapse wdCollapseEnd
Selection.Text = String(50, " ")
Sin embargo, para una posición particular, yo preferiría una cuadro de texto:
Set sh = doc.Shapes.AddTextbox(1, 10, 344, 575, 80)
sh.Name = "Course1"
Con algunas propiedades:
sh.Fill.Visible = False
sh.Line.Visible = False
sh.TextFrame.MarginLeft = 0#
sh.TextFrame.MarginRight = 0#
sh.TextFrame.MarginTop = 0#
sh.TextFrame.MarginBottom = 0#
Finding a position in a word document to insert a table
Usted puede encontrar información útil en la ubicación anterior.
gracias, pero he leído que ya, pero no me undrestand !! 'no sé dónde puedo encontrar una buena información acerca Microsoft.Office .Interop.Word excepto msdn! –
Si va a insertar texto en la misma ubicación cada vez, una forma sencilla de hacerlo es crear un archivo de plantilla .dotx con un marcador en la ubicación. Asegúrese de que la plantilla se incluirá en la compilación
Doc = Word.Documents.Add("Directory\Filename")
Doc.Bookmarks.Item("BookmarkName").Range.Text = "Text to be inserted"
Esta es una forma mucho mejor de hacer esto – R2D2
Quiero agregar un texto, un marcador o algo así a un documento vacío, no hay ninguna oración. ¿Debo añadir un párrafo primero? ¡Estoy realmente confundido acerca de esto! –
Si su documento en blanco está activo, puede simplemente decir 'Selection.Text =" montones de texto "' – Fionnuala
sí, pero no hay Sentencias ni caracteres en el documento en blanco, por ejemplo, ¿cómo escribir en la línea 5 utilizando este código? ! –