Actualiser toutes les données d'un formulaire ?

Marsh Posté le 29-06-2002 à 00:10:30

Présentation de la chose !
J'ai un premier formulaire (Form1) qui me donne les valeurs ma table (table1)
dans Form1 j'ai un bouton Ajouter qui ouvre un nouveau formulaire (Form2)
qui me permet d'entrer les données dans Table1

Mais comment faire pour qu'au retour au form1 les valeurs s'affichent automatiquement ...

J'ai bien un code qui fonctione ! insérer sur le la liste déroulante
"Sur Réception Focus"

Citation:

Private Sub liste_des_Genres_GotFocus()
'Actualise la liste déroulante afin de mettre
DoCmd.Requery "liste des Genres"
End Sub

et je pensais faire de même sur le formulaire
"sur Réception focus"
Citation:

Private Sub Form_BeforeInsert(Cancel As Integer)
DoCmd.Requery "Champ1"
DoCmd.Requery "Champ2"
DoCmd.Requery "Champ3"
DoCmd.Requery "Champ4"
DoCmd.Requery "Champ5"
DoCmd.Requery "Champ6"
End Sub

mais marche poa ! :sweat:

Comment faire ??
Sa m'énerve d'être newbie ! j'ai l'impression que c'est les autres qui font le taff a ma place !!!!! :gun:

Gwendal

Marsh Posté le 29-06-2002 à 00:10:30

Marsh Posté le 29-06-2002 à 12:00:18

ben tu peux aussi un truc qui s'exécute quand tu sors de ton form2

Code :

Private Sub Form_Close()
Forms("formulaire1" ).Refresh (ou.recalc ou .requery)
End Sub

Ca ne marche que si ton form1 est ouvert à ce moment là.

en faisant

Code :

forms("form1" ).controls("champ1" ).qqchose

tu peux même agir sur tes champs l'un après l'autre.

Message édité par latruffe le 29-06-2002 à 12:00:42

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *