Freigeben über

PublishObject.DivID-Eigenschaft (Excel)

  • Artikel

Gibt den eindeutigen Bezeichner zurück, der zum Identifizieren 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. DivID

Ausdruck Eine Variable, die ein PublishObject-Objekt darstellt.

Beispiel

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

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.