Tabelle nach Aktualisierung automatisch speichern
Jutta
ich möchte aus einer Tabelle heraus eine andere Tabelle (enthält mehrere Pivotdateien) öffnen und nach der Aktualisierung (dauert ca. 40 Sekunden)speichern und wieder schließen.
Mein Makro öffnet und speichert, nur bevor die Aktualisierung vollständig ist.
Wo habe ich meinen Fehler ?
Sub HG()
ChDir "F:\group\CRPUB\Allgemein CR\Ratio\Unterlagen Ratiobesprechung"
Workbooks.Open Filename:= _
"F:\group\CRPUB\Allgemein CR\Ratio\Unterlagen Ratiobesprechung\PIC_Ausw._ Lohn,Mat.,GK nach HG.xls"
Application.OnTime Now + TimeValue("00:01:00"), "speichern_HG"
End Sub
Sub Speichern_HG()
Workbooks.Open Filename:= _
"F:\group\CRPUB\Allgemein CR\Ratio\Unterlagen Ratiobesprechung\PIC_Ausw._ Lohn,Mat.,GK nach HG.xls"
ActiveWorkbook.Save
ActiveWindow.Close
End Sub
Gruß
Jutta