SharePoint Dokumentenversion in Excel
18.01.2022 17:08:07
QM-Queen
wir nutzen SharePoint als Dokumentenmanagementsystem für das Qualitätsmanagement. Naturgemäß müssen wir in den Dokumenten die Versionsnummer eines Dokuments anzeigen.
Das geht in Word über die Schnellbausteine/Dokumenteneigenschaften ganz einfach und problemlos. Wir haben dafür in SharePoint bei den Informationsverwaltungsrichtlinien die Bezeichnungen mit Bezeichnungsformat {Version} aktiviert. Über die Schnellbausteine können wir diese zur Anzeige der SharePoint-Versionsnummer in Word nutzen, indem wir den Schnellbaustein "Bezeichnung" z.B. in die Fußzeile einfügen.
Wie kriege ich diese Info nun auch in die Fußzeile von Excel-Dokumenten? Excel hat ja nur eine eingeschränkte Anzahl von Schnellbausteinen.
Mit dem folgenden schaffe ich es, die Liste der Metadaten in der Excel-Tabelle anzeigen zu lassen:
Sub CustomProp()
Dim p As Object
Dim prop As MetaProperties
Set prop = ActiveWorkbook.ContentTypeProperties
rw = 1
Worksheets(1).Activate
For Each p In ActiveWorkbook.ContentTypeProperties
On Error Resume Next
Cells(rw, 8).Value = ActiveWorkbook.ContentTypeProperties(rw).Name
Cells(rw, 9).Value = ActiveWorkbook.ContentTypeProperties(rw).Value
rw = rw + 1
Next
End Sub
Hat jemand einen Tipp für mich? Ich glaube ja, das ist super-einfach und ich bin einfach so ein Noob...