XL97: Zugriffsverletzung oder Seitenfehler, die eine Microsoft Excel-Arbeitsblattobjekt schließen

Wenn Sie ein Microsoft Excel-Arbeitsblatt-Objekt zu aktivieren, und klicken Sie dann auf "Schließen und zurückkehren zu <Document>," wobei <Document> der Name des Dokuments ist, die das Microsoft Excel-Arbeitsblatt-Objekt enthält erhalten Sie eine Fehlermeldung, die eine der folgenden ähnlich ist.

Microsoft Windows 95

Wenn Sie auf Details klicken, wird möglicherweise eine Fehlermeldung ähnlich der folgenden angezeigt:

Microsoft Windows NT

Dieses Problem kann auftreten, wenn folgende Bedingungen erfüllt sind:

• Sie haben eine Visual Basic für Applikationen-Makro mit einem Application-Ereignishandler für das WorkbookBeforeClose-Ereignis erstellt. -und-
  
  
• Sie öffnen zwei Excel-Tabellenobjekte, die in ein Dokument eingefügt wurden, die in einem anderen Programm (z. B. Microsoft Word) erstellt wurde. -und-
  
  
• Eines der Excel-Arbeitsblatt-Objekte ist verknüpft mit der anderen Excel-Arbeitsblatt-Objekt. -und-
  
  
• Eines der Excel-Tabellenobjekte schließen.

Microsoft hat dies ein Problem in Microsoft Excel 97 für Windows bestätigt. Dieses Problem wurde in Microsoft Office 97 Service Release 2 (SR-2) behoben.

Weitere Informationen zu SR-2 finden Sie in der folgenden Artikel der Microsoft Knowledge Base:

Microsoft bietet Programmierbeispiele für Abbildung nur ohne Gewährleistung oder konkludent, einschließlich, aber nicht beschränkt auf konkludenten Garantien der Handelsüblichkeit und/oder Eignung für einen bestimmten Zweck. Die zur Verfügung gestellten Makro- und Programmierungsbeispiele sollen lediglich exemplarisch die Funktionsweise des Beispiels aufzeigen. Spezialisten von Microsoft Support Services können bei Erläuterung die Funktionalität einer bestimmten Prozedur helfen, Sie werden ändert jedoch nicht Beispielen bieten Funktionen hinzugefügt oder Verfahren, um Ihren speziellen Anforderungen erstellen.
Wenn Sie Programmiererfahrung, beschränkt haben, sollten Sie ein Microsoft Certified Partner oder die Microsoft Advisory Services wenden. Weitere Informationen finden Sie auf diese Websites von Microsoft:

Microsoft Certified Partner - https://partner.microsoft.com/global/30000104 (https://partner.microsoft.com/global/30000104)

Microsoft-Sicherheitsempfehlung Services - http://support.microsoft.com/gp/advisoryservice (http://support.microsoft.com/gp/advisoryservice)

Weitere Informationen zu den Supportoptionen, die verfügbar sind und wie Sie Microsoft kontaktieren besuchen Sie in der folgenden Website: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms)

Beispiel des Problems

Gehen Sie folgendermaßen vor um ein Beispiel für dieses Problem zu sehen.

Erstellen des Ereignishandlers WorkbookBeforeClose

1. Starten Sie Excel.
2. Wenn Sie keine persönliche Makroarbeitsmappe (Personal.xls) besitzen eine erstellen; andernfalls fahren Sie mit Schritt 3, wenn Sie bereits persönliche Makroarbeitsmappe verfügen. Gehen Sie folgendermaßen vor um diese Arbeitsmappe zu erstellen:
   
   
   1. Im Menü Extras auf Makro, und klicken Sie dann auf aufzeichnen.
   2. Klicken Sie auf persönliche Makroarbeitsmappe in der Liste im, und klicken Sie dann auf OK.
   3. Im Menü Extras auf Makro, und klicken Sie dann auf Aufzeichnung beenden.
3. Drücken Sie [Alt]+[F11], um den Visual Basic-Editor zu starten.
4. Drücken Sie STRG + R, um zum Project-Explorerfenster zu wechseln.
5. Klicken Sie im Fenster Projektexplorer auf VBAProject (Personal.xls).
6. Klicken Sie im Menü Einfügen auf Klassenmodul um ein Class-Modul einzufügen.
7. Geben Sie den folgenden Code in das Klassenmodul:

          Public WithEvents App As Application
   
          Private Sub App_WorkbookBeforeClose(ByVal Wb As Excel.Workbook, _
          Cancel As Boolean)
   
             MsgBox "App_WorkbookBeforeClose"
   
          End Sub
   						

8. Doppelklicken Sie im Projektexplorer von Visual Basic-Editor im aktuellen Projekt auf ThisWorkbook.
9. Geben Sie den folgenden Code in das Modulblatt ThisWorkbook.

   
          Dim X As New Class1
   
          Private Sub Workbook_Open()
   
             Set X.App = Application
   
          End Sub
   						

10. Klicken Sie im Menü Datei auf "schließen und zurück zu Microsoft Excel.
11. Klicken Sie auf Beenden im Menü Datei. Klicken Sie auf Ja, wenn Sie aufgefordert werden, um die Änderungen in der persönlichen Makro-Arbeitsmappe zu speichern.

Excel-Objekte in einem Word-Dokument einfügen

Gehen Sie folgendermaßen vor um die Excel-Objekte einzufügen,

1. Starten Sie Word.
2. Klicken Sie im Menü Einfügen auf Objekt. Klicken Sie auf Microsoft Excel-Arbeitsblatt in der Liste, und klicken Sie dann auf OK.
   
   Ein Excel-Arbeitsblatt-Objekt wird in Ihr Dokument eingefügt.
3. Klicken Sie auf das Word-Dokument um zu Word zu wechseln.
4. Klicken Sie im Menü Einfügen auf Objekt. Klicken Sie auf Microsoft Excel-Arbeitsblatt in der Liste, und klicken Sie dann auf OK.
   
   Ein Excel-Arbeitsblatt-Objekt wird in Ihr Dokument eingefügt.
5. Klicken Sie auf das Word-Dokument um zu Word zu wechseln.
6. Klicken Sie mit der rechten Maustaste auf das erste eingebettete Excel-Objekt, zeigen Sie auf Arbeitsblatt-Objekt im Kontextmenü auf, und klicken Sie dann auf Öffnen.
7. Wechseln Sie zu Word.
8. Klicken Sie mit der rechten Maustaste auf das zweite eingebettete Excel-Objekt, zeigen Sie auf Arbeitsblatt-Objekt im Kontextmenü auf, und klicken Sie dann auf Öffnen.
9. Geben Sie die folgende Formel in Zelle A1 der "Arbeitsblatt in Dokument1 2" Arbeitsmappe und dann EINGABETASTE:

          ='[Worksheet in Document3]Sheet1'!$A$1

10. Klicken Sie im Menü Datei auf "Schließen und zurückkehren zu Dokument1."

Sie erhalten ein Fehlermeldung, ähnelt die Nachrichten, die im Abschnitt "Problembeschreibung" in diesem Artikel beschriebenen.