Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Suchen im Unterformular
Gehe zu Seite Zurück  1, 2
zurück: Kombinationsfelder mit Werten aus einer Tabelle füllen weiter: variable Bezeichnungsfeld beschriftung aus Datensatz... Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Bitte Status wählen ! Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
lothi
c#, .Net


Verfasst am:
22. Apr 2005, 06:48
Rufname:
Wohnort: Birgisch

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

Hallo

Ich nehme mal an deine Optionsgruppe heisst Suche.
Code:
    Select Case Me!Suche
überprüf den Namen der Otpionsgruppe ob er auch wirklich stimmt.
_________________
Gruss Lothi, der Bastler
Feedback ist die beste Möglichkeit mir zu sagen ob die Antwort geholfen hat!
AC2002, WinXP, Office XP
kirstenF
Gast


Verfasst am:
22. Apr 2005, 11:04
Rufname:


Fehlermeldung - Fehlermeldung

Nach oben
       

jetzt meint er: variable nicht definiert und makiert SQL in folgender Zeile:

sSQL = SQL & " WHERE " & SKrit
Willi Wipp
Moderator


Verfasst am:
22. Apr 2005, 11:47
Rufname:
Wohnort: Raum Wiesbaden

Re: Suchen im Unterformular - Re: Suchen im Unterformular

Nach oben
       

Hi kirstenF,

da hast Du/Lothi einen Tippfehler drin und zum Glueck hast Du Option Explicit gesetzt.
Solche Fehler such mann/frau sonst sehr lange Laughing
Code:
    sSQL = sSQL & " WHERE " & SKrit

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

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


Verfasst am:
25. Apr 2005, 10:08
Rufname:

weitere fragen - weitere fragen

Nach oben
       

hab nochmal eine frage:
Me![Formularname].Form.RecordSource = sSQL

Was genau steht in der Klammer [] drin? Das Unterformular wo es ausgegeben werden soll, oder das Formular wo vorher die Daten eingegeben wurden und gespeichert wurden??

Denn nun meckert er genau an dieser Stelle rum...

Question
lothi
c#, .Net


Verfasst am:
25. Apr 2005, 10:17
Rufname:
Wohnort: Birgisch


AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

Hallo

Da kommt der Name des Unterformulars rein wo die Daten gezeigt werden sollen.
Es muss der Name des Steuerelements Unterformular sein diesen
kriegst du raus wenn du in der Entwurfsansicht des Hauptformular auf den Rahmen des Unterformulars
klickst und in den Eigenschaften Register Allgemein Name den Namen nimmst.

_________________
Gruss Lothi, der Bastler
Feedback ist die beste Möglichkeit mir zu sagen ob die Antwort geholfen hat!
AC2002, WinXP, Office XP
kirstenF_
Gast


Verfasst am:
25. Apr 2005, 10:21
Rufname:

ahhhh - ahhhh

Nach oben
       

gut, das habe ich ... nun meckert er immer noch in der zeile
Code:
    sSQL = sSQL & " WHERE " & SKrit
    Me![Projektstammdaten Unterformular].Form.RecordSource = sSQL
mit der begründung Fehler in der WHERE Klausel
lothi
c#, .Net


Verfasst am:
25. Apr 2005, 10:47
Rufname:
Wohnort: Birgisch

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

Hallo

Kannst du mir das Ding mal schicken?
Meld dich an dann schick ich dir meine E-Mail.

Die Feldnamen sind alle korrekt geschrieben?
Leerzeichen im SQL sind alle OK.
Code:
Option Compare Database
Option Explicit

Private Sub ProjektSuchen_Click()
    Dim sSQL As String
    Dim SKrit As String
   
    sSQL = "SELECT * FROM [Projektbezeichnung] "
    If Nz(Me!Suchkriterium,"") <> "" Then
        Select Case Suche
          Case 1: SKrit = " Projektbezeichnung Like '" & Me!Suchkriterium & "'"
          Case 2: SKrit = " Projektleiter Like '" & Me!Suchkriterium & "'"
          Case 3: SKrit = " Mitarbeiter Like '" & Me!Suchkriterium & "'"
          Case 4: SKrit = " Status Like '" & Me!Suchkriterium & "'"
        End Select
    End If
    If SKrit <> "" Then
        sSQL = sSQL & " WHERE " & SKrit 'Edit by Willi Wipp
    End If
    Debug.Print sSQL
    Me![ProjektstammdatenUnterformular].Form.RecordSource = sSQL
End Sub

So hab noch eine überprüfung des Textfeldes einge4baut.
öffne das direktfenster und kopiere den SQL Code hier ins Forum dann seh ich wo der Fehler liegt.

_________________
Gruss Lothi, der Bastler
Feedback ist die beste Möglichkeit mir zu sagen ob die Antwort geholfen hat!
AC2002, WinXP, Office XP
kirstenF
Im Profil kannst Du frei den Rang ändern


Verfasst am:
25. Apr 2005, 11:11
Rufname:

so - so

Nach oben
       

Code:
Option Compare Database
Option Explicit

Private Sub ProjektSuchen_Click()
    Dim sSQL As String
    Dim SKrit As String

    sSQL = "SELECT * FROM [Projektstammdaten] "
    Select Case Me!Suche
      Case 1: SKrit = " Projektbezeichnung Like '" & Me!Suchkriterium & "'"
      Case 2: SKrit = " Projektleiter Like '" & Me!Suchkriterium & "'"
      Case 3: SKrit = " Mitarbeiter Like '" & Me!Suchkriterium & "'"
      Case 4: SKrit = " Status Like '" & Me!Suchkriterium & "'"
    End Select
    sSQL = sSQL & " WHERE " & SKrit
    Me![Projektstammdaten Unterformular].Form.RecordSource = sSQL
End Sub

Nachtrag: kirstenF am 25. Apr 2005 um 11:13 hat folgendes geschrieben:
wie gesagt, er springt immer zu dieser zeile und makiert diese gelb:
Code:
    Me![Projektstammdaten Unterformular].Form.RecordSource = sSQL
lothi
c#, .Net


Verfasst am:
25. Apr 2005, 12:18
Rufname:
Wohnort: Birgisch

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

Hallo

Ich habe 2 Vermutungen entweder das Suchfeld ist Null dann sieht der WHERE Teil so aus:
Code:
WHERE Projektbezeichnung LIKE '
Oder ein Feld stimmt nicht.
Hab dir meine E-Mail per PN geschickt.

_________________
Gruss Lothi, der Bastler
Feedback ist die beste Möglichkeit mir zu sagen ob die Antwort geholfen hat!
AC2002, WinXP, Office XP
kirstenF
Im Profil kannst Du frei den Rang ändern


Verfasst am:
25. Apr 2005, 12:51
Rufname:

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

in welcher zeile käme dieser cod hin?

zu: Me![Projektstammdaten Unterformular].Form.RecordSource = sSQL
'WHERE Projektbezeichnung LIKE '

oder schon zu der case auswahl?
Nachtrag: kirstenF am 25. Apr 2005 um 23:17 hat folgendes geschrieben:
kann mir keiner weiter helfen??
lothi
c#, .Net


Verfasst am:
26. Apr 2005, 10:18
Rufname:
Wohnort: Birgisch

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

Hallo KirtsenF

Ich könnte schon. Hast du denn den neuen Code oben schon ausprobiert?
Code:
Option Compare Database
Option Explicit

Private Sub ProjektSuchen_Click()
    Dim sSQL As String
    Dim SKrit As String
   
    sSQL = "SELECT * FROM [Projektbezeichnung] "  'Abfrage
    SKrit = "" 'Vabriable leeren
    If Nz(Me!Suchkriterium,"") <> "" Then  ?Wenn nichts vorhanden kein Kriterium
        Select Case Suche
          Case 1: SKrit = " Projektbezeichnung Like '" & Me!Suchkriterium & "'"
          Case 2: SKrit = " Projektleiter Like '" & Me!Suchkriterium & "'"
          Case 3: SKrit = " Mitarbeiter Like '" & Me!Suchkriterium & "'"
          Case 4: SKrit = " Status Like '" & Me!Suchkriterium & "'"
        End Select
    End If
    If SKrit <> "" Then  'SKrit leer nur Abfrage übegeben
        'sonst Kriterium
        sSQL = sSQL & " WHERE " & SKrit 'Edit by Willi Wipp
    End If
    Debug.Print sSQL
    Me![ProjektstammdatenUnterformular].Form.RecordSource = sSQL
End Sub

_________________
Gruss Lothi, der Bastler
Feedback ist die beste Möglichkeit mir zu sagen ob die Antwort geholfen hat!
AC2002, WinXP, Office XP
kirstenF
Im Profil kannst Du frei den Rang ändern


Verfasst am:
26. Apr 2005, 22:57
Rufname:

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

vielleicht liegt es daran, das die abfrage falsch ist.
habe eine neue abfrage, darin die tabelle projektstammdaten und die vier (projektbezeichnung, projektleiter, mitarbeiter an projekt, status) in die tabelle darunter eingefügt.
so soll es doch sein oder??
lothi
c#, .Net


Verfasst am:
27. Apr 2005, 08:37
Rufname:
Wohnort: Birgisch

AW: Suchen im Unterformular - AW: Suchen im Unterformular

Nach oben
       

Hallo

Öffne bitte mal das Modul mit dem Code.
Gehe dann zum Menupunkt Ansicht und wähle dort Direktfenster aus.
Führe den Code aus.
Kopiere den SQL aus dem Direktfenster hier ins Forum. Es liegt ganz sicher am SQL.
Weiss aber hier von Birgisch aus nicht wo das Problem liegen könnte.

Hast du denn keine Möglichkeit mir das Teil zu schicken?

_________________
Gruss Lothi, der Bastler
Feedback ist die beste Möglichkeit mir zu sagen ob die Antwort geholfen hat!
AC2002, WinXP, Office XP
kirstenF
Im Profil kannst Du frei den Rang ändern


Verfasst am:
04. Mai 2005, 10:59
Rufname:


mail - mail

Nach oben
       

hi lothi,
habe dir ne mail mit allem geschrieben...
weiß net woran es liegt...
kirsten
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite Zurück  1, 2
Diese Seite Freunden empfehlen

Seite 2 von 2
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 5139 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 888 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 603 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 782 05. Jan 2007, 12:47
Gast nächst höheren Wert suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Suchen und Ersetzen 2 Gast 801 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 4031 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 784 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 3428 12. Mai 2006, 15:44
bettina_vt Problem: Parameter-Abfrage aus einem Unterformular ausführen
Keine neuen Beiträge Access Tabellen & Abfragen: NULL suchen und ersetzen [VBA] 2 theindeed21 1915 03. Mai 2006, 10:23
theindeed21 NULL suchen und ersetzen [VBA]
Keine neuen Beiträge Access Tabellen & Abfragen: Duplikate suchen 1 erwing 806 21. Jan 2006, 13:35
Wollibär Duplikate suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Warengruppen suchen 0 umbroboy 582 07. Nov 2005, 18:03
umbroboy Warengruppen suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Parameterabfrage in Unterformular 2 kassandra 1210 09. März 2005, 11:15
kassandra Parameterabfrage in Unterformular
 

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