Método PublishObjects.Add (Excel)

Artigo
04/07/2023

Cria um objeto que representa um item em um documento salvo em uma página da Web. Esses objetos facilitam as atualizações subsequentes na página da Web enquanto as alterações automatizadas estão sendo feitas no documento no Microsoft Excel. Retorna um objeto PublishObject .

Sintaxe

expressão. Adicionar (SourceType, FileName, Sheet, Source, HtmlType, DivID, Title)

Expressão Uma variável que representa um objeto PublishObjects .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
SourceType	Obrigatório	XlSourceType	O tipo de fonte.
FileName	Opcional	Variant	String. A URL (na intranet ou na Web) ou caminho (local ou rede) para o qual o objeto de origem foi salvo.
Sheet	Opcional	Variantes	O nome da planilha que foi salva como uma página da Web.
Fonte	Opcional	Variantes	Um nome exclusivo usado para identificar itens que possuem como argumento SourceType uma destas constantes: xlSourceAutoFilter, xlSourceChart, xlSourcePivotTable, xlSourcePrintArea, xlSourceQuery ou xlSourceRange. Se SourceType for xlSourceRange, Source especificará um intervalo, que pode ser um nome definido. Se SourceType for xlSourceChart, xlSourcePivotTable ou xlSourceQuery, Source especificará o nome de um gráfico, um relatório de tabela dinâmica ou uma tabela de consulta.
HtmlType	Opcional	Variantes	Especifica se o item será salvo como um componente interativo do Microsoft Office Web Components ou como texto e imagens estáticas. Pode ser uma das constantes XlHTMLType : xlHtmlCalc, xlHtmlChart, xlHtmlList ou xlHtmlStatic.
DivID	Opcional	Variantes	O identificador exclusivo usado na marca HTML DIV para identificar o item na página da Web.
Title	Opcional	Variantes	O título da página da Web.

Valor de retorno

Um objeto PublishObject que representa o novo item.

Exemplo

Este exemplo salva o intervalo D5:D9 na planilha do Primeiro Trimestre na pasta de trabalho ativa em uma página da Web chamada 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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

Compartilhar via