Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Suchen im Unterformular
zurück: Probleme mit dem Kontrollkästchen weiter: "null" Wert in Combobox Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Akima
Gast


Verfasst am:
04. Nov 2007, 21:18
Rufname:

Suchen im Unterformular - Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo Zusammen,
Habe ein Such-Formular erstellt im Formularkopf befindet sich ein Kombinationsfeld mit folgenden Code:
Code:
Private Sub Kombinationsfeld4_AfterUpdate()
    ' Den mit dem Steuerelement übereinstimmenden Datensatz suchen.
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Name] = '" & Me![Kombinationsfeld4] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    Me!Kombinationsfeld4 = ""
    Me!Name.SetFocus
End Sub
Im Detailbereich befindet sich ein Unterformular in der Datenblatt Ansicht in dem gesucht werden soll.
Wie verweise ich auf das Unterformular in dem die Suche statt finden soll.

Vielen Dank
JörgG
Access-Team


Verfasst am:
04. Nov 2007, 22:02
Rufname:
Wohnort: b. Dresden


AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo,

probiere es so:
Code:
Private Sub Kombinationsfeld4_AfterUpdate()
    Me!UfoSteuerelementname.Form.FindFirst "[Name] = '" & Me![Kombinationsfeld4] & "'"
    Me!UfoSteuerelementname.SetFocus
    Me!UfoSteuerelementname.Form![Name].SetFocus
End Sub

Idea Bitte unbedingt lesen DonKarl FAQ1.5 Benamsung

Exclamation UfoSteuerelementname - markiere im Hfo das UfoSteuerelement - im Eigenschaftsfenster - Register Andere - Name: ??? (dieser Name ist zu verwenden).

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Akima
Gast


Verfasst am:
05. Nov 2007, 01:31
Rufname:

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo JörgG,
leider bekomme ich immer eine Fehlermeldung. Habe darauf hin ein einTestformular mit geänderten Namen erstellt (Name jetzt Nachname).
Mein Unterformular heißt
„ Kunden“ - UfoSteuerelementname ???

Habe deinen Code wie folgt eingegeben:
Code:
Private Sub Kombinationsfeld4_AfterUpdate()
    Me!Kunden.Form.FindFrist "[Nachname] = '" & Me![Kombinationsfeld4] & "'"
    Me!Kunden.SetFocus
    Me!Kunden.From![Nachname].SetFocus
End Sub
Erhalte die Fehlermeldung: Laufzeitfehler 2465

Vielen Dank für die Hilfe und Anregungen
Willi Wipp
Moderator


Verfasst am:
05. Nov 2007, 03:25
Rufname:
Wohnort: Raum Wiesbaden

Re: Suchen im Unterformular - Re: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hi Akima,

da wuerde ich Loesung 739 vorschlagen Smile
Im Ernst, zumindest ich kennen nicht alle Fehlermeldungen auswendig Wink
Aber eventuell hilft ja dieser Ansatz?
Code:
Private Sub Kombinationsfeld4_AfterUpdate()
    Me!Kunden.Form.Recordset.FindFrist "[Nachname] = '" & _
                                                  Me![Kombinationsfeld4] & "'"
    Me!Kunden.SetFocus
    Me!Kunden![Nachname].SetFocus
End Sub

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Akima
Gast


Verfasst am:
05. Nov 2007, 15:54
Rufname:


AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo Willi Wipp,
in meinem Test-Formular wird mit deinem Code der Focus auf das Namensfeld gesetzt aber nur der erste Datensatz angezeigt nicht der gesuchte(ich kann nicht raus finden wo der Fehler ist).

In meiner richtigen Datenbank klappt es super!

Vielen Dank dafür
Köbi
Angefressener Amateur


Verfasst am:
05. Nov 2007, 18:27
Rufname:
Wohnort: Schweiz

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo

Versuch's mal so.

Code:
Private Sub Kombinationsfeld4_AfterUpdate()
    ' Den mit dem Steuerelement übereinstimmenden Datensatz suchen.
    Dim rs As Object

    Set rs = Me!Kunden.Form.Recordset.Clone
    rs.FindFirst "[Name] = '" & Me![Kombinationsfeld4] & "'"
    If Not rs.EOF Then Me!Kunden.Form.Bookmark = rs.Bookmark
    Me!Kombinationsfeld4 = ""
    Me!Kunden.Form!Name.SetFocus
End Sub

_________________
Gruss
Köbi
Akima
Gast


Verfasst am:
05. Nov 2007, 18:54
Rufname:

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo Köbi,
gleiche Problem bei der Suche wird immer auf den ersten Datensatz gesprungen bzw. zurück gesprungen

Vielen Dank für die Hilfe
Gruß Akima
Köbi
Angefressener Amateur


Verfasst am:
05. Nov 2007, 19:05
Rufname:
Wohnort: Schweiz

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo

Dann lass das Fokussetzen einfach mal weg.

Ich habe hier eine ähnliche Situation. Das UFo ist allerdings ein Endlosformular. Aber ohne Me!Kunden.Form!Name.SetFocus wird schön zum richtigen DS gesprungen.

_________________
Gruss
Köbi
JörgG
Access-Team


Verfasst am:
06. Nov 2007, 01:48
Rufname:
Wohnort: b. Dresden

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo,

sind Hfo/Ufo verknüpft? Dann wird nur in dem durch die Verknüpfung eingeschränkten Ufo-Recordset gefiltert, was dann nicht viel bringen dürfte Wink .

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Akima
Gast


Verfasst am:
06. Nov 2007, 23:58
Rufname:


AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       Version: Office 2003

Hallo zusammen,
so ich habe es jetzt. Wenn ich im Haupt-Formular, im Formularkopf zuerst das Kombinationsfeld setze und danach das Unterformular aufrufe läuft alles bestens.
Auch mit unterschiedlichen Code.

Gruß Akima
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: im Access nach Zeilenumbruch suchen 5 karin_office 5138 15. März 2007, 14:35
Thomas2007 im Access nach Zeilenumbruch suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Datensätze suchen und anzeigen 7 Bimsinator 887 13. März 2007, 22:00
Nouba Datensätze suchen und anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Nach Kriterien suchen und anzahl ausgeben 3 romu2000 602 11. Feb 2007, 23:43
Willi Wipp Nach Kriterien suchen und anzahl ausgeben
Keine neuen Beiträge Access Tabellen & Abfragen: nächst höheren Wert suchen 7 alex123 781 05. Jan 2007, 12:47
Gast nächst höheren Wert suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Suchen und Ersetzen 2 Gast 800 19. Dez 2006, 08:51
Gast Suchen und Ersetzen
Keine neuen Beiträge Access Tabellen & Abfragen: Im Formular Wert in Tabelle suchen (Wertebereich) und Übertr 4 Kläuschen 4030 14. Nov 2006, 18:44
Kläuschen Im Formular Wert in Tabelle suchen (Wertebereich) und Übertr
Keine neuen Beiträge Access Tabellen & Abfragen: Wert in einer Tabelle mittels eines Eingabefeldes suchen 2 Gast1 783 27. Jul 2006, 11:16
Gast Wert in einer Tabelle mittels eines Eingabefeldes suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Problem: Parameter-Abfrage aus einem Unterformular ausführen 3 bettina_vt 3427 12. Mai 2006, 15:44
bettina_vt Problem: Parameter-Abfrage aus einem Unterformular ausführen
Keine neuen Beiträge Access Tabellen & Abfragen: Änderung der Datenquelle für ein Unterformular 6 turbochris 4720 06. Mai 2006, 10:56
Willi Wipp Änderung der Datenquelle für ein Unterformular
Keine neuen Beiträge Access Tabellen & Abfragen: NULL suchen und ersetzen [VBA] 2 theindeed21 1914 03. Mai 2006, 10:23
theindeed21 NULL suchen und ersetzen [VBA]
Keine neuen Beiträge Access Tabellen & Abfragen: Duplikate suchen 1 erwing 805 21. Jan 2006, 13:35
Wollibär Duplikate suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Warengruppen suchen 0 umbroboy 581 07. Nov 2005, 18:03
umbroboy Warengruppen suchen
 

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