Besoin d'aide pour créer une feuille de saisie "USerForm"
RésoluPHILOU10120 Messages postés 6513 Date d'inscription Statut Contributeur Dernière intervention -
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
- Besoin d'aide pour créer une feuille de saisie "USerForm"
- Créer un lien pour partager des photos - Guide
- Comment créer un groupe whatsapp - Guide
- Créer un compte google - Guide
- Créer une adresse hotmail - Guide
- Créer une liste déroulante excel - Guide
195 réponses
La problématique porte sur la saisie d’informations dans une base via des formulaires, en particulier le choix des champs obligatoires, des accès bloqués à certains éléments et l’idée d’un sauvegarde automatique à la fermeture. Les propositions techniques incluent la validation du numéro de téléphone (minimum 10 chiffres), l’apparition d’un calendrier par clic pour les dates et la distinction entre formulaires de création et de modification pour éviter les blocages lors de la saisie. Sur le volet données, il est recommandé de ne pas supprimer un parrain sans filleuls pour éviter les doublons, d’envisager des corrections plutôt que des suppressions, et de clarifier les intitulés et les colonnes (Pose, M², Date, RVD, mois) pour une meilleure cohérence. Enfin, côté interface, l’utilisation d’une ListView plutôt qu’une ListBox est évoquée pour limiter les accès externes et améliorer les performances, avec des ajustements sur le séparateur décimal et l’ajout éventuel d’une colonne mois.
Déjà il faut que je remette en 64 bits
Oui, j'ai oublie de faire la modif de test 32/64 pour les API. Je vais arranger la chose
modif pour Excel 32/64 bits: https://www.cjoint.com/c/LEsjNecRUfg
Je vais plancher pour la creation multiple de filleul pour un parrain car ce que j'ai code fait faire pas mal de click souris tout en ayant la possibilite de choisir le parrain
Je teste le fichier, Il y a un problème avec le nouveau 64 bits il ne fonctionne pas chez moi, les lignes que vous avez mises pour passer du 32 au 64 se mettent en rouge, j'ai ajouté PtrSafe devant Function et Ptr à la suite de Long mais il y a des blocages
Je travaille avec le premier celui que je vous fais parvenir en lien
J'ai un problème l'incrémentation des codes est repassée à une numérotation inférieure et maintenant les numéros se suivent
Peut-être une réinitialisation à faire
Pour la partie RDV et modification le masque pour la date pose problème lors de la saisie
Les corrections sont prises en comptes, une ou deux fois lors de la validation, je n'ai pas trouvé la ligne dans la base
Création parrain pas de problème
Création filleul ?
https://www.cjoint.com/c/LEukk10quT4
Sur ce fichier j'ai supprimé tous les noms qui étaient en #réf# dans le gestionnaire de noms
J'ai un problème l'incrémentation des codes
Non, y a pas de probleme. J'ai modifie les codes et garde les ancienes lignes seulement pour des tests.
Le numero valide se trouve en K2 de chaque base P/F
Quand ce sera au point, il faudra partir de bases vide
Pour la partie RDV
J'y travail. je vais surement changer le code pour faire le controle de date
Les corrections sont prises en comptes, une ou deux fois lors de la validation
Comprends pas
je n'ai pas trouvé la ligne dans la base
Idem
De toutes facon, je suis entrain de finaliser la partie Creatiion Parrain/Filleul avec une autre facon de proceder pour conserver, choisir un parrain pour un ou plusieurs filleuls et aussi modifications des infos P/F
La partie RDV, reste les saisies date
mais il y a des blocages
Dans le fichier que je code, j'ai aoute les test VBA7 pour 32/64b et modifie les API
Par contre, il faudrait me montrer a quels endroits vous avez des lignes en rouge cars je n'ai pas actuellement un Office 64bits.
J'ai eu un Office 2010 en 64bits, mais je m'en suis tres vite debarrasse a l'epoque
Suite:
Création filleul ?
Avec le fichier que vous avez remis a dispo, pas de probleme de creation/modification dans les deux bases pour un filleul ou filleul
Au fait, dans le dit fichier les codes API ne sont pas completement modifies.
Il manque le LongPtr aldLong
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPour les lignes en rouge j'ai ajouté PtrSafe et LongPtr et cela à l'air de fonctionner
Pour le reste je vais attendre que vous soyez plus avancé en programmation pour ne pas vous créer des problèmes.
La saisie pour création parrain et filleul fonctionne, RDV et Phonning aussi
Merci je vous laisse avancer
Oui pour la date s'il n'y a qu'à valider avec calendrier comme pour le RDV
Merci pour ces propositions
Je vois que l'on va dans le même sens simplifier et minimiser les actions et le maximum à la souris
Donc cela me va très bien
Fichier pour Consultation Base de Donnees, Saisie RdV et Creation/Modification/Suppression Fiche P/F:
https://www.cjoint.com/c/LExqaLPjXag
Comme precedemment, il y a toujours les anciennes lignes des Bases que j'utilisai pour tests.
Une fois que vous "maitriserez" la chose, vous initialiserez toutes les bases pour partir propre.
A vous de jouer
Voici ce que j'avais eu comme problème l'autre jour, il est toujours d'actualité
https://www.cjoint.com/c/LExrKlLmyb4
Le deuxième problème Incompatibilité de type même chose que sur le fichier précédent et je n'ai pas trouvé la solution pour le moment
https://www.cjoint.com/c/LExsTkgcCT4
Mettez un point d'arrêt sur la premiere ligne en dessous #If et un en dessous du #else pour voir quelle declarations sont prises en compte
Suite:
Pas possible de mettre un point d'arret sur ces lignes.
Je vais intaller mon magnifique Office2010 64bits pour voir
Suite1:
J'ai poubellise le Office. Je vais voir cote Internet
Suite2:
Une solution pas tres orthodoxe mais qui "marche":
mettre les lignes entre le #else et #end if et les lignes #If #esle #end if en commentaire partout ou il y a le test #If VBA7
Ne les enlevez pas car perso j'en ai besoin
Je vais regarder, pour le moment je coince sur UF accueil, je vous envoie un comparatif de l'ancienne macro et la nouvelle qui bloque
https://www.cjoint.com/c/LEylQztAuG4
Ce que vous avez en colonne C n'est dans aucune partie VBA des Userform
En colonne A ce sont des API pour un office 64Bits sans test VBA7
Colonne C: pourquoi les lignes entre le If else et else End if sont les memes pour du 64bits. Dans le fichier que je vous ai remis ce n'est pas ecrit comme ca
De plus dans le post <154> suite 2:, je vous ai ecrit de mettre en commentaire des lignes sur les tests VBA7.
Je suis toujours bloqué sur UserForm Accueil après la mise en commentaires des erreurs de type et incompatibilité cela me met un message diviser par zéro, si je mets la ligne en commentaire cela affiche un entête accueil avec la croix de fermeture et si je ferme cela recommence si je relance la procedure
Pour les points d'arrêts ils sont refusés sur ces lignes
Donc je ne peux pas avancer sur les autres modules, je reviens toujours au point de départ ou cela bloque
Merci pour ces nouveaux modules que j'espère bientôt exploiter
Le fichier sur lequel je suis bloqué ou je tourne en rond sans pouvoir passer l'accueil
https://www.cjoint.com/c/LEAjfhEYbJ4
Merci pour le fichier, mais à peine ouvert j'ai toujours le blocage voire le fichier
https://www.cjoint.com/c/LEAjMnAoWV4
modules MScreen lignes mises en commentaires
https://www.cjoint.com/c/LEAjZUtPhT4
J'ai oublie une modification dans le module Screen. Sorry Sir
https://www.cjoint.com/c/LEApKpqPvtg