Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
suchfunktion
zurück: Formular in Access mit Filterkriterium weiter: Listenfeld, Mouseover & ControlTipText möglich? 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
idefux
Gast


Verfasst am:
17. Jul 2008, 07:42
Rufname:

suchfunktion - suchfunktion

Nach oben
       Version: Office 2003

hallo, ich habe eine frage und zwar, wie mache ich eine schöne Suchfunktion, also mehr als nur das Fernglas!
Ich hätte gerne so eine schöne, wo ich das wort das ich im Datensatz suchen möchte einlese und dann auf suchen klicke und wo dann der gesuchte datensatz erscheint

danke
lg
derArb
getting better


Verfasst am:
17. Jul 2008, 09:10
Rufname: derArb
Wohnort: Berlin


AW: suchfunktion - AW: suchfunktion

Nach oben
       Version: Office 2003

hallo,

wenn VBA etwas bekannt ist, dann über eine Inputbox

Tabellenfeldtyp = Text

Im aktiven Hauptformular die gefundenen Ergebnisse als neue Datenherkunft bestimmen.
(Suche mit dem Like Operator *)
Code:
Private Sub DeinButton_Click() ’Button im aktiven Hauptformular
    Dim EingabeSQL As String
    Dim strEingabe As String
   
    strEingabe = InputBox("Geben Sie den Teil des Suchbegriffs ein ...", _
                          "Gesamtsuche nach Suchbegriff")
    If StrPtr(strEingabe) = 0 Then Exit Sub 'Benutzereingabe wurde abgebrochen
    EingabeSQL = "SELECT * " & _
                   "FROM [DeineTabelle] " & _
                  "WHERE [DeinTabellenfeld] Like '*" & strEingabe & "*' " & _
               "ORDER BY [DeinTabellenfeld]"
    Me.RecordSource = EingabeSQL 'Datenherkunft Formular
End Sub

mfg
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
idefux
Gast


Verfasst am:
17. Jul 2008, 09:15
Rufname:

AW: suchfunktion - AW: suchfunktion

Nach oben
       Version: Office 2003

ich kenne mich leider nicht wirklich gut aus, wie erstelle ich solch eine Inputbox, ist das vielleicht ein Textfeld?
derArb
getting better


Verfasst am:
17. Jul 2008, 09:21
Rufname: derArb
Wohnort: Berlin

AW: suchfunktion - AW: suchfunktion

Nach oben
       Version: Office 2003

hallo,

ok..dann sag mir Deinen Tabellen Namen und die Tabellenfelder
ausserdem den jeweiligen Tabellenfeld typ...also, ob es Zahl ist oder Text, oder Datum oder.....

dann probieren wir es mal gemeinsam

mfg
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
Gast



Verfasst am:
17. Jul 2008, 10:33
Rufname:

AW: suchfunktion - AW: suchfunktion

Nach oben
       Version: Office 2003

ja das kann ich, ich bin leider unterbrochen worden, also die tabelle heißt werkzeug und hat viele artikel (Text)! Wobei ich jetzt ein Textfeld haben will wo ich den namen eines Werkzeugs einlese und dann auf einen Button klicke der mir jenen datensatz mit dem Namen sucht!
derArb
getting better


Verfasst am:
17. Jul 2008, 10:44
Rufname: derArb
Wohnort: Berlin

AW: suchfunktion - AW: suchfunktion

Nach oben
       Version: Office 2003

hallo,

dann versuchs mal damit...nachdem Du kein Tabellenfeld angeben kannst.
Ersetze [DeinTabellenfeld] mit dem echten Tabellenfeldnamen
Bau dir einen button mit dem Namen 'DeinButton'
Leg auf ihn folgendes Ereignis
Code:
Private Sub DeinButton_Click() ’Button im aktiven Hauptformular
    Dim EingabeSQL As String
    Dim strEingabe As String
   
    strEingabe = InputBox("Geben Sie den Teil des Suchbegriffs ein ...", _
                          "Gesamtsuche nach Suchbegriff")
    If StrPtr(strEingabe) = 0 Then Exit Sub 'Benutzereingabe wurde abgebrochen
    EingabeSQL = "SELECT * " & _
                   "FROM [Werkzeug] " & _
                  "WHERE [DeinTabellenfeld] Like '*" & strEingabe & "*' " & _
               "ORDER BY [DeinTabellenfeld]"
    Me.RecordSource = EingabeSQL 'Datenherkunft Formular
End Sub

mfg
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
idefux
Gast


Verfasst am:
17. Jul 2008, 11:12
Rufname:


AW: suchfunktion - AW: suchfunktion

Nach oben
       Version: Office 2003

wow, das geht ich danke dir!!

Very Happy
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: Problem bei Suchfunktion 3 Mr. Sommer 105 21. Aug 2012, 16:46
Mr. Sommer Problem bei Suchfunktion
Keine neuen Beiträge Access Formulare: Suchfunktion mit mehreren Suchbegriffen (dringend) 1 SuZ 185 27. Okt 2009, 22:32
ebs17 Suchfunktion mit mehreren Suchbegriffen (dringend)
Keine neuen Beiträge Access Formulare: Suchfunktion integrieren (ohne SQL) 4 Madl 1821 24. März 2008, 20:54
jens05 Suchfunktion integrieren (ohne SQL)
Keine neuen Beiträge Access Tabellen & Abfragen: Suchfunktion 22 Celle 1419 28. Dez 2007, 23:51
derArb Suchfunktion
Keine neuen Beiträge Access Formulare: Suchfunktion innerhalb eines Formulars 12 *kitty*rosa 906 29. Okt 2007, 17:46
Köbi Suchfunktion innerhalb eines Formulars
Keine neuen Beiträge Access Formulare: Datenfilter/Suchfunktion 2 Numele 496 17. Sep 2007, 12:36
Gast Datenfilter/Suchfunktion
Keine neuen Beiträge Access Formulare: Suchfunktion+Listenfeld 29 mujaki 1928 01. März 2007, 16:25
Willi Wipp Suchfunktion+Listenfeld
Keine neuen Beiträge Access Formulare: suchfunktion 3 asak 501 29. Nov 2006, 11:44
Willi Wipp suchfunktion
Keine neuen Beiträge Access Formulare: Formular mit Suchfunktion 15 Mortician 1621 14. Sep 2006, 01:25
Mortician Formular mit Suchfunktion
Keine neuen Beiträge Access Formulare: von suchfunktion zu datensatz 1 laubfrosch 809 21. Aug 2006, 17:26
lothi von suchfunktion zu datensatz
Keine neuen Beiträge Access Formulare: Suchfunktion drucken 1 Gast 481 08. Aug 2006, 11:33
james35 Suchfunktion  drucken
Keine neuen Beiträge Access Formulare: Suchfunktion Problem 6 Gast 600 04. Jul 2006, 10:50
Gast Suchfunktion Problem
 

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