title image


Smiley Re: Anzahl der Datensätze im Formular anzeigen ???
Hi Klaus!Versuchs mal so..Public Function fncAnzFirmen()Dim strFilter As String Public gintN As IntegerPublic gstrX As StringOn Error GoTo Err_fncAnzFirmen If strFilter = "" Then strFilter = "DeinSchlüsselfeld> 0" Else strFilter = strFilter & " and DeinSchlüsselfeld> 0" End If gintN = DCount("DeinSchlüsselfeld", "DeineTabelle", strFilter) Me![DeinFeld] = gintN & " Einträge gefunden"GoTo Exit_fncAnzFirmen:Err_fncAnzFirmen: gstrX = "Fehler in fncAnzFirmen" & vbCrLf gstrX = gstrX & Err.Number & "/" & Err.Description MsgBox gstrX, vbCritical, "F_Kunden_Suche" Resume Exit_fncAnzFirmenExit_fncAnzFirmen:End FunctionGruss Patrick

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: