Cómo utilizar Automatización para obtener y configurar propiedades de documentos de Office mediante Visual Basic .NET

Seleccione idioma Seleccione idioma
Id. de artículo: 303294 - Ver los productos a los que se aplica este artículo
Este artículo se publicó anteriormente con el número E303294
Expandir todo | Contraer todo

Resumen

Este artículo ilustra cómo automatizar Microsoft Word con Microsoft Visual Basic .NET para recuperar y tratar las propiedades de los documentos. Aunque el ejemplo de este artículo está escrito específicamente para automatizar Word, se pueden aplicar los mismos conceptos a Microsoft Excel y Microsoft PowerPoint.

Más información

Cree un cliente de Automatización para Microsoft Word

  1. Inicie Visual Studio .NET
  2. En el menú Archivo, haga clic en Nuevo y, después, haga clic en Proyecto. Seleccione Aplicación para Windows en los tipos de proyecto de Visual Basic. De manera predeterminada se creará Form1.
  3. Agregue una referencia a Biblioteca de objetos de Microsoft Word. Para ello, siga estos pasos:
    1. En el menú Proyecto, haga clic en Agregar referencia.
    2. En la ficha COM, busque la Biblioteca de objetos de Microsoft Word y haga clic en Seleccionar.

      Nota: Microsoft Office 2003 incluye ensamblados de interoperabilidad primarios (PIA, Primary Interop Assemblies). Microsoft Office XP no incluye PIA, pero se pueden descargar. Para obtener más información acerca de los PIA de Office XP, haga clic en el siguiente número de artículo para verlo en Microsoft Knowledge Base:
      328912 Hay disponibles ensamblados de interoperabilidad primarios (PIA) de Microsoft Office XP para descargar
    3. Haga clic en Aceptar en el cuadro de diálogo Agregar referencias para aceptar sus selecciones. Si se le pregunta si desea generar contenedores para las bibliotecas seleccionadas, haga clic en .
  4. En el menú Ver, seleccione Cuadro de herramientas para mostrar el cuadro de herramientas y agregue un botón a Form1.
  5. Haga doble clic en Button1. Aparece la ventana de código del formulario.
  6. En la ventana de código, reemplace el código siguiente
    Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) _
                              Handles Button1.Click
    End Sub
    					
    por:
    Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) _
                              Handles Button1.Click
            Dim oWord As Word.Application
            Dim oDoc As Word.Document
            Dim oBuiltInProps As Object
            Dim oCustomProps As Object
            Dim oProp As Object
            Dim strValue As String
    
            'Create an instance of Word and make it visible.
            oWord = CreateObject("Word.Application")
            oWord.Visible = True
            'Create a new document
            oDoc = oWord.Documents.Add()
    
            'Get the Built-in Document Properties collection.
            oBuiltInProps = oDoc.BuiltInDocumentProperties
            'Get the value of the Author property and display it
            strValue = oBuiltInProps.Item("Author").Value
            MsgBox("The author of this document is " & strValue)        
    
            'Set the value of the Subject property.
            oBuiltInProps.Item("Subject").Value = _
                      "Knowledge Base article Q303294"
    
            'Get the Custom Document Properties collection.
            oCustomProps = oDoc.CustomDocumentProperties
            'Add a property named Knowledge Base Article
            'and give it a value of Q303294.
            oCustomProps.Add("Knowledge Base article", False, _
                      Office.MsoDocProperties.msoPropertyTypeString, "Q303294")
    
            'Display a message box to give the user a chance to verify the
            'properties.
            MsgBox("Select Properties from the File menu " _
                   & "to view the changes." & Chr(10) _
                   & "Select the Summary tab to view " _
                   & "the Subject and the Custom tab to view the Custom " _
                   & "properties.", MsgBoxStyle.Information, _
                   "Check File Properties")
    
            'Clean up. We'll leave Word running.
            oCustomProps = Nothing
            oBuiltInProps = Nothing
            oDoc = Nothing
            oWord = Nothing
    
        End Sub 
    					
  7. Agregue el código siguiente al principio de Form1.vb:
    Imports Office = Microsoft.Office.Core
    Imports Word = Microsoft.Office.Interop.Word
  8. Presione la tecla F5 para ejecutar la aplicación.
  9. Haga clic en Button1 para iniciar Microsoft Word.
Este código demuestra la lectura y la escritura tanto de las propiedades integradas de los documentos como de las propiedades personalizadas. Cuando se ejecuta, este código muestra el valor de la propiedad Author integrada, cambia el valor de la propiedad Subject por "Artículo de Knowledge Base Q303294" y crea una nueva propiedad de documento personalizada que se denomina "Artículo de Knowledge Base". Cuando se le pida que vea los cambios, cambie a Word y haga clic en Propiedades en el menú Archivo.

Referencias

Para obtener más información, visite el siguiente sitio Web de Microsoft Developer Network:
Desarrollo de Microsoft Office con Visual Studio
http://msdn2.microsoft.com/en-us/library/aa188489(office.10).aspx
Para obtener más información al respecto, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:
303296 Cómo utilizar Automatización para obtener y configurar propiedades de documentos de Office mediante Visual C# .NET

Propiedades

Id. de artículo: 303294 - Última revisión: jueves, 22 de febrero de 2007 - Versión: 7.2
La información de este artículo se refiere a:
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
  • Microsoft Office Excel 2003
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Office PowerPoint 2003
  • Microsoft PowerPoint 2002 Standard Edition
  • Microsoft Office Word 2003
  • Microsoft Word 2002 Standard Edition
Palabras clave: 
kbpia kbautomation kbhowto KB303294

Enviar comentarios

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com