Access-o-Mania

Access-Forum (Deutsch/German) => Formular => Thema gestartet von: fietis73 am Februar 21, 2012, 09:38:40

Titel: MS Access 2010 VB Abfrage
Beitrag von: fietis73 am Februar 21, 2012, 09:38:40
Hallo zusammen, warum verweigert Access 2010 diesen Code, 2007 führt ihn aus.
Wäre toll wenn mir jemand das erklären könnte. Danke

Private Sub fltEbene_Click()

If Me!fltEB <> "Ebene" Then
    Me!fltEB = Me!fltEbene
    Me!SucheRaum.Requery
    Me!lstRaum.Requery
    Me!fltBauteil.Requery
   
End If
If Me.FilterOn = True Then
    Me.FilterOn = False
    Me.Filter = "Bauteil & Ebene = ' " & Me!fltBT & Me!fltEB & " ' "
'    Me.Filter = "Bauteil ='" & Me!fltBT & " ' "
    Me.FilterOn = True
    Else
    Me.Filter = "Ebene ='" & Me!fltEB & " ' "
    Me.FilterOn = True
    End If
'
'Me.Repaint
End Sub
Titel: Re: MS Access 2010 VB Abfrage
Beitrag von: Stapi am Februar 21, 2012, 09:46:05
Guten Morgen fietis73

Weche Fehlermeldung bekommst du? Wenn du den Code im Einzelschritt (F8) durchlaufen läst wo bricht er ab?

Gruß Stefan
Titel: Re: MS Access 2010 VB Abfrage
Beitrag von: DF6GL am Februar 21, 2012, 10:05:15
Hallo,

ist zwar nicht die Lösung , aber unabhängig davon gehören die Leerzeichen im String entfernt:

= '"  & Me!fltBT & Me!fltEB & "'"

und ff.