Cómo agregar una propiedad a un documento de Word en VBA

Cada documento de Microsoft Word contiene más información que lo que un usuario de forma explícita los tipos o pastas en ella. La información adicional aparece en las propiedades del documento , que son un conjunto de campos que indican la creación del documento y la fecha de modificación , título, comentarios de los usuarios y los datos administrativos. Los usuarios de Word pueden añadir nuevas propiedades de los documentos con los menús estándar de Word. O bien, pueden utilizar el lenguaje de secuencias de comandos de Word, Visual Basic para Aplicaciones ( VBA) . Usando VBA para agregar una propiedad que permite añadir automáticamente los datos relacionados con el contenido del documento . Por ejemplo , el código VBA puede extraer el contenido del documento en una lista de palabras de la etiqueta , para encontrar el documento posterior más fácil. Instrucciones
agregar una nueva propiedad
1

Word y pulse Abrir " Alt -F11 " para entrar en el entorno de desarrollo integrado de Visual Basic ( IDE).
2

Click el menú "Insertar " la partida , a continuación, haga clic en " módulos" para añadir un nuevo módulo en el que se escribe el código del programa para la creación de una nueva propiedad.
3

escriba el código siguiente en el nuevo la ventana del módulo:

Public Sub AddProperty ()

ActiveDocument.CustomDocumentProperties.Add _

Nombre : = " newproperty " , LinkToContent : = False , valor: = " AlgúnValor " , _

Tipo: = msoPropertyTypeString

End Sub

Este código programa llama al método "Add" de la colección de propiedades de los documentos existentes para agregar una nueva propiedad ", newproperty , " a esa colección .
4

clic en cualquier lugar dentro de la subrutina AddProperty , a continuación, pulse la tecla" F5 "para ejecutar el programa.
5

pulse" Alt -F11 "para volver a la Palabra. Haga clic en el botón de Microsoft Office en la parte superior izquierda de la pantalla , a continuación, poner el puntero sobre "Preparación ".
6

Haga clic en " Propiedades ", haga clic en la pestaña "Personalizar " para mostrar la lista de la costumbre propiedades del documento. El panel " Propiedades" muestra la propiedad " newproperty " y su valor asociado , " AlgúnValor ", que agregó en los pasos 3 y 4 .
Pedir al usuario un nombre de Propiedad en
7

Pulse " Alt- F8 " para mostrar una lista de macros (es decir , programas VBA ) . Haga clic en el elemento " AddProperty " , a continuación, haga clic en el botón "Editar" . Esta acción se vuelve a la rutina que se suma la propiedad personalizada.
8

Seleccione las declaraciones entre los " Public Sub " y declaraciones "End Sub " y pulse "Borrar" para eliminarlos.
Página 9

Escriba los nuevos estados siguientes de entre los " Public Sub " y declaraciones "End Sub " :

dim PropertyName , PropertyValue como cadena

PropertyName = InputBox ( " por favor, introduzca el nombre de una nueva propiedad. " )

PropertyValue = InputBox (" Escriba un valor para la nueva propiedad. " )

ActiveDocument.CustomDocumentProperties.Add _
< p > Nombre: = PropertyName , LinkToContent : = False , _

valor: = PropertyValue , Type : = msoPropertyTypeString

Estas declaraciones indican al usuario una nueva propiedad y su valor , a continuación, crear el nuevo propiedad de la entrada del usuario.
10

Prensa " Alt- F8 " para volver al documento de Word , a continuación, pulse " Alt- F8 " para visualizar la lista de subrutinas VBA .
11

Haga doble clic en el elemento " AddProperty " para ejecutar la subrutina revisado, que pedirá el nombre y el valor de una nueva propiedad de documento . Escriba cualquier texto de ambos artículos.
12

Verifique la creación de la nueva propiedad , buscando en la ventana de propiedades del documento , como lo hizo en el apartado 1 , paso 6 .