Discussion :

[Myogtha]

Bonjour à tous

En gros je voudrais que dans mon formulaire contact, si la personne renseigne la civilité "Mr","Mlle","Mme" et bien il enregistre Monsieur,madame,mademoiselle dans un autre champ pour le réutiliser pour du publipostage

j'ai fait ça mais ça marche pas :

Code :

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

1
2
3
4
5
Private Sub Modifiable390_BeforeUpdate(Cancel As Integer)
If (Me.Modifiable390 = "Mr") Then [ContactsEtendu.CiviliteComp] = "Monsieur"
If (Me.Modifiable390 = "Mme") Then [ContactsEtendu.CiviliteComp] = "Madame"
If (Me.Modifiable390 = "Mlle") Then [ContactsEtendu.CiviliteComp] = "Madame"
End Sub

Merci d'avance

[6ril25]

Salut,

c'est plutôt Modifiable390_change ou Modifiable390_Click que Modifiable390_BeforeUpdate

[Invité]

Bonjour

Je vais mettre mon grain de sel.

En général on crée une table civilité avec une clé primaire (chiffre), et un champ civilité abrégé, et un champ civilité écrit normalement.
Et cette table est lié à ta table des contacts.

Pourquoi :

Tu n'as pas à t'embêter pour faire ce que tu veux.
J'ai travaillé dans le monde du marketing, routage, etc .. et dans certains cas on utilise pas le terme Monsieur pour des mailings, mais Maitres pour des avocats, Monseigneur pour des évêques, mon Général pour un général, etc ....

Ton code ne permet pas une évolution sans le retoucher, et si tu utilises ce style de code c'est pareil.

Philippe