Novedades para desrrolladores de word 2013

Novedades para desarrolladores de word 2013

En este documento una vista de nivel superior de las mejoras y las características agregadas para desarrolladores en Microsoft Word 2013.

Mejoras en los controles que se encuentran en el desarrollador 

Puede usar mediante programación las características de control de contenido re diseñadas en los controles de contenido de Word 2013. Entre las nuevas características se incluyen controles de contenido repetidos, la codificación de colores y el control sobre el aspecto del control de contenido del documento. Los controles de contenido son regiones enlazadas y potencialmente etiquetadas de un documento que sirven como contenedores de tipos concretos de contenido, tal como se muestra en la figura 2. Los controles de contenido individuales pueden incluir contenido como, por ejemplo, fechas, listas o párrafos de texto con formato. Permiten crear bloques enriquecidos estructurados de contenido. Los controles de contenido permiten crear plantillas con bloques bien definidos para que pueda trabajar con los documentos de manera estructurada.

Un ejemplo son estos códigos el cual nos muestra como usar los controles mediante la programación.

Sub testRepeatingControl()
Dim objRange As Range
Dim objTable As Table
Dim objCustomPart As CustomXMLPart
Dim objCC As ContentControl
Dim objCustomNode As CustomXMLNode

Set objCustomPart = ActiveDocument.CustomXMLParts.Add
objCustomPart.LoadXML ("<books>" & _
    "<book><title>Code</title>" & _
    "<author>Charles Petzold</author></book>" & _
    "<book><title>JavaScript Step by Step</title>" & _
    "<author>Steve Suehring</author></book>" & _
    "<book><title>Understanding IPv6</title>" & _
    "<author>Joseph Davies</author></book></books>")

Set objRange = ActiveDocument.Paragraphs(1).Range
Set objTable = ActiveDocument.Tables.Add(objRange, 2, 2)

Set objRange = objTable.Cell(1, 1).Range
Set objCustomNode = objCustomPart.SelectSingleNode("/books[1]/book[1]/title[1]")
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlText, objRange)
objCC.XMLMapping.SetMappingByNode objCustomNode

Set objRange = objTable.Cell(1, 2).Range
Set objCustomNode = objCustomPart.SelectSingleNode("/books[1]/book[1]/author[1]")
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlText, objRange)
objCC.XMLMapping.SetMappingByNode objCustomNode

Set objRange = objTable.Rows(1).Range
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlRepeatingSection, objRange)
objCC.XMLMapping.SetMapping ("/books[1]/book")
End Sub