Thema Datum  Von Nutzer Rating
Antwort
Rot Access VBA
03.08.2023 14:27:12 Dontsay
NotSolved
10.09.2023 16:32:07 Ben
NotSolved

Ansicht des Beitrags:
Von:
Dontsay
Datum:
03.08.2023 14:27:12
Views:
275
Rating: Antwort:
  Ja
Thema:
Access VBA

Hi,
Ich brauchen hilfen. z.b
Ich habe Tabelle
Meine Tabelle Name ist Test008 Und Test007
Test008:
ID    Niedrig     Hoch
1    100     200
2    500     700
3    900     1000
************************************************************
Test007:
ID    DD001
1    530
************************************************************
  Sub FindProject007()
    Dim strSQL As String
    Dim rst As Recordset
    
    Set WS = DBEngine.Workspaces(0)
    Set DB = WS.Databases(0)
    strSQL = "SELECT * FROM Test008, Test007 WHERE Test007.DD001 >= Test008.Niedrig AND Test007.DD001 <= Test008.Hoch"
    Set rst = DB.OpenRecordset(strSQL)
        If Not rst.EOF Then
        MsgBox "Not Found"
    Else
        MsgBox "Found"
    End If
    rst.Close
    Set rst = Nothing
End Sub

Meine Fragen jedesmal Wenn ich versuchen über Formulare zu Filtern >= AND <= wie meine Beispiel oben
bekommen ich egal welchen Nr (FOUND). Normal wenn ich 107 eingeben soll sagen (FOUND) aber wenn ich 800 eingeben
soll sagenn (NOT FOUND). Bitte was habe ich falsch gemacht????

Danke


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Access VBA
03.08.2023 14:27:12 Dontsay
NotSolved
10.09.2023 16:32:07 Ben
NotSolved