Office: Einlesen von Eigenschaften aus Zelle per VBA

Blazon · 19. September 2018

Hallo,

ich möchte, dass meine Sub die Werte für die Eigenschaften, die ich hinzufügen möchte aus einer Zelle übernimmt.

Bei folgendem Code wird ein genauer Name als Eigenschaftswert übergeben:

Code:

Sub LegeEigenschaftAn()
On Error Resume Next
ActiveWorkbook.CustomDocumentProperties.Add _
Name:="Abteilung", LinkToContent:=False, _
Type:=msoPropertyTypeString, Value:="Test"
On Error GoTo 0
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Ich möchte allerdings, dass der Wert aus einer Zelle übernommen wird.
Mit der Anweisung Value := Cells(1,1) funktioniert es jedenfalls nicht.

optionale Zusatzfrage: Wieso werden so hinzugefügte Eigenschaften nicht bei einem Rechtsklick aufs Dokument -> Eigenschaften -> Details mit angezeigt?

optionale Zusatzfrage2: Wenn man Excel-Dateien nach Sharepoint hoch-lädt, werden dann die Excel-Eigenschaften automatisch als Metadaten auf Sharepoint hinzugefügt?

:)

MisterBurns · 20. September 2018

Ich glaube nicht, dass das so geht. CustomDocumentProperties.Add gibt es mMn nur in Word.

Office: Einlesen von Eigenschaften aus Zelle per VBA

Einlesen von Eigenschaften aus Zelle per VBA

Einlesen von Eigenschaften aus Zelle per VBA

Einlesen von Eigenschaften aus Zelle per VBA - Similar Threads - Einlesen Eigenschaften Zelle

[VBA] CSV einlesen, mit zeilennummer

VBA:Laufzeitfehler beim Einlesen in Variable

Array aus Excel Tabelle einlesen Word VBA

Excel Vba Mehrere Werte aus mehreren Dateien in eine Tabelle sortieren

VBA Code Dateien Einlesen

QR einlesen mittels Lesepistole

Barcode mit Steuerzeichen in ein Formularfeld einlesen