title image


Smiley Re: Teil des Dokumentnamens automatisch einfügen
So z. B.





Sub DatNameEinfuegen()

Dim strDatName As String

strDatName = ActiveDocument.Name



ActiveDocument.Bookmarks("Datname").Range.InsertAfter Left(strDatName, 5)



End Sub





Die Textmarke, die du in das Dokument einfuegen musst, heisst Datname




Gruesse

Alexandra



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: