Access-o-Mania

Access-Forum (Deutsch/German) => Formular => Thema gestartet von: schnewitchen am März 15, 2013, 02:58:05

Titel: doppelte Einträge beim Suchen vermeiden
Beitrag von: schnewitchen am März 15, 2013, 02:58:05
Hallo zusammen.
Ich bin noch ziemlich unerfahren mit Access und versuche mich gerade daran, eine Datenbank mit verschiedenen Beschreibungen zu basteln.
Bis jetzt steht die Datenbank, und ein Formular,  in dem ich mittels 2 dropdown-kombinationsfeldern die Datenbank einmal nach Type und einmal nach Hersteller durchsuche.
Logischerweise kann es vorkommen, dass unter einem Hersteller 10 verschiedene Typen zur Auswahl stehen. Im dropdown-Feld ist dann aber 10 mal der gleiche Hersteller gelistet.
Was könnte ich hier machen, um das zu verhindern?

mfg schnewitchen



... achso fast vergessen :)   ich benutze die Office 2010 32bit version
Titel: Re: doppelte Einträge beim Suchen vermeiden
Beitrag von: bahasu am März 15, 2013, 07:32:25
Hallo und wilkommen,

im sql- Teil
SELECT DISTINCT ...
verwenden bzw. in den Abfrageeigenschaften "Keine Duplikate" auf "Ja" setzen.

Harald
Titel: Re: doppelte Einträge beim Suchen vermeiden
Beitrag von: schnewitchen am März 15, 2013, 17:16:20
hallo.
danke für die schnelle Antwort. Hat super funktioniert!
Ein kleines Problem hätte ich noch.
Ich kann meine Datensätze per makro durchblättern, also mit nächster Datensatz und voriger Datensatz.
Wenn ich beim letzten Datensatz angelangt bin und weiter klicke kommt ein Makrofehler.
Kann man diesen irgendwie unterbinden?

lg
Titel: Re: doppelte Einträge beim Suchen vermeiden
Beitrag von: bahasu am März 15, 2013, 17:36:12
Hi,

Blättern mit "Makro":
Das Thema "Makro" gehört nicht zu meinen Stärken wie auch bei einer Reihe von anderen nicht, da Makros nicht optimal sind.

Zitat von: schnewitchen am März 15, 2013, 17:16:20
Kann man diesen irgendwie unterbinden?

Ja.
Ich brauche aber die Infos, wie Du genau blätterst.
Steht dort eine Zeile wie "DoCmd.GoToRecord , , acNext" oder wird wirklich ein Makro verwendet?
Falls obige Zeile dort steht, füge vor der Zeile ein:
On Error resume next
Das ist die "quick and dirty"-Methode.
Die aufwändigere Methode fragt ab, ob der letzte Datensatz bereits erreicht ist, wenn ja, unterläßt sie die Ausführung der obigen Zeile.

Harald
Titel: Re: doppelte Einträge beim Suchen vermeiden
Beitrag von: schnewitchen am März 15, 2013, 17:53:01
Also ich habe jetzt einen Button mit --> Ereignis bei Klicken --> eingebettetes Makro --> "gehezuDatensatz" nächster ....

nun hab ich aber deinen code mal ausgetestet und funktioniert prima mit dem Fehler unterdrücken.
Ich glaub ich muss mich echt mal mit vba auseinandersetzen, für so kleine Vorhaben ist das halt ziemlich zeitintensiv.

dank dir vielmals, werde es jetzt über code lösen
Titel: Re: doppelte Einträge beim Suchen vermeiden
Beitrag von: Maxel am März 17, 2013, 12:21:55
Zitatwerde es jetzt über code lösen
Wenn Du einmal dabei bist, kannst Du auch per Code die Blättern-Buttons inaktiv setzen, falls Du jeweils am Anfang/am Ende angelangt bist.
Titel: Re: doppelte Einträge beim Suchen vermeiden
Beitrag von: schnewitchen am März 17, 2013, 18:48:55
Hallo, ich bin´s mal wieder

Das Kombinationsfeld funktioniert nun recht gut als Suchfunktion.
Was mich nun noch stört, bzw. was ich noch zwingend benötigen würde, wäre eine Einstellmöglichkeit, dass die Suchfunktion den kompletten Inhalt nach Treffern durchsucht.

Kleines Beispiel zum veranschaulichen.
Ich suche nun in der Spalte "Type" der Tabelle "Beschreibungen"

unter Type steht zB.

Dichtegeber Typ: MEK 2300
Durchflussmesser FSM 4000
Druckmessumformer Serie X,  Type xy, xyz ...
....

Im Suchfeld muss nun der Text genau so wie oben geschrieben eingegeben werden.
Nun möchte ich ein Datenblatt anhand der Type zB. FSM 4000 finden, oder nur 4000 eingeben.

ich hab jetzt schon verschiedene Codes aus dem i-net durchprobiert, aber irgendwie werd ich daraus nicht schlau.

das "suchenDatensatz" Makro hätte die Funktion: vergleichen: gesamter Feldinhalt. nur kann ich unter "suchen nach" nur ein fixes Kriterium eingeben, ich will aber nach dem suchen, was ich in die Suche schreibe ....


mfg
Titel: Re: doppelte Einträge beim Suchen vermeiden
Beitrag von: bahasu am März 17, 2013, 19:15:58
Hi,

ändere Deine Suche ab von
alt:  ... Me.DeinSuchfeld = '" & Me.DeineSucheingabe & "'"
neu: ... Me.DeinSuchfeld like '*" & Me.DeineSucheingabe & "*'"

Harald