Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt ein einzelnes Objekt aus einer Auflistung zurück.
Syntax
expression.Item (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
Dieses Beispiel ruft den Bezeichner aus einem <DIV> Tag ab und sucht die Zeile in einer Webseite (q198.htm), die Sie aus einer Arbeitsmappe gespeichert haben. Anschließend wird eine Kopie der Webseite erstellt (newq1.htm) und eine Kommentarzeile vor dem <DIV> Tag in der Kopie der Datei eingefügt.
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.