Método PublishObjects.Add (Excel)

Crea un objeto que representa un elemento de un documento guardado en una página web. Estos objetos facilitan las actualizaciones posteriores de la página web mientras se realizan cambios automatizados en el documento en Microsoft Excel. Devuelve un objeto PublishObject .

Sintaxis

expresión. Agregar (SourceType, FileName, Sheet, Source, HtmlType, DivID, Title)

expresión Variable que representa un objeto PublishObjects .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
SourceType	Obligatorio	XlSourceType	Tipo de origen.
FileName	Opcional	Variant	Cadena. Dirección URL (en la intranet o en la web) o ruta de acceso (local o de red) en la que se guardó el objeto de origen.
Sheet	Opcional	Variant	Nombre de la hoja de cálculo que se guardó como página web.
Source	Optional	Variant	Nombre exclusivo utilizado para identificar elementos que tienen una de las siguientes constantes como argumento SourceType: xlSourceAutoFilter, xlSourceChart, xlSourcePivotTable, xlSourcePrintArea, xlSourceQuery o xlSourceRange. Si SourceType es xlSourceRange, Source especifica un rango, que puede ser un nombre definido. Si SourceType es xlSourceChart, xlSourcePivotTable o xlSourceQuery, Source especifica el nombre de un gráfico, informe de tabla dinámica o tabla de consulta.
HtmlType	Opcional	Variant	Especifica si el elemento se ha guardado como un componente web interactivo de Microsoft Office o como texto e imágenes estáticos. Puede ser una de las constantes XlHTMLType : xlHtmlCalc, xlHtmlChart, xlHtmlList o xlHtmlStatic.
DivID	Opcional	Variant	Identificador único que se usa en la etiqueta DIV HTML para identificar el elemento en la página web.
Title	Opcional	Variant	Título de la página web.

Valor devuelto

Objeto PublishObject que representa el nuevo elemento.

Ejemplo

En este ejemplo se guarda el intervalo D5:D9 en la hoja de cálculo Del primer trimestre del libro activo en una página web denominada Stockreport.htm.

With ActiveWorkbook.PublishObjects.Add(SourceType:=xlSourceRange, _ 
    Filename:="\\Server\Stockreport.htm", Sheet:="First Quarter", Source:="$G$3:$H$6", _ 
    HtmlType:=xlHtmlStatic, DivID:="Book1_4170") 
        .Publish (True) 
        .AutoRepublish = False 
End With

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.