Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Frage zu Listenfeld
zurück: Recht Maustaste - Einfügen in Textfeld weiter: Tabelleninhalt auslesen und in ein Textfeld ausgeben ACC2002 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
Korg
Im Profil kannst Du frei den Rang ändern


Verfasst am:
14. März 2008, 11:10
Rufname:

Frage zu Listenfeld - Frage zu Listenfeld

Nach oben
       Version: Office 2003

Hallo zusammen,

ich hätte mal folgende Frage an euch...

Ich habe ein Endlosformular das ungefähr so aussieht:
Name | Vorname | Geburtsort | Geburtsland

Und in diesem Formular habe ich einen Button, wenn ich diesen Button betätige öffnet sich ein neues Formular und in diesem Formular ist ein Listenfeld mit den gleichen Feldern wie im Endlosformular.

Wenn ich jetzt ein Doppelklick mache im Listenfeld, dann soll er mir im Endlosformular auf diese bestimmte Stelle gehen.

Beispiel: ich habe im Listenfeld den Namen 'Müller', dann Doppelklick und dann soll er mir im Endlosformular mit den Datensatzmarkierer auf die Stelle gehen, wo der Müller ist...

Bis jetzt habe ich im VBA den Namen den ich doppelklick im Listenfeld in einer Variablen, aber leider weiss ich nicht weiter...

Geht das ganze überhaupt?

Vielen Dank für die Hilfe
Marmeladenglas
komme zurecht


Verfasst am:
14. März 2008, 12:01
Rufname:


AW: Frage zu Listenfeld - AW: Frage zu Listenfeld

Nach oben
       Version: Office 2003

Hi,
wozu öffnest du nochmal ein Formular um die Liste darstellen zu lassen ?
Warum liegt das Listenfeld nicht direkt auf deinem Endlosformular.
Code:
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[ID] = " & Str(Nz(Me![DeineListe], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
würde funktionieren für Listenfeld befindet sich auf dem Endlosformular.
Behälst du die Form mit 2 Formularen bei, mußt das Me entsprechend durch den Namen des Endlosformulars ersetzt werden:
Code:
    Dim rs As Object

    Set rs = Forms!DeinFormularEndlos.Recordset.Clone
    rs.FindFirst "[ID] = " & Str(Nz(Me![DeineListe], 0))
    If Not rs.EOF Then Forms!DeinFormularEndlos.Bookmark = rs.Bookmark
Willi Wipp
Moderator


Verfasst am:
14. März 2008, 12:53
Rufname:
Wohnort: Raum Wiesbaden

Re: Frage zu Listenfeld - Re: Frage zu Listenfeld

Nach oben
       Version: Office 2003

@Marmeladenglas

oder auch einfach
Code:
    With Me.Recordset
    'With Forms!DeinFormularEndlos.Recordset
        .FindFirst "[ID] = " & Str(Nz(Me![DeineListe], 0))
        'If .NoMatch Then Msgbox "Nix gefunden"
    End With

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

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


Verfasst am:
14. März 2008, 12:56
Rufname:

AW: Frage zu Listenfeld - AW: Frage zu Listenfeld

Nach oben
       Version: Office 2003

Hi Willi,

ich mags lieber kompliziert Laughing
Korg
Im Profil kannst Du frei den Rang ändern


Verfasst am:
14. März 2008, 13:00
Rufname:


AW: Frage zu Listenfeld - AW: Frage zu Listenfeld

Nach oben
       Version: Office 2003

Hallo,

beide Versionen passen super...

jetzt mal schauen welche ich nehmen werde.

Vielen Dank für die schnelle Hilfe!
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: Mehrfachauswahl aus Listenfeld in Abfrage darstellen 15 sternpfeifer 6415 13. Aug 2008, 15:13
Willi Wipp Mehrfachauswahl aus Listenfeld in Abfrage darstellen
Keine neuen Beiträge Access Tabellen & Abfragen: Frage zu "Tabellen anzeige Script" 2 Max.B 608 12. Jul 2006, 17:53
Willi Wipp Frage zu "Tabellen anzeige Script"
Keine neuen Beiträge Access Tabellen & Abfragen: 'toter' Verweis (Ganz doofe Frage sicherlich....) 1 Gast 609 04. Jul 2006, 19:17
rita2008 'toter' Verweis (Ganz doofe Frage sicherlich....)
Keine neuen Beiträge Access Tabellen & Abfragen: Frage über Abfrage 2 Crusico 575 20. Jun 2006, 10:32
Crusico Frage über Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Lagerverwaltung Allgemeine Frage 1 singsing 1091 13. Jun 2006, 23:02
stpimi Lagerverwaltung Allgemeine Frage
Keine neuen Beiträge Access Tabellen & Abfragen: Aktualisierungs-abfrage beim Listenfeld 1 DarkAngel1208 575 21. Mai 2006, 00:03
Solaiman Aktualisierungs-abfrage beim Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Frage zum Theme AutoWert 15 TorstenErd 1402 25. Apr 2006, 11:41
Nouba Frage zum Theme AutoWert
Keine neuen Beiträge Access Tabellen & Abfragen: Frage zu "gesperrter" Tabelle 2 blicki 684 23. Nov 2005, 08:41
blicki Frage zu "gesperrter" Tabelle
Keine neuen Beiträge Access Tabellen & Abfragen: Berechnung im Listenfeld anzeigen? 3 Schnoop 804 20. Okt 2005, 08:24
Timbo Berechnung im Listenfeld anzeigen?
Keine neuen Beiträge Access Tabellen & Abfragen: Probleme mit Listenfeld 1 Schnoop 512 17. Okt 2005, 10:04
rita2008 Probleme mit Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Mehrfachauswahl in Listenfeld als Abfrageparameter möglich? 3 esprene 1395 26. Aug 2005, 14:25
cablit Mehrfachauswahl in Listenfeld als Abfrageparameter möglich?
Keine neuen Beiträge Access Tabellen & Abfragen: Neu hier - Frage zu tabellenerstellung 1 quinoman 690 22. Jul 2005, 16:45
jens05 Neu hier - Frage zu tabellenerstellung
 

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