Propriedade PublishObjects.Item (Excel)

Retorna um único objeto de uma coleção.

Sintaxe

expressão. Item (Índice)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Índice	Obrigatório	Variant	O nome ou número de índice do objeto.

Exemplo

Este exemplo obtém o identificador a partir de uma <DIV> etiqueta e localiza a linha numa página Web (q198.htm) que guardou a partir de um livro. Em seguida, o exemplo cria uma cópia da página Web (newq1.htm) e insere uma linha de comentário antes da <DIV> etiqueta na cópia do ficheiro.

strTargetDivID = ActiveWorkbook.PublishObjects.Item(1).DivID 
Open "\\server1\reports\q198.htm" For Input As #1 
Open "\\server1\reports\newq1.htm" For Output As #2 
While Not EOF(1) 
 Line Input #1, strFileLine 
 If InStr(strFileLine, strTargetDivID) > 0 And _ 
 InStr(strFileLine, "<div") > 0 Then 
 Print #2, "<!--Saved item-->" 
 End If 
 Print #2, strFileLine 
Wend 
Close #2 
Close #1

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.