Freigeben über


PublishObjects.Item-Eigenschaft (Excel)

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Syntax

Ausdruck. Element (Index)

Ausdruck Eine Variable, die ein PublishObjects-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Index Erforderlich Variant Der Name oder die Indexnummer des Objekts.

Beispiel

In diesem Beispiel wird der Bezeichner aus einem <DIV> Tag abgerufen und die Zeile in einer Webseite (q198.htm) gesucht, die Sie aus einer Arbeitsmappe gespeichert haben. Das Beispiel erstellt dann eine Kopie der Webseite (newq1.htm) und fügt eine Kommentarzeile vor dem <DIV> Tag in die Kopie der Datei ein.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.