Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Formular aus Listenfeld öffen, Formular mit LF schließen
zurück: Daten aus Internetdatenbank (DVD) in Formular eintragen weiter: Button in abhängigkeit... Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Arkain
Gast


Verfasst am:
16. Okt 2006, 14:27
Rufname:

Formular aus Listenfeld öffen, Formular mit LF schließen - Formular aus Listenfeld öffen, Formular mit LF schließen

Nach oben
       Version: Office XP (2002)

Hallo,

ich habe schon die Suche bemüht sowie die Googlesuche aber der Thread hier im forum funktioniert bei mir irgendwie nicht.
Code:
Private Sub cmdAnzeigen_Click()
    Anzeigen
    '* '<==
End Sub

Private Sub Anzeigen()
    Dim stDocName As String

    '* '<==
    If Not IsNull(Me!Listenfeld) Then
        DoCmd.OpenForm "Zielformular", _
                       WhereCondition:="ID = " & Me!Listenfeld, _
                       WindowMode:=acDialog
        '* '<==
    End If
End Sub

Private Sub Listenfeld_DblClick(Cancel As Integer)
    Anzeigen
    '* '<==
End Sub

Private Sub Listenfeld_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 13 Then
        Anzeigen
        '* '<==
    End If
End Sub
Formular schließen
Code:
    Dim stDocName       As String
    Dim stLinkCriteria  As String

    If Not IsNull(Me!Liste) Then
        stDocName = "frmArtikel"
        stLinkCriteria = "[ArtNr]=" & Me![Liste]
        DoCmd.OpenForm stDocName, , , stLinkCriteria, acFormEdit
        DoCmd.Close acForm, Me.Name              'Wenn Liste auf Hauptformular
'        DoCmd.Close acForm, Me.Parent.Name      'Wenn Liste auf Unterformular
'        Me!Liste.Requery              'Unnötig, da Formular geschlossen wird
    End If
Wenn ich für Hauptformular (darin ist das Listenfeld) eingebe dann schließt sich das Formular mit dem Listenfeld erst wenn ich das Zielformular schließe.
Das Listenfeldformular soll sich aber schon schließen wenn das Zielformular geöffnet wird. Was mache ich falsch?
Code:
    DoCmd.Close acForm, Me.Name
Diesen Code habe ich schon überall hier '* '<== eingesetzt und nichts hat geklappt. Embarassed

Kann mir jemand helfen?

Gruß,

Arkain
jens05
Moderator


Verfasst am:
16. Okt 2006, 20:34
Rufname:
Wohnort: ~~~~~


AW: Formular aus Listenfeld öffen, Formular mit LF schließen - AW: Formular aus Listenfeld öffen, Formular mit LF schließen

Nach oben
       Version: Office XP (2002)

Hallo,
das acDialog öffnet das 2. Formular modal.
Dadurch wird der Code aus 1. Formular angehalten, bis das 2.Formular geschlossen ist.

Falls dich das 1. Form am Bildschirm stört, könntest du es unsichtbar machen.
Code:
Private Sub Anzeigen()
    Dim stDocName As String

    Me.Visible = False
    If Not IsNull(Me!Listenfeld) Then
        DoCmd.OpenForm "Zielformular", _
                        WhereCondition:="ID = " & Me!Listenfeld, _
                        WindowMode:=acDialog
        DoCmd.Close acForm, Me.Name
    End If
End Sub

_________________
mfg jens05 Wink
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum 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 nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage in Formular einbinden? 1 Percobodio 2045 29. Apr 2005, 11:29
lothi Abfrage in Formular einbinden?
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrageergebnis als neues Formular anzeigen 2 mila 3034 12. Apr 2005, 12:38
mila Abfrageergebnis als neues Formular anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragen im Formular aufrufen, automatisch bestätigen 3 Calvin22 1606 12. Apr 2005, 12:12
Willi Wipp Abfragen im Formular aufrufen, automatisch bestätigen
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Tabellen & Abfragen: Formular Daten in einer Tabelle speichern? 1 Gast 1017 24. März 2005, 16:24
Willi Wipp Formular Daten in einer Tabelle speichern?
Keine neuen Beiträge Access Tabellen & Abfragen: mehrer abfragen ein formular 1 romu 719 10. Jan 2005, 15:54
lothi mehrer abfragen ein formular
Keine neuen Beiträge Access Tabellen & Abfragen: Formeln vom Formular, werden in der Abfrage nicht angezeigt 4 maddes 895 23. Nov 2004, 12:38
Skogafoss Formeln vom Formular, werden in der Abfrage nicht angezeigt
Keine neuen Beiträge Access Tabellen & Abfragen: Filtern aus Kombi & Listenfeld 1 Gast 817 16. Nov 2004, 22:07
lothi Filtern aus Kombi & Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Wert eines Feldes aus Formular in Tabelle speichern 18 kave78 13710 16. Okt 2004, 13:40
Ming Wert eines Feldes aus Formular in Tabelle speichern
Keine neuen Beiträge Access Tabellen & Abfragen: Zeile der Dateneingabe (*) in einem Formular verschieben 2 Albertus 790 08. Okt 2004, 09:17
Albertus Zeile der Dateneingabe (*) in einem Formular verschieben
Keine neuen Beiträge Access Tabellen & Abfragen: Mehrfachauswahl aus Listenfeld kombiniert mit SQL IN (...) 2 SMArmageddon 2417 01. Sep 2004, 15:07
SMArmageddon Mehrfachauswahl aus Listenfeld kombiniert mit SQL IN (...)
Keine neuen Beiträge Access Tabellen & Abfragen: Tabelle, Formular, Abfrage...und nun ? 3 Gags 790 29. Aug 2004, 22:05
lothi Tabelle, Formular, Abfrage...und nun ?
Keine neuen Beiträge Access Tabellen & Abfragen: Kriterien aus nem Formular die mich fertig machen!!! 19 Martin von der Bergwiese 2658 24. Aug 2004, 12:53
Lorenz Kriterien aus nem Formular die mich fertig machen!!!
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: JavaScript