title image


Smiley Re: Auswahl eines Kombinationsfeldeintrages im Endlosformular
- erzeuge in deinem Formular (ohne Navigationsleiste) eine Schaltfläche [Neu] und

benenne diese auch so.

- im Click Ereignis der Schaltfläche änderst du den String (Zuweisung) für VarMeineTabelle und den Wert für VarX!



Sub Neu_Click

Dim VarN, VarMeineTabelle,VarX

VarMeineTabelle="Meine dem Formular zugrunde liegendeTabelle"

VarN=dcount("*", VarMeineTabelle)

VarX=20

if VarN < VarX then

DoCmd.GoToRecord , , acNewRec

end if

end sub


Grüße vom Niederrhein!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: