Discussion :

[MoiYamaha]

Bonjour
J'ai un formulaire indépendant avec affichage par défaut : formulaires continus
Dans le corps du formulaire (Détail) j'ai un champ [Code] indépendant et un champ [Intitule] indépendant.
Je souhaite que ce formulaire affiche les enregistrements (les uns sous les autres donc puisque formulaires continus) de la table [ModePaiemnt]. Le but étant de lire, pouvoir modifier les enregistrements et/ou en ajouter.
Mais je veux pouvoir contrôler la MAJ de la table c'est à dire que j'ai deux boutons l'un qui validera et donc mettra à jour la table de tous ce qui a été fait dans le formulaire et un autre qui au contraire annulera toutes interventions sur l'ensemble des enregistrements et laissera la table comme à l'ouverture du formulaire.
Pour les formulaires à enregistrement unique je sais avec VBA comment faire pour annuler. Mais ici je souhaite un formulaire continu et donc lorsque je modifie un enregistrement et que je passe à un autre cela MAJ automatiquement la table... ce que je ne veux pas. Donc après maintes recherches, l'idéale (pour moi) serait qu'à l'ouverture le code créée une copie de ma table [ModePaiemnt] et la lie à ce formulaire, comme ça toutes les interventions se font sur cette copie. Ainsi, si je valide = je supprime la table d'origine, et renomme à l'identique la copie et si j'annule = je garde la table d'origine et supprime la copie.

Bon pour ceux qui sont arrivés à suivre voici enfin la question !
mon code se trouvant dans le formulaire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
option compare database
option explicit

private sub Form_open(Cancel as integer)
DoCmd.CopyObject ,"ModePaiemntCopie",acTable,"ModePaiemnt"
MsgBox "La table a bien été copiée"
Me.RecordSource="ModePaiemntCopie"
Me.Code.ControlSource=ModePaiemntCopie!Code
Me.Intitule.ControlSource=ModePaiemntCopie!Intitule
end sub

Seulement quand je veux ouvrir mon formulaire, j'ai un message d'erreur de compilation : Variable non définie , voir partie rouge gras du code.

Merci pour votre aide .... pour ce premier point.

[MoiYamaha]

Bon, avec encore du tatonage j'en suis venue au code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
option compare database
option explicit
 
private sub Form_open(Cancel as integer)
DoCmd.CopyObject ,"ModePaiemntCopie",acTable,"ModePaiemnt"
MsgBox "La table a bien été copiée"
Me.RecordSource="ModePaiemntCopie"
Me.Code.ControlSource="ModePaiemntCopie!Code"
Me.Intitule.ControlSource="ModePaiemntCopie!Intitule"
end sub

Donc là ma table est bien copiée mais dans le formulaire je n'ai qu'une seule ligne (au lieu de la douzaine) et #Nom? est affiché dans mes deux textbox

[Invité]

Bonjour

Test en rajoutant à la fin ceci :

M

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

e.Requery

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.Recalc

Ou sinon en changeant d’événement (load par exemple).

Philippe

[MoiYamaha]

Bonjour,
Je viens d'essayer Me.requery --> pareil
Me.recalc --> pareil
et j'ai fait de même dans un Form_Load au lieu de Form_open --> toujours pareil

[MoiYamaha]

J'avance pas à pas ...
les dernières modif faites = j'ai enlevé le nom de la table dans controlsource

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
option compare database
option explicit
 
private sub Form_open(Cancel as integer)
DoCmd.CopyObject ,"ModePaiemntCopie",acTable,"ModePaiemnt"
Me.RecordSource="ModePaiemntCopie"
Me!Code.ControlSource="Code"
Me!Intitule.ControlSource="Intitule"
end sub

Bon donc maintenant le probleme (oui y en a encore un...) c'est que seule le dernier enregistrement est affiché (je n'ai qu'une ligne)?

[MoiYamaha]

Bon il se trouve que j'ai modifié les paramètres du formulaire : pour les barres de défilement j'ai noté les deux , avant j'avais mis aucune, car le formulaire étant en taille ajustée il devait toujours tout afficher (en tout cas quand le form est lié directement à la table sans code ça marchait tres bien).
Donc là je peux faire défiler et voir effectivement tous les enregistrements...... mais sur une seule ligne.

les paramètres de la partie détail du formulaire sont pourtant :
hauteur automatique =oui
auto extensible=oui
auto réductible=oui

mais rien à faire il reste sur une ligne....grrr

Me reste plus qu'à trouver comment lui faire appliquer le paramètre formulaire continus correctement.

[MoiYamaha]

Bon à rien y comprendre ... Il faudrait mettre en parametre du formulaire taille ajustée= non
mais du coup à l'affichage j'ai bien toutes mes lignes comme il faut , mais les dimensions d'affichage du formulaire sont supérieures à celles que j'ai dans le mode création?