OVH Cloud OVH Cloud

Duplication d'enregistrement

2 réponses
Avatar
MARIO
J'ai placé dans un formulair un bouton de "duplication d'enregistrement" avec
l'aide de l'assistant, qui fonctionnait très bien au début ; puis il a perdu
sa fonctionnalité.
J'en ai replacé un autre qui ne fonctionne pas plus. Que se passe-t-il ?
Merci.

2 réponses

Avatar
Raymond [mvp]
Bonjour.

lire la fiche technique:
Rien ne se passe lorsque vous lancez un Assistant Microsoft Access
http://support.microsoft.com/default.aspx?scid=kb;fr;242218

pour te dépanner:

sur l'événement click du bouton, cliquer sur les ... à droite de la ligne,
ça va ouvrir la procédure événementielle.
entre ce code dans la procédure:
Private Sub Commande82_Click()
On Error GoTo Err_Commande82_Click
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdPasteAppend
Exit_Commande82_Click:
Exit Sub
Err_Commande82_Click:
MsgBox Err.Description
Resume Exit_Commande82_Click
End Sub


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"MARIO" a écrit dans le message de news:

J'ai placé dans un formulair un bouton de "duplication d'enregistrement"
avec
l'aide de l'assistant, qui fonctionnait très bien au début ; puis il a
perdu
sa fonctionnalité.
J'en ai replacé un autre qui ne fonctionne pas plus. Que se passe-t-il ?
Merci.


Avatar
MARIO
Merci Raymond, j'ai utilisé votre "SUB" qui fonctionne très bien;
mais j'ai diagnostiqué un autre problème, c'est que mon formulaire
refusait de dupliquer à cause de la présence d'un Masque de saisie
dans un contrôle. ??? Je l'ai enlever mais sans comprendre...


Bonjour.

lire la fiche technique:
Rien ne se passe lorsque vous lancez un Assistant Microsoft Access
http://support.microsoft.com/default.aspx?scid=kb;fr;242218

pour te dépanner:

sur l'événement click du bouton, cliquer sur les ... à droite de la ligne,
ça va ouvrir la procédure événementielle.
entre ce code dans la procédure:
Private Sub Commande82_Click()
On Error GoTo Err_Commande82_Click
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdPasteAppend
Exit_Commande82_Click:
Exit Sub
Err_Commande82_Click:
MsgBox Err.Description
Resume Exit_Commande82_Click
End Sub


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"MARIO" a écrit dans le message de news:

J'ai placé dans un formulair un bouton de "duplication d'enregistrement"
avec
l'aide de l'assistant, qui fonctionnait très bien au début ; puis il a
perdu
sa fonctionnalité.
J'en ai replacé un autre qui ne fonctionne pas plus. Que se passe-t-il ?
Merci.