Makro,das eine Datei aktualisiert und wieder schließt :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2003] Makro,das eine Datei aktualisiert und wieder schließt

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

M.P._61
Newbie
Newbie

Anmeldedatum: 03.04.2008
Beiträge: 7

Verfasst am: 03.04.2008, 15:08

Hallo,

habe folgendes Problem.Arbeite mit mehreren Excel-Mappen, die miteindander verknüpft sind. Ich steuere praktisch über eine Excel-Mappe die Anderen.Damit eine Änderung in der Steuermappe in anderen Mappen wirksam wird, muss ich wieder alle Dateien öffnen und die Aktualisierungs-Abfrage bejahen und wieder die Datei sichern und schließen.Da der Arbeitsspeicher überlastet ist (Dateien sind meist über 25 MB groß) kann ich nur max. 4 Dateien auf einmal öffnen.
Gibt es eine Möglichkeit Excel zu sagen aktualisiere und schließe die Datei sofort wieder, damit der Arbeitsspeicher nie überlastet wird. Ich könnte damit all die Dateien, die aktualisiert werden sollen, auswählen und Excel im Hintergrund arbeiten lassen.
Eigentlich geht es mir nur noch um den Schritt automatisches Speichern und wieder Schließen, denn über Extras/Optionen/Bearbeiten kann man ja das bestätigen von Aktulisierungen für eine Datei steuern.

Gibt es da eine Lösung ?

Bedanke mich im Voraus.

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 03.04.2008, 15:27

Hallo!

Dieser Code öffnet die angegebene Mappe, aktualisiert die Verknüpfungen, speichert sie und schließt sie wieder.

Code:

Sub Test()
Dim Mappe As String
Mappe = "E:\Test\Test\Mappe2.xls"
Workbooks.Open Filename:=Mappe, UpdateLinks:=3
ActiveWorkbook.Close SaveChanges:=True
End Sub

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!

M.P._61
Newbie
Newbie

Anmeldedatum: 03.04.2008
Beiträge: 7

Verfasst am: 04.04.2008, 09:26

Vielen Dank für die schnelle Antwort.
Habe den Code in ein Formular mit einem Button abgelegt,welches ich automatisch beim Öffnen der Datei anzeigen lasse.
Allerdings würde ich gerne dynamischer arbeiten was die Auswahl der zu aktualisierenden Datei betrifft. Würde gerne über ein Fesnter (wie bei "Datei öffnen"-Explorer Fenstern) mehrere Dateien mit Strg auswählen und aktualisieren lassen.
Es ist eine Weile her als noch etw. programmiert habe.Aber eine Lösung wäre doch,dass man erst abfrägt wieviele Datein aktualisiert werden sollen.Dann mit einer Schleife der Anzahl entsprechend Variablen generieren und mit getText() diesen den Pfad zuweisen.

Oder haben Sie bessere Lösung?

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 04.04.2008, 09:50

Hallo!

Dann teste mal dies:

Code:

Sub Test()
Dim intDat As Integer, DatOP
intDat = 0
DatOP = Application.GetOpenFilename("Excel-Dateien(*.xl*),*.xl*", MultiSelect:=True)
If IsArray(DatOP) Then
For intDat = LBound(DatOP) To UBound(DatOP)
Workbooks.Open Filename:=DatOP(intDat), UpdateLinks:=3
ActiveWorkbook.Close SaveChanges:=True
Next intDat
Else
MsgBox "Sie haben keine Mappe ausgewählt."
End If
End Sub

M.P._61
Newbie
Newbie

Anmeldedatum: 03.04.2008
Beiträge: 7

Verfasst am: 04.04.2008, 10:39

Funktioniert super.
Nochmals viiiielen Dank für schnelle Hilfe.

Anfänger2008
Newbie
Newbie

Anmeldedatum: 11.08.2008
Beiträge: 3

Verfasst am: 11.08.2008, 17:53

Hallo Schatzi

Ich finde das Makro oben echt toll!

Situation:
Ich muss ca. 30 Excel Datein aktualisieren, jede bracht etwas 2-3 min. bis sie fertig mit den berechnungen ist.

Ich habe nun folgende folgende Probleme:
- Die zu aktualisierende Datei geht so schnell wieder zu das es gar nicht fertig rechnet und somit überall fehlermeldungen erscheinen

- es wäre gut, wenn es eine datei nach der anderen öffnen aktualisieren, speichern und schliessen würde - sind alle gleichzeitig geöffnet ist der Computer überlasstet und es rechnet gar nichts mehr.

Kannst Du mir helfen???

Vielen Dank im Voraus
Anfänger2008

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 11.08.2008, 18:12

Hallo!

Sorry, aber damit kenne ich mich leider nicht aus...
Ich hatte gehofft, dass Excel automatisch solange wartet, bis alles aktualisiert ist, bevor es die Datei wieder schließt. Aber das scheint ja offensichtlich nicht der Fall zu sein.

Anfänger2008
Newbie
Newbie

Anmeldedatum: 11.08.2008
Beiträge: 3

Verfasst am: 13.08.2008, 13:20

gibt es keinen Befehl den man einbauen kann, damit das excel einen moment wartet??

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 13.08.2008, 23:32

Hallo!

Es gibt z.B.
Application.Wait
und
Application.OnTime
aber da ich damit nicht arbeite, kenne ich mich damit auch nicht aus.
Vielleicht hilft dir eines von beiden.

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Vista, rtfhtml.dll datei fehlt, outlo...	Peter Marchert	Microsoft Outlook Hilfe	5	30.11.2008, 19:43
	Datei nach dem Speichern verschwunden	schisa	Microsoft Word Hilfe	0	28.11.2008, 00:10
	Word 2007 Makro bringt Fehlermedlung ...	Ted	Microsoft Word Hilfe	0	21.11.2008, 21:31
	WQord 2007 fehler beim Makro (kopilie...	Ted	Microsoft Word Hilfe	0	21.11.2008, 07:40
	Vierecke Word - Datei nicht mehr lesb...	Limited	Microsoft Word Hilfe	2	20.11.2008, 11:07

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de