title image


Smiley Re: VBA: Ausfindig machen ob Source Datensätze erhält
Für alle die meine Lösung interessiert, hier der Code:



Dim rs As DAO.Recordset



Set rs = CurrentDb.OpenRecordset(var_sql)



If rs.RecordCount = 0 Then



If MsgBox("Ihre Suche lieferte leider keine Ergebnisse", vbOKOnly, "Sucheergebnisse") = vbOK Then



Me.RecordSource = qry_kunden

Me.Requery



End If



End If

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: