title image


Smiley Re: Word: Datei-Info durch Makro auslesen?
Sub TestB()Hallo HagenDie Routine TestB schreibt alle Dokumenteneigenschaften in das aktive Dokument, Routine TestC schreibt ein spezifische Dokumenteneigenschaft (nämlich den Autor) heraus.Ganz, ganz unten (wieso eigentlich der ellenlange Abstand ?!), eine vollständige Tabelle, welche die Zusammenhänge zwischen Dokumenteneigenschaft-ID, englischer und deutscher Begriff aufzeigt.GrussSilvia WidmerSub TestB()For i = 1 To 30 With ActiveDocument.BuiltInDocumentProperties(i) On Error Resume Next Selection.TypeText Text:=i & vbTab & .Name & vbTab & .Value & vbCrLf On Error GoTo 0 End With Next i With ActiveDocument.Content.ParagraphFormat .TabStops.Add (CentimetersToPoints(1)) .TabStops.Add (CentimetersToPoints(8)) End WithEnd SubSub TestC() Selection.TypeText Text:=ActiveDocument.BuiltInDocumentProperties("Author").ValueEnd SubDokumenten-Eigenschaften (Tabelle)IDEnglische BezeichnungDeutsche BezeichnungIDEnglische BezeichnungDeutsche Bezeichnung1TitleTitel16Number of CharactersZeichen2SubjectThema17SecuritySchutz3AuthorAutor18CategoryKategorie4KeywordsStichwörter19Format 5CommentsKommentar20ManagerManager6TemplateDokVorlage21CompanyFirma7Last AuthorGespeichertVon22Number of BytesBytes8Revision NumberÜberarbeitungsnummer23Number of LinesZeilen9Application NameAnwendungsname24Number of ParagraphsAbsätze10Last Print DateZuletztGedruckt25Slides 11Creation DateErstellDatum26Number of NotesKommentar12Last Save TimeZuletztGespeichertZeit27Hidden Slides 13  28Number of Multimedia Clips 14Number of PagesSeiten29Hyperlink BaseHyperLinkBasis15Number of WordsWörter30Number of Characters with spacesZeichen mit Leerzeichen

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: