Discussion :

[maringot]

Bonjour,

J’ai une table PARAMETRES DEVIS où il y a des champs au format « texte long » dans lesquelles se trouvent différentes conditions au devis (Conditions de règlement, modalités, etc…)

Je dois intégrer ces champs dans la table devis. Il est nécessaire d’avoir la possibilité de modifier ces différents textes sans modifier le texte de base présent dans la table PARAMETRES DEVIS.

Par conséquent je ne peux pas lier les 2 tables car si je modifie le texte dans le devis, il est également modifié dans la table PARAMETRES DEVIS.

Je me triture la tête depuis un moment pour trouver une solution. Je viens de penser à la REQUETE AJOUT, sauf que je n’y connais rien du tout.

J’ai créé une RQ AJOUT avec les 2 tables comme ceci :

Pièce jointe 467723

Lorsque je fais "ajout" ça ajoute une nouvelle ligne dans la table devis ce qui est logique en soi mais mon souhait est d’ajouter le contenu des champs lors de la création d’un devis. Or dans l'exemple ci-dessus la ligne créée dans la table devis porte le n°1 au lieu du n° personnalisé que j'ai créé.

Pourriez-vous m’expliquer comment je peux faire pour ajouter le contenu de ces champs lorsque je clique sur le bouton « nouveau devis » qui a le code suivant :

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
Private Sub Commande94_Click()
On Error GoTo Err_Commande94_Click
 
    Dim stDocName As String
    Dim stLinkCriteria As String
 
    stDocName = "FormDEVIS"
    DoCmd.OpenForm stDocName, , , , acFormAdd
 
Exit_Commande94_Click:
    Exit Sub
 
Err_Commande94_Click:
    MsgBox Err.Description
    Resume Exit_Commande94_Click
End Sub

Dans le devis vierge il y a bien entendu les champs en question.

Est-ce que cette solution est la bonne ?

Avec mes remerciements pour vos conseils

[tee_grandbois]

bonsoir,
il faut faire une requête UPDATE :

Code :

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

1
2
UPDATE Table1, [PARAMETRE DEVIS CLIENT] SET Table1.BLATVA = [PARAMETRE DEVIS CLIENT].[BLATVADevis], Table1.MODALITE = [PARAMETRE DEVIS CLIENT].[MODALITEDevis], Table1.LIMITEPRESTATION = [PARAMETRE DEVIS CLIENT].[LIMITEPRESTATIONDevis] 
WHERE Table1.Identifiant = XXXX;

ne pas oublier la clause WHERE pour mettre à jour uniquement l'enregistrement que l'on souhaite, sans cela toute la table sera mise à jour.

[maringot]

Bonjour tee_grandbois,

J'ai créé la requête, j'ai fait "exécuté" et voici le message...

Pièce jointe 467982

...c'est peut-être normal (?)

Mais cette requête UPDATE je la met où pour qu'elle se déclenche lorsque je cré un nouveau devis et que les champs du devis se remplissent ?

[EricDgn]

Bonjour,

Une façon de faire en attaché. A vérifier que cela fonctionne vraiment avec des champs ayant effectivement plus de 255 caractères.

Cordialement.

[maringot]

Bonjour EricDgn,

J'ai testé votre proposition sur un champ GARANTIE, afin de choisir la garantie fournisseur qui convient au devis. Après avoir tripatouillé un peu pour comprendre le schmilblick, ça fonctionne.

Toutefois j'aurais 1 question : dans le formulaire, le texte de la garantie s'affiche bien dans le champ dédié du devis, mais le choix s'efface de la zone de liste déroulante. Comment puis-je faire pour que le choix reste affiché lorsque je rouvre le devis de manière à bien voir qu'on a inclus la garantie ? (si je demande ça c'est parque ce que le champ garantie se trouve dans un onglet et donc on ne le voit pas sir on ne va pas sur cet onglet).

Avec mes remerciements, cordialement

[EricDgn]

Bonjour,

Si les textes sont masqués parce qu'affichés dans divers onglets, je proposerais comme solution de poser dans la partie principale du formulaire des cases à cocher qui sont décochées quand le champ est vide, cochées quand le champ est non vide.

Exemple ci-dessous avec "ConditionA".



Eventuellement mettre ces cases à cocher juste au-dessus de chaque onglet.

Bonne continuation.

[maringot]

Bonjour EricDgn,

Merci pour le conseil, je verrai un peu plus tard.

J'aurais souhaité essayé la propo sur le bouton nouveau devis (voir ci-dessus). Comment puis-je inclure votre code de façon à incrémenter à l'ouverture du nouveau devis les différents textes mais sans que les formulaires des dit-textes ne s'ouvrent ?

[maringot]

Je précise qu'en ouvrant le devis en cliquant sur le bouton, je n'ai pas besoin de faire un choix puisque tous les champs texte inclus dans le devis doivent s'afficher.

Donc comment rédiger le code pour que le "choix" et l'ouverture des formulaires textes soient supprimés ?

[EricDgn]

Bonjour,

Je ne sais pas si j'ai bien compris votre demande mais voici un exemple où le formulaire fDevis n'affiche plus de déroulant pour la sélection de conditions type et où il faut ouvrir le formulaire fParam pour insérer des conditions type dans le devis affiché. Cela devrait cependant vous donner des idées.

Bonne continuation.

[maringot]

Bonjour EricDgn,

Je vous remercie pour votre proposition car ça fonctionne très bien. Je peux insérer les textes dans le devis et les modifier sans modifier les textes de base.

Encore merci pour votre aide, cordialement, Maringot