Discussion :

[draber]

Une question de débutant sans doute, si quelqu'un peut m'aider ...

En Access, j'ai voulu créer un bouton simple pour fermer un formulaire ou en appeler un autre. En mode création j'ai créé un bouton et automatiquement j'ai eu des fenêtre que j'ai remplies qui ont créé un code VBA qu'on retrouve dans le VB Editor. Mais lorsque je repasse en mode formulaire et que je clique le bouton un message affiche "argument ou appel de procédure incorrect" et la macro VBA bloque à la première ligne;
C'est d'autant plus curieux que lorsque je crée un bouton de la même façon dans une base de donnée d'un collègue tout marche. Il doit y avoir une case à cocher qui manque quelque part ou quelque chose comme cela mais je ne trouve pas.

Merci d'avance à ceux qui répondront

[Moha25fr]

il faut revoir tacode pour ouvrir un formulaire
sinon je te conseille de commencer par des MACROS

[draber]

J'ai comparé les codes générés dnas ma base et celle du collègue à la création d'un bouton et ils sont identiques. Lorsque je fais une macro et que je l'attribue au bouton cela marche mais c'est plus long.

Merci quand même du truc de la macro

[Moha25fr]

tu peux convertir ta macro et tu peux récupérer le code vba tout fait

A+

[ft035580]

Salut,

Lorsque tu es en mode visual, essaie de voir si dans Outils/Références des lignes ne sont pas mises "MANQUANT".Auquel cas décôche ces dernières.
Peut-être que ceci règlera ton problème.

Bon courage.

[draber]

J'ai vérifié il n'y a pas de manquant dans Outils/références.
J'y ai 4 lignes cochées : VB for apllications, Microsoft access 10.0 object library et OLE automation, comme dans la base du collègue.
J'ai essayé de créer le code en macro puis de lui faire convertir mais alors la macro ne veut pas s'exécuter après conversion.

Et en plus j'ai un vrai version d'Access officielle et tout et tout même pas une
tombée d'un site de crack ! c'est à vous dégouter de les acheter !

Si quelqu'un a une idée, sinon je ferais des macros classiques.

Merci à tous

[draber]

et j'ai ausi Microsoft Active X data objects2.1 library que j'avais oublié de signaler cochée dans le précedent message

[Moha25fr]

tu peux me faire voir ton code stp?

[draber]

C'est le 26è bouton que j'essaie de générer. Voila ce qu' il écrit, si tu as une idée !

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 Private Sub Commande26_Click()
On Error GoTo Err_Commande26_Click
 
 
    DoCmd.Close
 
Exit_Commande26_Click:
    Exit Sub
 
Err_Commande26_Click:
    MsgBox Err.Description
    Resume Exit_Commande26_Click
 
End Sub

[ft035580]

Bon ben essaie tout simplement:

Code :

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

1
2
3
 Private Sub Commande26_Click()
    DoCmd.Close
 End Sub

[Moha25fr]

regarde si au niveau des options d'access t'as activer le gestionnaire d'erreurs

[draber]

Même en ne laissant que

Code :

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

1
2
3
 Private Sub Commande26_Click()
    DoCmd.Close
 End Sub

ca coince toujours avec le même message

J'ai pas trouvé le gestionnaire d'erreurs ni dans la barre d'Access ni dans celle de VB. Où est elle ??

[Moha25fr]

dans outils/ options je pense

[draber]

Je ne le trouve ni dans Outils/options de Vb ni d'Access, mais ce doit être un truc comme cela.
Je peux toujours faire des macro classiques mais ca m'ennerve car je suis nouveau en Access mais je me débrouillais pas mal en ExcelVBA.

Meci quand même pour les conseils

[zEndymion]

Bonsoir,

il me semble que le synthaxe exact pour Close est :

Code :

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

1
2
 
DoCmd.Close acForm, Me.Name

@+

[draber]

voila le code que j'ai essayé pour mon formulaire appelé LupMed

Code :

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

1
2
3
4
5
6
7
Private Sub Commande35_Click()
 
 
DoCmd.Close acForm, "LupMed", acSaveYes
 
 
End Sub

que bloque aussi sur la première ligne et à la compilation avec le même message "argument ou appel de procédure incorrect". comme à ce niveau il n'y a pas d'arguments, c'est donc l'appel de procédure , je pense. Je n'y comprends rien.

[zEndymion]

Ok,

2 choses :
1°) As tu essayé avec

Code :

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

DoCmd.Close acForm, Me.Name, acSaveYes

2°) As tu fait un Débogage (Ds la fenêtre VBA ebogage->compiler) de ton projet, on ne sais jamais l'erreur est peut-être ailleur ...

[draber]

En désespoir de cause j'ai recréé une nouvelle base en reprenant tous les formulaires et tables par importer et maintenant cela marche.

Si quelqu'un comprends ...

Merci quand même à tous de votre aide. C'est vraiment sympa de ne pas se sentir seul face à l'adversité de ces machines.

A+