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	Variantes	O nome ou número de índice do objeto.

Exemplo

Este exemplo obtém o identificador de uma <DIV> marca e localiza a linha em uma página da Web (q198.htm) que você salvou de uma pasta de trabalho. Em seguida, o exemplo cria uma cópia da página da Web (newq1.htm) e insere uma linha de comentário antes da <DIV> marca na cópia do arquivo.

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.