Excel Befehl - Word Befehl
30.10.2003 15:13:46
karl
Weiss von Euch jemand wie mein Excel Makro Befehl in Word ausschauen koennte?
Das Pgm macht folgendes:
Suche alle .xls Dateien - Kopfzeile wird geaendert - Excel Datei wird geschlossen.
Ich brauche aber jetzt das ganze fuer .doc Datein. In den .doc Dateien sollte die Kopfzeile geaendert werden.
If .Execute() > 0 Then
For I = 1 To .FoundFiles.Count
' .xls Dateien öffnen, Verknüpfungen nicht aktualisieren
Workbooks.Open .FoundFiles(I), updatelinks:=0
' Kopfzeile wird geändert
ActiveSheet.PageSetup.CenterHeader = kopfzeile
ActiveWorkbook.Close True
Next I
End If
Gruss Karl