title image


Smiley Re: Nach Auswahl eines Ja/Nein-Feldes Textfeld füllen??
Das geht etwa so:



Private Sub MeinKombi_AfterUpdate()

Dim RS as DAO.Recordset

Set RS = Me!DeinUnterformular.Recordsetclone

if RS.Recordcount > 0 then

RS.Movefirst

Do Until RS.EOF

if RS!DeinJaNeinFeld then

RS.Edit

RS!Datumsfeld = Me!MeinKombi

RS.update

end if

RS.movenext

Loop

End if

Me!DeinUnterformular.Requery

Set RS = Nothing

end sub





Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: