PublishObject.DivID-Eigenschaft (Excel)

Gibt den eindeutigen Bezeichner zurück, der zur Identifizierung eines HTML-Tags <DIV> auf einer Webseite verwendet wird. Das Tag ist einem Element in einem Dokument zugeordnet, das Sie auf einer Webseite gespeichert haben. Bei einem Element kann es sich um eine vollständige Arbeitsmappe, ein Arbeitsblatt, einen ausgewählten Druckbereich, einen AutoFilter-Bereich, einen Zellbereich, ein Diagramm, einen PivotTable-Bericht oder eine Abfragetabelle handeln. Schreibgeschützte Zeichenfolge.

Syntax

Ausdruck verwendet werden. DivID

Ausdruck Eine Variable, die ein PublishObject-Objekt darstellt.

Beispiel

In diesem Beispiel wird ein Zellbereich auf einer Webseite gespeichert, und dann wird der Bezeichner aus dem <DIV> Tag dieses Elements abgerufen und die Zeile auf der gespeicherten Webseite gesucht (q198.htm). Im Beispiel wird auch eine Kopie der Webseite (newq1.htm) erstellt und eine Kommentarzeile vor dem <DIV> Tag in der Kopie der Datei eingefügt.

Set objPO = ActiveWorkbook.PublishObjects.Add( _ 
 SourceType:=xlSourceRange, _ 
 Filename:="\\Server1\Reports\q198.htm", _ 
 Sheet:="Sheet1", _ 
 Source:="C2:D6", _ 
 HtmlType:=xlHtmlStatic) 
objPO.Publish 
strTargetDivID = objPO.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.