Dateieigenschaften in Excel und Powerpoint darstellen

[Swissmentor]

Wie kann ich in Excel und Powerpoint die Eigenschaften der Datei (z.B.
"Author") in einer Zelle der Excel Datei oder einem Feld in der Masterfolie
von Powerpoint darstellen? In Word kann unter "Einfügen" -> "Feld" eine
Feldfunktion in den Text gesetzt werden.

[Helmut Weber]

Hallo,

als VBA-Nutzer weiß man vieles nicht,
was Formelverwender wissen, weil man
alles so leicht seber machen kann.

Für Excel würde ich mir eine beutzerdefinierte Funktion machen:

Public Function ExAuthor() As String
ExAuthor = ActiveWorkbook.BuiltinDocumentProperties("Author").Value
End Function

Für Powerpoint, scheint es, müsste man ein Makro bemühen.

Etwa so, aufgezeichnet:

Sub Macro1()
With ActivePresentation.Slides.Range.HeadersFooters
With .DateAndTime
.Format = ppDateTimeMdyy
.Text =
ActivePresentation.BuiltInDocumentProperties("Author").Value
.UseFormat = msoFalse
.Visible = msoTrue
End With
.Footer.Visible = msoTrue
.SlideNumber.Visible = msoFalse
End With
End Sub

Aber da kann man den Autor auch gleich mit Hand eintragen.

[Swissmentor]

Post by Swissmentor
Wie kann ich in Excel und Powerpoint die Eigenschaften der Datei (z.B.
"Author") in einer Zelle der Excel Datei oder einem Feld in der Masterfolie
von Powerpoint darstellen? In Word kann unter "Einfügen" -> "Feld" eine
Feldfunktion in den Text gesetzt werden.

Vielen Dank. Wenn man diese Informationen nun in ein VBA Programm
eingesetzt hat, sollten sie jeweils automatisch auf den Folien oder im Excel
Spreadsheet an einer bestimmten Stelle erscheinen (genau wie man in Word
eine Feldfunktion, die z.B. den Autor enthäl,t in die Fusszeile setzen kann).
Nebenbei: wir schreiben von unserem Dokumentenmanagementsystem Metadaten
direkt in die Dokumenteneigenschaften und sollten diese dann auch wieder für
den Benutzer einfach sichtbar machen können).
Gruss Alex

[Helmut Weber]

Für Excel weist man einer Zelle
die benutzdefinierte Funktion zu.

Für Powerpoint erledigt das Makro alles.

Wie man in Excel den Wert einer Zelle in
eine Kopf- oder Fußzeile kriegt,
wüsste ich auch gerne.

[Swissmentor]

Ganz herzlichen Dank für Ihre Hilfe.
Ich werde mich morgen dahinter machen und Ihre Makros ausprobieren
Schöne Woche trotz dem Regen
Alex Zbinden

Post by Helmut Weber
Für Excel weist man einer Zelle
die benutzdefinierte Funktion zu.
Für Powerpoint erledigt das Makro alles.
Wie man in Excel den Wert einer Zelle in
eine Kopf- oder Fußzeile kriegt,
wüsste ich auch gerne.
--
Gruß
Helmut Weber
"red.sys" & chr$(64) & "t-online.de"
Win XP, Office 2003 (US-Versions)