Discussion :

[toinekikil]

Bonjour,

J'ai un formulaire de consultation d'une table chantier, et je voudrais créer un bouton pour ouvrir un autre formulaire d'ajout de chantier.

Or lorsque je fais ca, je ne peux pas ajouter, meme en fermant auparavant le formulaire de consultation.

Voila mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Private Sub Commande11_Click()
On Error GoTo Err_Commande11_Click
 
    DoCmd.Close
 
    Dim stDocName As String
    Dim stLinkCriteria As String
 
    stDocName = "chantier"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
 
Exit_Commande11_Click:
    Exit Sub
 
Err_Commande11_Click:
    MsgBox Err.Description
    Resume Exit_Commande11_Click
 
End Sub

J'ai essayé via une macro mais cela donne la meme chose je ne peux pas ajouter.

Y a t-il une astuce.

Merci d'avance.

[Mahefasoa]

Salut,

Est-ce que le formulaire de consultation = formulaire d'ajout?

En attendant, voici une syntae qui te permettras d'ouvrir un form en mode ajout:

Code :

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

1
2
 
DoCmd.OpenForm "nom formulaire", acNormal, , , acFormAdd

A+

[toinekikil]

C'est 2 formulaires séparés un de conultation et un d'ajout...

La commande ci dessus donne un formulaire vide, je pense que ca vient du fait que mon autre formulaire etait ouvert au moment ou j'appelle.

Comment faire sachant que mes 2 formulaires travaillent sur la même table...

[CinePhil]

Ne serait-il pas plus simple de se servir du même formulaire pour la consultation et l'ajout ?

[toinekikil]

si si ca serait plus simple mais c'est une appli destiné a des "boulets" donc je veux pas qu'ils ajoutent et modifient a tour de bras...

mais bon pour le moment C vrai qu'elle fonctionne comme ca et si j'ai pas de solution ca fonctionnera comme ca et tant pis pour eux s'ils font de boulettes

[toinekikil]

C'est bon j'ai trouvé, j'avais mis un verrouillage sans faire expres.

Merci beaucoup a ceux qui m'ont aidé.