Saisie Userform pour base de données

[TAL]

Bonsoir à tous,

Pourriez vous m'aider SVP sur la saisie de base de données.

Je vous joins le fichier.
J'ai essayé, en cherchant sur le forum et vidéo, de faire les codes, mais je n'arrive pas à les appliquer.
Se sont des codes pour ajouter modifier rechercher.

S'il vous plait
J'espère que vous pourrez m'aider
Bien à vous

 

[Dranreb]

Bonsoir.
Pouvez-vous partir de ce fichier ?

 

[TAL]

Bonjour Dranreb,

Merci de m'avoir répondu.
Après avoir envoyé, le message hier soir, j'ai continué mes cherches et je suis justement tombé sur les messages du 11 Octobre 2023 échanges avec Caso.
Je mettais téléchargé le modèle afin de voir si c'était possible de faire une adaptation à mes besoins.

Alors OUI, je veux bien, et je vous en remercie par avance.

Tout y est dans le modèle que j'ai adressé au Post #1.
Juste que je ne mettais pas encore penché sur la numérotation automatique et les Checkbox. Si vous pouviez également m'aider pour ça.
Autre demande :
Dans la Frame "Lettre d'engagement" Label " - Etat du Dossier" - TextBox16, qui est relier à la colonne AA avec une formule : si dossier complet alors "OK" et la ligne d'écriture passe en noir sinon "En attente" est la ligne d'écriture reste en rouge. Serait il possible que la TextBox16 fasse de même. Si "OK" l'écriture est noir, si "En attente" l'écriture de la TextBox16 passe en Rouge.

Dans l'attente de votre retour
Un grand Merci

 

[Dranreb]

Bonjour.
Donnez des noms mnémoniques à vos contrôles pour vous y retrouver plus facilement.
Faites les commencer par un trigramme pris de cette liste:

 

[TAL]

Comme ceci ?
En espérant avoir compris 🤔

 

[Dranreb]

Ben non, dans votre classeur joint ils s'appelleent toujours TextBox1, TextBox2 etc. qui ne veut rien dire.
Et puis vous n'êtes par reparti de mon classeur CLsCAsContact.
Ah si, excusez moi, dans l'UserForm ils ont été renommés. J'avais commencé par regarder le code.
Bon et bien il ne vous reste plus qu'a copier le code de mon UFmContact dans votre UFmAdmin et à l'adapter …

 

[TAL]

Ok, je vais essayé 🤞

 

[Dranreb]

Séparez donc aussi le Nom et le Prénom dans votre base puisque c'est très bien géré par l'objet ComboBoxLiées
N'oubliez pas de copier aussi le module standard de service MSujetXBx et les 10 modules de classe. Je me demande s'il n'y aurait pas mieux valu transformer le tableau de mon CLsCAsContact en celui qu'il vous faut …

 

[TAL]

Je me suis également posé la même question.
Le soucis étant que je n'ai fait qu'une extraction de mon fichier, en suppriment une partie de la base de données (404 enregistrement) et je n'ai pris qu'une petite partie est modifié les coordonnées dans le fichier pour exemple.
Dans le fichier original, il y a d'autres Userform qui sont reliés déjà relié avec le Nom Prénom en un seul bloc.
Tout modifié serait, pour moi, un gros soucis, n'y connaissant pas grand choses en VBA, je galère énormément.

Pour les case à cocher, comment dois-je écrire le code en sachant que lorsque c'est coché, je voudrais que se soit un "X" qui apparaît dans la colonne.

 

[Dranreb]

Mon objet ControlsAssociés sait gérer les CheckBox. Par défaut il met pour True un =UNICAR(HEXDEC("2714")) soit "✔". Mais si c'est absolument indispensable, il devrait être possible de lui imposer un autre caractère en mettant "X;(vide)" en 3ème paramètre du CAs.Add.

 

[TAL]

Mon objet ControlsAssociés sait gérer les CheckBox. Par défaut il met pour True un =UNICAR(HEXDEC("2714")) soit "✔". Mais si c'est absolument indispensable, il devrait être possible de lui imposer un autre caractère en mettant "X;(vide)" en 3ème paramètre du CAs.Add.

Bonsoir Dranreb,

Je suis désolée, mais je n'y arrive absolument, j'ai n'est mal à la tête. Demain est un autre jour.
Bonne soirée

 

[Dranreb]

Pour avancer laissez pour le moment au CAssoCkx son fonctionnement par défaut en ne spécifiant rien comme 3ème argument du CAs.Add

 

[p56]

Bonsoir à tous,

Alors voici une proposition de codage. A noter :

* dans le fichier initial il y a un conflit d'intérêt entre la RowSource (en dur) du combo pour le choix des noms et l'insertion d'une ligne dans le TS T_Admin (ça générait alors un bug en cas de nouvelle fiche)
Dans le code proposé ici, la liste du combo est donc initialisée à l'ouverture de l'USf et après la sauvegarde d'une fiche. Ce qui fait que dès l'enregistrement d'une nouvelle fiche, le nouveau nom s'inclut dans la liste.

* les 2 boutons "Ajouter" et "Modifier" ont été remplacés par un seul "Valider" qui fait les 2

* perso, le nom des contrôles m'importe peu, j'utilise plutôt une numérotation dans les tags.

* et sinon je suis reparti d'un nouveau fichier car celui proposé était devenu un peu trop lourd.

Est-ce que ça peut aider?
P.

 

[TAL]

Bonjour P56, Bonjour Dranreb,

Fantastique !!!

Un grand Merci !!!!!! à tous les deux

Je vous souhaite une belle journée
Merci merci merci

 

[TAL]

Bonjour P56,

Juste une petite demande, je voudrais insérer une ligne au dessus du tableau, sur quel code dois-je modifier pour que l'enregistrement commence à la ligne 3.

Merci beaucoup