Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Aus eingebetteten UFO Hauptformular ansprechen
zurück: legende in kreisdiagramm: andere seriennamen vergeben weiter: Synchronisierung Unterformular 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
RichardIII
Gast


Verfasst am:
08. Jun 2011, 07:39
Rufname:

Aus eingebetteten UFO Hauptformular ansprechen - Aus eingebetteten UFO Hauptformular ansprechen

Nach oben
       Version: Office 2007

Guten Morgen, mich beschäftigt ein nicht lösbares Problem:

In einem Hauptformular habe ich als Ufo ein Suchformular eingebettet. Normalerweise läuft das Suchformular alleine. Nach filtern und Doppeltklick öffnet sich das Hauptformular mit dem gefilterten DS. Das möchte ich diesmal aber in "einem Formular" realisieren. Wie spreche ich den im Suchformular (als UFO eingebettet) gefilterten DS durch Doppeltklick im darüberbefindlichen Hauptformular an

Hier mein Code aus dem Suchformular
Code:
Private Sub Befehl8_Click()
'Suchfeld leeren
    Me!dfSuche = ""
    Me!sSuche = ""
    DoCmd.Hourglass True
    Me!lbSuche.Requery
    DoCmd.Hourglass False
    Me!dfSuche.SetFocus
End Sub

Private Sub dfSuche_Change()
'Suchbegriff eingeben, dadurch wird die Auswahl laufend eingegrenzt
    sSuche = Me!dfSuche.Text
    DoCmd.Hourglass True
    Me!lbSuche.Requery
    DoCmd.Hourglass False
    Me!dfSuche.SetFocus
End Sub

Private Sub Form_Open(Cancel As Integer)
'Beim Oeffnen Fokus auf Suchfeld setzen
    Me!dfSuche.SetFocus
End Sub

Private Sub lbSuche_DblClick(Cancel As Integer)
'Doppelklicken auf einen DS in der Liste öffnet das Formular "frmName"
On Error GoTo Err_lbSuche_DblClick
    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = frm_Hauptformular   'Formularname hier anpassen
    stLinkCriteria = " [LfdNr]=" & Me![lbSuche]  '"[ID]=" = eindeutige DS-Nummer, hier anpassen
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_lbSuche_DblClick:
    Exit Sub
Err_lbSuche_DblClick:
    MsgBox Err.Description
    Resume Exit_lbSuche_DblClick
End Sub

Gruß

Richard
derArb
getting better


Verfasst am:
10. Jun 2011, 11:55
Rufname: derArb
Wohnort: Berlin


AW: Aus eingebetteten UFO Hauptformular ansprechen - AW: Aus eingebetteten UFO Hauptformular ansprechen

Nach oben
       Version: Office 2007

Hallo,
es fehlen Hochkommata.
Code:
    stDocName = "frm_Hauptformular" 'Formularname hier anpassen
    stLinkCriteria = " [LfdNr]=" & Me![lbSuche] '"[ID]=" = eindeutige DS-Nummer, hier anpassen
    'oder bei Datentyp Text
    stLinkCriteria = " [LfdNr]='" & Me![lbSuche] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

MfG
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
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 -> Ufo -> Eintrag wählen -> Editieren 6 seym 173 10. Sep 2012, 23:18
seym Abfrage -> Ufo -> Eintrag wählen -> Editieren
Keine neuen Beiträge Access Tabellen & Abfragen: Feld in formularbasiertem Fiilter ansprechen 4 Rgri 181 23. Okt 2011, 18:34
Rgri Feld in formularbasiertem Fiilter ansprechen
Keine neuen Beiträge Access Tabellen & Abfragen: Daten aus Tabelle in UFO anzeigen lassen 3 Jondalar 585 25. Feb 2008, 09:37
Marmeladenglas Daten aus Tabelle in UFO anzeigen lassen
Keine neuen Beiträge Access Formulare: Summenproblem: Summen aus UFO im Hauptformular 1 franz H 405 31. Jul 2005, 12:56
InesW. Summenproblem: Summen aus UFO im Hauptformular
Keine neuen Beiträge Access Formulare: im Endlosbericht einzelne Zeile ansprechen 11 samy 702 25. Jul 2005, 10:05
Willi Wipp im Endlosbericht einzelne Zeile ansprechen
Keine neuen Beiträge Access Formulare: Spalten im UFO ausblenden 2 11.auflage 483 16. Jun 2005, 15:46
11.auflage Spalten im UFO ausblenden
Keine neuen Beiträge Access Formulare: Zoomformular verkleinert Hauptformular 0 Matthias123 397 20. Apr 2005, 09:46
Matthias123 Zoomformular verkleinert Hauptformular
Keine neuen Beiträge Access Formulare: Feld aus unterformular in hauptformular!!! 4 hp69 705 23. März 2005, 13:26
hp69 Feld aus unterformular in hauptformular!!!
Keine neuen Beiträge Access Formulare: Kombinationsfeld im Ufo - Eintrag hinzufügen 0 Osskar 485 05. März 2005, 00:44
Osskar Kombinationsfeld im Ufo - Eintrag hinzufügen
Keine neuen Beiträge Access Formulare: Probleme bei der Anzeige von Ufo unter Windows 2000 Prof 0 MJost 388 02. Feb 2005, 15:55
MJost Probleme bei der Anzeige von Ufo unter Windows 2000 Prof
Keine neuen Beiträge Access Formulare: Datensatz aus Unterformular in Hauptformular übernehmen 1 getonbody 704 27. Jan 2005, 18:37
lothi Datensatz aus Unterformular in Hauptformular übernehmen
Keine neuen Beiträge Access Formulare: Listbox im UFO teilen? 1 HJG 391 23. Jan 2005, 18:45
lothi Listbox im UFO teilen?
 

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