Cómo: Utilizar cuadros de diálogo de Word en modo oculto

Actualización: noviembre 2007

Puede realizar operaciones complejas con una llamada al método invocando los cuadros de diálogo integrados en Microsoft Office Word sin mostrarlos al usuario. Puede hacerlo utilizando el método Execute del objeto Dialog sin llamar al método Display.

Ejemplo

Friend Sub PageSetupDialogHidden()
    Dim dlg As Word.Dialog = Application.Dialogs.Item(Word.WdWordDialog.wdDialogFilePageSetup)

    ' Set the properties of the dialog box.
    ' ControlChars.Quote() is used to represent the symbol for inches.
    With dlg
        .PageWidth = 3.3 & ControlChars.Quote
        .PageHeight = 6 & ControlChars.Quote
        .TopMargin = 0.71 & ControlChars.Quote
        .BottomMargin = 0.81 & ControlChars.Quote
        .LeftMargin = 0.66 & ControlChars.Quote
        .RightMargin = 0.66 & ControlChars.Quote
        .HeaderDistance = 0.28 & ControlChars.Quote
        .Orientation = Word.WdOrientation.wdOrientPortrait
        .DifferentFirstPage = False
        .FirstPage = 0
        .OtherPages = 0

        ' Apply these settings only to the current selection with this line of code:
        .ApplyPropsTo = 3

        ' Apply the settings.
        .Execute()
    End With
End Sub

private void PageSetupDialogHidden() 
{ 
    Word.Dialog dlg = Application.Dialogs[Word.WdWordDialog.wdDialogFilePageSetup];

    invokeHelper(dlg,"PageWidth","3.3\"");
    invokeHelper(dlg,"PageHeight","6\"");
    invokeHelper(dlg,"TopMargin","0.71\"");
    invokeHelper(dlg,"BottomMargin","0.81\"");
    invokeHelper(dlg,"LeftMargin","0.66\"");
    invokeHelper(dlg,"RightMargin","0.66\"");
    invokeHelper(dlg,"HeaderDistance","0.28\"");
    invokeHelper(dlg,"Orientation","0");
    invokeHelper(dlg,"DifferentFirstPage","0");
    invokeHelper(dlg,"FirstPage","0");
    invokeHelper(dlg,"OtherPages","0");

    // Apply these settings only to the current selection with this line of code:
    invokeHelper(dlg,"ApplyPropsTo","3"); 

    // Apply the settings.
    dlg.Execute(); 
}

private static void invokeHelper(Word.Dialog dlg, string member, string value)
{
    System.Type dlgType = typeof(Word.Dialog);

    // Set the appropriate property of the dialog box.
    dlgType.InvokeMember(member,
        System.Reflection.BindingFlags.SetProperty |
            System.Reflection.BindingFlags.Public |
            System.Reflection.BindingFlags.Instance,
        null, dlg, new object[] {value},
        System.Globalization.CultureInfo.InvariantCulture);
}

Compilar el código

Ejecute este código desde las clases ThisDocument o ThisAddIn del proyecto de Visual Studio Tools para Office.

Este ejemplo utiliza la enumeración wdDialogFilePageSetup para establecer varias propiedades de configuración de página sin utilizar ningún dato proporcionado por el usuario. El código utiliza un objeto Dialog para configurar un tamaño de página personalizado.

En este ejemplo es necesario establecer Option Strict Off en el código de Visual Basic. Esto es necesario porque ninguno de los parámetros específicos de configuración de página, como el margen superior, el margen inferior, etc., es miembro de la clase Dialog. Estas propiedades son de enlace en tiempo de ejecución porque Word las crea de forma dinámica en tiempo de ejecución cuando se evalúa la enumeración wdDialogFilePageSetup. En realidad, son propiedades creadas durante la ejecución para ajustarlas a propiedades de cuadros de diálogo individuales.

Nota:
Puede factorizar el código que necesita ejecutarse con Option Strict Off en una clase independiente.

Vea también

Tareas

Cómo: Utilizar cuadros de diálogo integrados en Word

Conceptos

Información general acerca del modelo de objetos de Word