WordVBA auf Seitennummer von Beschriftung zugreife
12.03.2015 22:44:48
Beschriftung
ich habe eine Worddatei mit Beschriftungen vom Typ "Abbildung". Jetzt würde ich gerne in VBA auf eine Variable die Seitennummer schreiben, auf welcher die Abbildung im Dokument ist. Als Beispiel möchte ich wissen auf welcher Seite die Abbildung 7 ist. Leider weiß ich nicht wie ich das umsetzen soll. Vielen Dank für eure Hilfe.
Sub Makro1()
Dim Nummer As Long
Nummer = ActiveDocument.Fields("Abbildung").ReferenceItem("7").ReferenceKind(wdPageNumber)
End Sub