| 
                              
                                  Thema
                              
                           | 
                          
                              
                                  Datum 
                           | 
                          
                              
                                  Von Nutzer
                           | 
                          
                              
                                  Rating
                           | 
                          
                               
                                  Antwort 
                           | 
                      
                      
 | 
13.09.2005 16:59:06 | 
Adu | 
 | 
 | 
 | 
14.09.2005 11:05:04 | 
Rasta | 
 | 
 | 
 | 
14.09.2005 12:45:56 | 
Adu | 
 | 
 | 
 | 
14.09.2005 12:51:46 | 
Rasta | 
 | 
 | 
  Aw:Aw:Aw:Aw:Mappe öffnen in Workbook_BeforeSave  | 
14.09.2005 13:07:26 | 
Adu | 
 | 
 | 
 | 
15.09.2005 08:50:03 | 
Rasta | 
 | 
 | 
 | 
15.09.2005 19:10:41 | 
Adu | 
 | 
 | 
                  
    
                    
             
								 
									
										Von: 
                                            Adu | 
										Datum: 
                                            14.09.2005 13:07:26 | 
										Views:
                                             
                                            1739 | 
										Rating:
                                                                          | 
										Antwort: 
                                             
                                             
                                             | 
									
									
										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
       | 
									
								
							
 					
		   
 
                          
                        
                                
                    - 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
 
                                    
                            
                             
                          
	
                         
                                  
                             
                             Bitte geben Sie ein aussagekräftiges Thema an. 
                            
                            Bitte geben Sie eine gültige Email Adresse ein!
                            
                            
                       
                                - 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 | 
 | 
 | 
 | 
14.09.2005 11:05:04 | 
Rasta | 
 | 
 | 
 | 
14.09.2005 12:45:56 | 
Adu | 
 | 
 | 
 | 
14.09.2005 12:51:46 | 
Rasta | 
 | 
 | 
  Aw:Aw:Aw:Aw:Mappe öffnen in Workbook_BeforeSave  | 
14.09.2005 13:07:26 | 
Adu | 
 | 
 | 
 | 
15.09.2005 08:50:03 | 
Rasta | 
 | 
 | 
 | 
15.09.2005 19:10:41 | 
Adu | 
 | 
 |