Discussion :

[psykodumarteau]

Bonjour,

j'ai créé dans Access un formulaire modèle que je copié/collé par du code VBA. j'utilise la commande "DoCmd.CopyObject" pour essayer de réaliser cette action.

voici mon code :

Code :

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

DoCmd.CopyObject , nomformcible, acForm, Form_MODEL_BRDC.Name

Lorsque j'exécute le code j'ai le message suivant : erreur 3709 "La clé de recherche n'a été trouvée dans aucun enregistrement" et me surligne la ligne de code précédente. J'ai essayé de remplacer "Form_MODEL_BRDC" par "MODEL_BRDC" mais çà ne change rien.

Est-ce qu'il existe une autre méthode pour copier/coller un formulaire? Où comment utiliser cette fonction correctement? (J'ai regardé l'aide VBA mais çà ne m'a pas apporté grand chose).

[mikeGo20]

Le problème: Form_MODEL_BRDC.Name
Quel est le nom de ce formulaire ??
Comment est-il écrit dans la fenêtre des formulaires ??


Si le formulaire existe bel et bien, il sera copié sans problème ....

Code :

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

DoCmd.CopyObject , "NouveauNom", acForm, "NomDuFormulaire"

[psykodumarteau]

re,

Form_MODEL_BRDC.name retourne bien le nom du formulaire c'est à dire "MODEL_BRDC". J'ai aussi testé directement avec le nom du formulaire mais çà n'a rien changer.

Code :

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

DoCmd.CopyObject , nomformcible, acForm, "MODEL_BRDC"

Le formulaire ne veut pas ce copier/coller.

Je pense que le problème vient du formulaire lui-même car la commande est plutôt simple.

Quelqu'un connaît-il des proprietés de formulaire qui empêcheraient de le copier/coller ?

[psykodumarteau]

C'est bon, maintenant ça marche. A priori ça ne marche si le formulaire copier contient du code VBA et s'il n'est pas ouvert.

Code :

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

1
2
3
4
 
DoCmd.OpenForm "BRDC_VIERGE", acNormal, , , , acHidden
DoCmd.CopyObject , nomformcible, acForm, "BRDC_VIERGE"
DoCmd.Close acForm, "BRDC_VIERGE", acSaveNo