AW: Aktualisierung von Arbeitsmappen
04.08.2006 14:31:37
Arbeitsmappen
Hallo Horst,
da du beim Aufbau deiner Dateien ein solches Konstrukt von gegenseitigen Abhängigkeiten/Verknüpfungen kreiert hast ist es am einfachsten mit dem Öffnen von DokumentA.xls das DokumentB.xls automatisch mit zu öffenen. Funktioniert mit folgendem Makro, dass du im VBA-Editor unter "DieseArbeitsmappe" einfügst:
Private Sub Workbook_Open()
Application.Workbooks.Open FileName:="C:\MeineDateien\DokumentB.xls"
End Sub
So sind bei Datenänderungen immer beide Dateien aktuell, wenn in den Tabellen "normale" Berechnungsformeln verwendet werden.
Falls die Aktualisierung in DokumentB den Start eines Makros in B erfordert dann kannst du die diese Aktualisierung vom DokumentA per Button starten. Das entsprechende Makro speicherst du im DokumentA und zeichnest es auf beginnend im DokumentA, wechsle nach B, Makro in B starten, wechsel nach A, Makro in A starten.
makro schaut dann etwa so aus:
Sub AundB_aktualisieren()
Windows("DokumentB.xls").Activate
Application.Run "DokumentB.xls!TestMakroBerechenDokB"
Windows("DokumentA.xls").Activate
Application.Run "DokumentA.xls!TestMakroBerechenDokA"
End Sub
Dieses Makro kannst du dann mit einem Button in DokumentA starten. Code für Button schaut dann etwa so aus:
Private Sub CommandButton1_Click()
Call AundB_aktualisieren
End Sub
Gruß
Franz