Besoin d'aide pour créer une feuille de saisie "USerForm"

Résolu
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   -  
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour, à tous

Je suis en train d'essayer de réaliser une base de données, mais je bute sur la saisie des informations, si quelqu'un pouvait m'aider cela serait parfait. (Le VBA est trop compliqué pour mi et j'y perds beaucoup de temps je n(avance pas)

Voici mon ébauche de fichier

https://www.cjoint.com/c/LCuslILcJG4

Merci pour votre aide


Configuration: Windows 11/ Edge 99.0.1150.46

A voir également:

195 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Votre fichier modifie: https://www.cjoint.com/c/LDCquNJiAYf
Je n'avais pas modifie tous les appels et procedures au niveau argument.
Par contre, j'ai toujours pas de code parrain ou/et Filleul au bon format. Je planche dessus entre autre.
Parrain/Filleul en creation toutes les infos sont ok en dehors du code, c'est ballot. Vous pouvez faire des recherches et mise a jour dans gestion RDV etc
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

J'ai pu enregistrer un parrain, mais pour le filleul la macro se bloque voire image dans le fichier

https://www.cjoint.com/c/LDCse3B18B4
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,
Normal, cette partie de code n'est encore ok pour le code parrain et filleul.
Le fichier que je triture est en partie bon, mais toujours un problème de format code.
Demain matin, je vais voir à résoudre ce petit soucis afin que vous puissiez continuer à faire des tests de mise au point. En ce moment je suis un court côté dispo.
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Pas de souci, je vais patienter
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Devrait aller mieux avec ceci: https://www.cjoint.com/c/LDDng7nHytf

Les deux UF Creation fiche et GestionRDV peuvent etre deplacer pour une meilleur mise au point
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Oui aprés remise en place de PrtSafe pour 64bits cela fonctionne, J'ai créé un P et un F cela s'est bien passé
Je n'ai pas encore pu rechercher ni modifié RDV mais cela avance. Prévoir numéro de rue à 4 chiffres je l'avait modifié dans mon fichier.


0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,
Ok, deux petites modif a faire UF creation fiche

Private Sub Cmd_Creation_Fiche_Click()


If OptB_Parrain Then


'N°-Parrain
.Cells(PCV, 6) = NbP ald NpP

et

'Parrain Nb.filleul
'.Cells(PCV, 9) = NbP ligne a mettre en commentaire
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour f894009

Les 2 modifications sont faites, Création P et F Ok
Par contre si je veux créer un deuxième Filleul cela bloque voire image

https://www.cjoint.com/c/LDDqPOhKDJ4


0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Chez moi pas de probleme, mais ajoute ceci :
    OptB_Parrain = False
    OptB_Filleul = False

en fin de la procedure Private Sub Cmd_Creation_Fiche_Click() avant Thisworkbook.save pour eviter de faire un click sur parrain et faire un click sur Filleul pour saisir le filleul suivant. En dehors de ca, je n'avais aucune erreur
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Ok correction faites cela fonctionne
Reste la partie RDV et modification
Cela avance bien, et je suis satisfait de pouvoir modifier le VBA avec vos instructions, j'arrive à mis retrouver et pourtant ce n'est pas gagné le VBA je ne suis pas formé, je bricole
Merci pour toute cette aide
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

je ne suis pas formé, je bricole
En ce moment, a la tele, pas mal de pub pour le bricolage, y a peut-etre ce qu'il vous faut!
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Je viens de refaire plusieurs essais en créant un Parrain avec plusieurs Filleuls c'est Ok, je retrouve bien les infos dans la feuille Base données
Le code postal, peut-on chercher la commune avec une liste déroulante à partir de la feuille Grand Est.
Il faut aussi dupliquer les infos suivant les cas dans la base parrain ou Filleul.
Merci pour votre aide

0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Le code postal, peut-on chercher la commune avec une liste déroulante à partir de la feuille Grand Est.
Il faut aussi dupliquer les infos suivant les cas dans la base parrain ou Filleul.

C'est normalement la suite
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Ok Merci
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Peut-être un risque de confusion

Sur feuil1 en E21 =.TextB_CPP = code postal Parrain
en E22 =.TextB_CPP à modifier en CP Commune Parrain

Ou bien je me trompe à voir ?
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

Ou bien je me trompe à voir ?
Non, c'est un copier/froisser. Recitifiez. Vous savez a quoi cela m'a servi?
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Je pense que c'était pour les labels des Texbox dans UserForm ?
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Je viens de tester la partie modification et RDV, cela fonctionne, mais je n'ai pas vu la macro pour supprimer une ligne complète en cas de doublon. Le fait de cliquer sur le bouton suppression ne déclenche pas d'action.
Merci pour tout ton travail, j'espère arriver à tout comprendre et c'est pas gagné.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,
La suppression n'est pas encore codee. Pour la compréhension, ça devrait le faire.
À partir de demain, je peux reprendre le codage sur l'ecriture des base parrain et filleul.
Pour une combobox commune et faire un contrôle sur le code postale, je planche en même temps que le reste et à un moment donné vous aurez un nouveau fichier à tester.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

Si vous voulez modifier les infos personnelles d'un parrain ou un filleul, comment voulez vous faire la recherche de celui-ci?
Comme la partie mise a jour gestion RDV etc... ou ?
0
PHILOU10120 Messages postés 6445 Date d'inscription   Statut Contributeur Dernière intervention   824
 
Bonjour F894009

Je viens de récupérer mon réseau internet, il y a eu une coupure ce matin.

Oui on peut faire comme pour les RDV et mise à jour

Au plus simple
0