Ejecución de Guardar como página web desde la línea de comandos
La característica Guardar como página web se instala automáticamente con cada producto de Visio. Se instala como un complemento de Visio que tiene el nombre SaveAsWeb.
Para ejecutar la característica Guardar como página web desde la interfaz de línea de comandos, llame al complemento SaveAsWeb y use las opciones de línea de comandos deseadas.
Puede elegir cualquiera de las técnicas siguientes.
Crear una fórmula que use la función RUNADDONWARGS en la sección de eventos de una forma
Puede hacerlo en la ventana ShapeSheet sin escribir ningún código. Por ejemplo, podría crear una forma e insertar una llamada a RUNADDONWARGS en el evento de doble clic de la forma. Un usuario solo tendría que hacer doble clic en la forma para crear una página web a partir del dibujo. También puede usar Automation para establecer fórmulas mediante la propiedad Formula del objeto Cell del modelo de objetos de Visio.
Para obtener más información sobre la función RUNADDONWARGS, el objeto Cell o la propiedad Formula, consulte referencia para desarrolladores de Visio (Referencia para desarrolladores debúsqueda> de ayuda>).
Para obtener más información sobre el uso de la función RUNADDONWARGS con Guardar como página web, vea Usar la función RUNADDONWARGS más adelante en este tema.
Escribir una macro de Visual Basic en Visio (o escribir código en un componente independiente) que inicie el complemento SaveAsWeb mediante el modelo de objetos de Automatización de Visio
Use el método Run del objeto Addon y pase los parámetros de la línea de comandos para especificar las propiedades de la página web.
El uso de esta técnica puede significar que escribiría menos código que si usara el modelo de objetos Guardar como página web para especificar parámetros, pero el uso del método Run requiere estar familiarizado con los parámetros de la línea de comandos.
Para obtener más información sobre el objeto Addon o el método Run, consulte la Referencia para desarrolladores de Visio (Referencia para desarrolladores debúsqueda> de ayuda>).
Para obtener más información sobre cómo usar el método Run para llamar a Save as Web Page, vea Llamar al método Run del complemento SaveAsWeb más adelante en este tema.
Opciones de línea de comandos Guardar como página web
El formato de los parámetros de la línea de comandos es el siguiente: /option=value
Por ejemplo, el código siguiente establece el parámetro de destino : /target=c:\temp\mypage.htm
En la tabla siguiente se enumeran las opciones de línea de comandos para la interfaz de línea de comandos Guardar como página web. La columna Nombre de método/propiedad enumera el método o la propiedad correspondientes en el modelo de objetos. Para obtener más información sobre una opción determinada, consulte el tema de método o propiedad correspondiente en esta referencia.
| Opción | Predeterminada | Tipo de valor | Nombre del método/propiedad |
|---|---|---|---|
| target | Ninguno. Debe proporcionar un valor de destino o Visio generará un error. | Texto | TargetPath |
| Pagetitle | Igual que el nombre del archivo de documento | Texto | PageTitle |
| Apoyo | TRUE | Boolean | PropControl |
| altformat | TRUE | Boolean | AltFormat |
| folder | TRUE | Boolean | StoreInFolder |
| theme | Null | Texto | ThemeName |
| Startpage | -1 (todas las páginas) | Número | StartPage |
| endpage | -1 (todas las páginas) | Número | EndPage |
| openbrowser | TRUE | Boolean | OpenBrowser |
| screenres | 1024x768 | Texto/Número1 | DispScreenRes |
| priformat | XAML | Texto/Número1 | PriFormat |
| secformat | PNG | Texto/Número1 | SecFormat |
| Silencioso | FALSE | Boolean | SilentMode |
| Tranquilo | FALSE | Boolean | QuietMode |
| Stylesheet | \ your_Visio_path\your_language_ID\Default.css | Texto | Stylesheet |
| barra de navegación | TRUE | Boolean | NavBar |
| buscar | TRUE | Boolean | Búsqueda |
| panzoom | TRUE | Boolean | PanAndZoom |
Para el tipo de valor text/number, el usuario puede especificar texto (como vml) para el tipo de salida o un número (por ejemplo, 1) que represente el índice de este tipo de salida. Cada tipo de salida tendrá su propio índice único.
Para las pantallas, los valores de texto y número se definen mediante la enumeración VISWEB_DISP_RES .
Uso de la función RUNADDONWARGS
A continuación se muestra una manera de usar la función RUNADDONWARGS para llamar al complemento SaveAsWeb .
=RUNADDONWARGS("SaveAsWeb","/target=c:\temp\mypage.htm /quiet /prop /startpage=1 /endpage=3 /altformat /priformat=vml /secformat=jpg /openbrowser")
En un escenario mencionado anteriormente en este tema se describe que un usuario puede simplemente hacer doble clic en una forma de un dibujo para generar una página web para ese dibujo. Para demostrar esto, puede colocar la fórmula anterior en la celda EventDblClick de la sección Eventos de la ventana ShapeSheet de cualquier forma de la página de dibujo (para abrir la ventana ShapeSheet, seleccione una forma en la ventana de dibujo y, a continuación, en la pestaña Programador , elija Mostrar ShapeSheet). Una vez especificada la fórmula en la celda ShapeSheet, puede hacer doble clic en esa forma en la ventana de dibujo para iniciar la característica Guardar como página web.
Para obtener más información sobre la función RUNADDONWARGS, la celda EventDblClick y la sección Eventos, vea referencia para desarrolladores de Visio (Referencia del desarrollador debúsqueda> de ayuda>).
Llamada al método Run del complemento SaveAsWeb
La característica Guardar como página web se instala como un complemento de Visio denominado SaveAsWeb. Para obtener una referencia a este complemento, use la colección Addons del objeto Application de Visio.
En el ejemplo siguiente se muestra cómo ejecutar el complemento SaveAsWeb pasando parámetros de línea de comandos al método Run del objeto Addon .
En este ejemplo, el código que inicia el complemento está contenido en un controlador de eventos para el evento DocumentSaved . La propiedad QuietMode se establece en True para que los cuadros de diálogo Guardar como página web no se muestren en la interfaz de usuario.
Private Sub Document_DocumentSaved(ByVal Document As IVDocument)
Application.Addons("SaveAsWeb").Run "/quiet=True /target=C:\temp\test.htm"
End Sub
Para obtener más información sobre la colección Addons, los objetos Application y Addon, y el evento DocumentSaved, consulte referencia de automatización de Visio (Referencia para desarrolladores debúsqueda> de ayuda>).
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.