Thema Datum  Von Nutzer Rating
Antwort
13.09.2005 16:59:06 Adu
NotSolved
14.09.2005 11:05:04 Rasta
NotSolved
14.09.2005 12:45:56 Adu
NotSolved
14.09.2005 12:51:46 Rasta
NotSolved
Rot Aw:Aw:Aw:Aw:Mappe öffnen in Workbook_BeforeSave
14.09.2005 13:07:26 Adu
NotSolved
15.09.2005 08:50:03 Rasta
NotSolved
15.09.2005 19:10:41 Adu
NotSolved

Ansicht des Beitrags:
Von:
Adu
Datum:
14.09.2005 13:07:26
Views:
1450
Rating: Antwort:
  Ja
Thema:
Aw:Aw:Aw:Aw:Mappe öffnen in Workbook_BeforeSave
Hallo Rasta,

... "dieses ereignis tritt nicht auf, da imho der direkte save_befehl des workbooks kein ereignis(before_save) auslöst. hingegen wenn du "speichern" klickst, wird das ereignis "gefeuert" und mappe 1 geöffnet- sprich, so wird das nicht funktionieren" ...

Bei mir wird schon das Eregnis (für das Speichern von mappe2) gefeuert, wenn
man das Makro Test laufen lässt. Man kann sich das im Debug-Modus schön anschauen. Es werden auch alle Codezeilen ausgeführt. Nur eben bei der Zeile
Workbooks.Open "Mappe1.xls"
passiert nichts?!

Viele Grüße
Adu

PS: Hast Du mein Beispiel bei Dir ausprobiert?

________________________


Sub Test()
Workbooks("Mappe2.xls").Save
end Sub

speichert? Bin momentan der Meinung, dass mein Problem ein Bug in VBA bzw. Excel ist (es werden in meiner Anwendung sporadisch auch andere Anweisungen in Workbook_BeforeSave, Workbook_BeforeClose Code-Teilen einfach ignoriert.)

Wäre schön, wenn Du darauf eine Antwort hättest.

Viele Grüße
Adu

Rasta schrieb am 14.09.2005 11:05:04:

Hallo Adu,

warum der fehler kommt? dafür müsste ich es mir ansehen.

entweder du prüfst ab, ob mappe1 vorhanden ist, bevor du sie schliesst

oder du machst einfach eine simple anweisung die den fehler ignoriert

on error resume next

viele grüße

rasta

Adu schrieb am 13.09.2005 16:59:06:

Hallo,

in einer Excel-Mappe "Mappe2.xls" habe ich folgendes Makro unter "DieseArbeitsmappe" eingefügt (Excel 2003):

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox "Vor dem Öffnen"
Workbooks.Open "Mappe1.xls"
MsgBox "Nach dem Öffnen"
Workbooks("Mappe1.xls").Close
End Sub

Wenn man "Mappe2.xls" speichert, dann wird der Makrocode korrekt abgearbeitet (vorausgesetzt es existiert die Excel-Mappe "Mappe1.xls" im aktuellen Verzeichnis).

Ruft man jedoch in einem Makro in einer anderen Mappe den Befehl

Workbooks("Mappe2.xls").Save

auf, so erhält man eine Fehlermeldung, weil "Mappe1.xls" für den Befehl

Workbooks("Mappe1.xls").Close

nicht geöffnet ist. Warum wird im zweiten Fall "Mappe1.xls" nicht geöffnet und wie kann man das gewünschte Verhalten erzeugen?

Danke für Eure Hilfe.

Adu

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
13.09.2005 16:59:06 Adu
NotSolved
14.09.2005 11:05:04 Rasta
NotSolved
14.09.2005 12:45:56 Adu
NotSolved
14.09.2005 12:51:46 Rasta
NotSolved
Rot Aw:Aw:Aw:Aw:Mappe öffnen in Workbook_BeforeSave
14.09.2005 13:07:26 Adu
NotSolved
15.09.2005 08:50:03 Rasta
NotSolved
15.09.2005 19:10:41 Adu
NotSolved