Ich würde gerne die Versionsnummer, die in verschiedenen Filez in der Fußzeile liegt, in einem Übersichtsdokument referenzieren, kenne aber die 'Adresse' der Fußzeile nicht ..
Danke im Voraus !
Wenn die Fußzeile nicht dynamisch zugewiesen wird müsste es so gehen:
MsgBox ActiveWorkbook.ActiveSheet.PageSetup.RightFooter
bzw. CenterFooter
bzw. LeftFooter
Gruß Ralph
Beispiel
sub footer()
MsgBox ActiveWorkbook.ActiveSheet.PageSetup.RightFooter
End Sub
sub footer()
fuß = Workbooks("Quellarbeitsmappe").ActiveSheet.PageSetup.RightFooter
Workbooks("ZielArbeitsmappe").ActiveSheet.Range("A1").Value = fuß
End Sub
Natürlich musst du das deinen Vorgaben anpassen und möglicherweise das ganze über Schleifen auswerten (wenn mehrere Arbeitsmappen auszuwerten sind).
Ansonsten bräuchte man mehr Angaben um speziell für Dich eine Lösung zu kreieren.
Viel Spaß damit
Ralph
Danke aus der Mozartstadt :)
mag er jetzt nicht...
Also: Es liegt außerhalb des gültigen Bereiches wenn ichs ausführen will...