Bei "Formular schliessen" springt das Programm einSchreitt zu weit

[Axel18]

Von MainForm komme ich über eien Button in die Kundenübersicht. Darin arbeite ich und will dann mit "Formular schliessen" wieder zum MainForm zurück (siehe Code)

Private Sub Befehl20_Click()
On Error GoTo Err_Befehl20_Click


    DoCmd.Close

Exit_Befehl20_Click:
    Exit Sub

Err_Befehl20_Click:
    MsgBox Err.Description
    Resume Exit_Befehl20_Click
   
End Sub

Das passiert aber nicht, sondern es wird zur Datenbank zurückgesprungen. An anderer Stelle klappt das Zurückspringen auf vorherige Formulare.

[DF6GL]

Hallo,

durch das Schließen eines Form wird nirgendwo "hingesprungen", es wird lediglich das davor angezeigte Objekt wieder angezeigt, außer dass diese Reihenfolge irgendwie verändert wurde.

sondern es wird zur Datenbank zurückgesprungen

was heißt das denn?  Meinst Du das Access-Fenster? Wenn ja, was ist darin dann sichtbar?

[Axel18]

Ganz recht,

ich will zum vorigen Fenster zurückgehen, in diesem Fall ist das MainForm. Aber Acc (XP) geht nciht dorthin zurück, "löscht" praktisch dieses Fenster vom Screen und hat nur noch das "Access-Fenster" (ich weiss nicht, wie das heisst), in welchem links untereinander unter Objekte steht: Tabellen, Abfragen, Formulare, usw

[DF6GL]

Hallo,

naja, Access selber löscht da nichts, vermutlich wird das Formular explizit durch Code/Makro geschlossen.

Öffne in diesem Fall das Fenster halt wieder in Deinem Schliessen-Code:

Private Sub Befehl20_Click()
On Error GoTo Err_Befehl20_Click


    DoCmd.Close ,acForm, Me.Name

    Docmd.Openform "MainForm"

Exit_Befehl20_Click:
    Exit Sub

Err_Befehl20_Click:
    MsgBox Err.Description
    Resume Exit_Befehl20_Click
   
End Sub

[Axel18]

Danke Franz,
hat geholfen
Axel