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

Question

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

f894009 · Answer

Bonjour,

j'ai recupere votre fichier. Si ce n'est pas pour demain, je dois avoir kake chose qui pourrait aller avec des modifs pas trop consequentes

PHILOU10120 · Answer

Bonjour F894009

Merci, non ce n'est pas pour demain.

f894009 · Answer

Bonjour,

j'ai commence, je parts userform vierge car ce que j'ai en archive ne convient pas.
Je fais au plus simple et ensuite, j'aurai des questions

PHILOU10120 · Answer

Bonjour F894009

Oui d'accord pas de souci

Merci

PHILOU10120 · Answer

Bonjour F894009

Avez-vous eu du temps pour regarder mon problème ou avez-vous un début de solution que je pourrai adapter ?
Merci de votre aide

cs_Le Pivert · Answer

Bonjour,

tu peux le faire par toi même en suivant ce tuto.

C'est très facile!

https://codes-sources.commentcamarche.net/faq/11347-associer-un-formulaire-userform-a-une-base-de-donnees

f894009 · Answer

Bonjour,

Monsieur est impatient , presse, que sais je encore?
J'ai pas mal avance, le plus long etant les masques et controles saisies numeriques et dates.

PHILOU10120 · Answer

Bonjour Le pivert et F894009

Pour le Pivert, je vais voir si c'est dans mes cordes ?

Pour F894009 je ne suis pas là pour mettre la pression, je pense que c'est complexe de faire le masque de saisie et tous les contrôles des cases à renseigner et la vérification des informations numériques et des dates.
C'est pour cela que j'ai besoin de vous F894009.
Merci de votre aide

PHILOU10120 · Answer

Bonjour Le Pivert

Je viens d'essayer votre proposition cela va bien sauf que je ne comprends pas la méthode pour ajuster la largeur de texteBox. Faut-il régler les textebox manuellement ?

f894009 · Answer

Bonjour,

Le Pivert(Salut ca roule?)  ou F894009 a vous de voir. Perso, si vous choisissez Le Pivert je n'y verrai aucun ombrage

PHILOU10120 · Answer

Bonjour F894009

Non j'ai toujours besoin de vous pour vérifier et contrôler le bon remplissage des cellules avec les bonnes informations 
Monsieur Le Pivert m'a montré un outil qui permet de manipuler les données de la base de données (ajouter, supprimer, modifier, enregistrer, suivant, précédent.
Maintenant j'aimerai savoir contrôler et vérifier les informations entrer dans les TextBox de l' UserForm.
Donc votre aide m'est toujours précieuse.

Merci

f894009 · Answer

Bonjour,

Pour valider la creation d'une fiche, quelles sont les infos obligatoirement  a remplir?
A priori toutes les infos ne sont pas obligatoires a la creation de la fiche, donc ce n'est pas une form de saisie qu'il vous faut mais une form de saisie et modification fiche pour mise a jour

PHILOU10120 · Answer

Bonjour F894009

Les cellules obligatoires

Parrain ou filleul	P	F
Date	30/03/2022	
Commercial	Commercial Prénom	
nom Parrain :	Dupond	
prénom Parrain	: Patrick	
N°- Téléphone Parrain :	xx xx xx xx xx	
"nom Filleul"	: Martin	
Prénom Filleul : 	Théo	
Téléphone Filleul :	xx xx xx xx xx	
N°- Rue	: 148	
Nom Rue :	Av du Maréchal Foch	
Code Postal	: 10100	
Commune	: xxxxxxxxxxxxx

Pour le Phonings date et pour les relances plusieurs tentatives avec Nok ou Ok
Date de RdV
Date de pose	
M² posé
Pose effectuée Ok

Merci de regarder mon problème

f894009 · Answer

Re,

Dans votre feuille de saisie, pour parrain et filleul les cellules N°, Rue, CP et Communes sont les memes dans la base!!!!!
Pige pas votre logique.

PHILOU10120 · Answer

Bonjour F894009

Oui soit on enregistre un Parrain avec son adresse sans le nom, prénom, et N°- téléphone du filleul
Ou  
 Un Filleul dans ce cas il y a le nom prénom du parrain et n°- téléphone plus les infos du filleul nom prénom téléphone numéro rue nom rue code postal commune
Cela pour faire le rapport Parrain et filleuls

Si cela pose problème je peux regarder pour faire autrement

Merci

PHILOU10120 · Answer

Bonjour F894009

C'est un client aussi

f894009 · Answer

Bonjour,

Quand vous creez une fiche, vous ne remplissez pas les infos date RDV etc..
Cela fait parti d'une modification fiche a venir ou ????

PHILOU10120 · Answer

Bonjour F894009

Pour les RDV, oui ils sont entrés par la suite ainsi que les relances et la date de pose

Pour les codes normalement ils seront tous différents car incrémente de 1 à chaque filleul et pour les Parrains idem je les compte et j'ajoute un
Dans votre fichier d'essai j'étais en cours de création donc il se peut qu'il y ait des ratés

S'avez-vous comment on affiche l'UserForm à l'écran j'ai essayé avec un bouton mais je ne vois pas de macro à sélectionner pour lancer la procédure, je peux le faire dans les macros en manuel Je ne trove pas en automatique
Merci pour votre aide

f894009 · Answer

Bonjour,

Pour les RDV, oui.......
Ok, je pressentais la chose. Donc creation, vous ne verrez pas la partie RDV etc, Modification la presentation sera complete
Pour le moment j'ai presque fini la partie creation.
Y a kake chose qui me tracasse, vous demandez a ajouter des lignes et toutes vos formules sont limitees par la ligne 210!!!

S'avez-vous comment on affiche l'UserForm à l'écran j'ai essayé avec un bouton mais je ne vois pas de macro
Deux cas
Controle de formulaire: vous devez creer une macro ex: Affiche_UF et code Userform1.show que vous affecterez cette macro a ce bouton
Controle ActiveX: double click sur le bouton et la fenetre  s'ouvre sur le VBA de la feuille du bouton et vous aurez un code auquel vous ajoutez le code d'ouverture de l'UF
ex:
Private Sub CommandButton1_Click()
     Userform1.show
End Sub

PHILOU10120 · Answer

Bonjour F894009

Pour les lignes pas de souci, il suffit insérer des lignes avant la ligne 210 et les formules suivront 

Merci c'est Userform1.show qui me manquait.

f894009 · Answer

Bonjour,

insérer des lignes avant la ligne 210 
Ben non, car il n'y a pas de formules. Je vais faire insertion ligne, copier/coller la ligne 20 formules seulement
Pour les MDF, va pas non plus puisque insertion=ligne en plus, donc le 209 devient 210, etc........
Vos formules calcul code font reference a la cellule C2 pour l'annee et les cellules de la ligne pour le reste, ca va pas.
Faire avec toutes les cellules de la ligne

PHILOU10120 · Answer

Bonjour F894009

Pour les formules en ligne 2, je construis mes données avec ces formules et en principe je copie toute la ligne de A2 à AE2 pour venir la coller valeur en dernière ligne dans la base de données.

f894009 · Answer

Re,
venir la coller valeur en dernière ligne dans la base de données.
Y a des formules donc pas copier valeurs, pige pas votre facon de faire.

Je n'utilise pas de ligne intermediaire pour mettre a jour votre base.
Quelle infos permet de faire la recherche pour completer ou modifier les infos Date RDV etc ou/et les infos Parrain/Filleul, car je n'en vois aucune de valable, en dehors des noms Parrain et/ou Filleul mais c'est pas le top

PHILOU10120 · Answer

Bonjour F894009

La colonne A le code année 2022 sem 7 commercial C2 Pascal Parrain 16_000 Filleul  93 à 98 nom

Ou chercher un commercial Pascal et une semaine 7 puis le nom parrain ou le filleul 

Le lien du fichier actuel encore en chantier

https://www.cjoint.com/c/LDcrCpu11T4

f894009 · Answer

Bonjour,

Ben avec ce que vous avez comme fichier, vous n'avez pas besoin de mon aide!

PHILOU10120 · Answer

Bonjour F894009

Merci pour l'information !
Bien sûr que si j'ai besoin de vous pour faire fonctionner l'UserForm, entrer les données, les contrôler, les stocker dans la base et enfin pourvoir modifier ou compléter un enregistrement

Merci pour votre aide, si vous ne voulez pas continuer envoyez moi ce que vous avez déjà fait si cela ne vous dérange pas j'essayerai de me débrouiller

Merci beaucoup encore une fois pour votre aide

f894009 · Answer

Re,

si vous ne voulez pas continuer
Mais si, je vous charrie un peu.

fichier pouvant ecrire des lignes parrain ou filleul avec des formules. Le code n'est pas termine
 https://www.cjoint.com/c/LDdnZQWAAcf
Pour lancer l'interface, clic sur le bouton creer filleul(dorigine).
Entrez la premiere lettre d'un commercial
choisissez Parrain ou Filleul
Remplissez les champs
Clic sur bouton Creation Fiche

Y a pas de controle pour valider pour le moment

Dans le dernier fichier que vous avez mis a dispo, pas de formule impecable.
J'avais prevu de faire le calcul du code, mais il y a aussi les colonnes B a I

Dans votre dernier fichier, il faut tout saisir si vous utilisez l'Userform1
Probleme: vous avez ajoute une colonne, pas bien de ne rien dire
Si je continue, il n'y aura pas de ligne avec formules intermediaire. Ce sera un peu plus long a creer.
A vous de voir

Une curiosite:
Sur Excel2007, la formule ex: =NO.SEMAINE($K2;21) donne #Nombre par moment mais pas en Excel2013

PHILOU10120 · Answer

Bonjour F894009

Je viens de créer une première fiche pour essayer cela à l'air de bien fonctionner 
J'ai été voir le code de la feuille de saisie et je peux vous dire que je n'ai pas décodé les lignes de VBA, Je ne suis pas encore à ce niveau, moi je bricole avec l'enregistreur de macro et j'essaye quelques trucs sans plus

Pour la formule

 =NO.SEMAINE($K2;21) je suis sous Excel 2019 donc je n'ai pas de problème

Pour la colonne en plus elle doit être entre A et I pour les calculs je suppose, je ne m'en souviens pas, il y a eu tellement d'évolutions entre le fichier de départ et maintenant
Excusez-moi si cela vous a créé des problèmes


Merci pour ce travail

f894009 · Answer

Bonjour,

Dans votre dernier fichier, il y a deux bases: Parrain et Filleul.
Ces deux bases devront elles exister dans le fichier que j'essaie tant bien que mal de construire avec toutes les formules magiques qu'il contient?

PHILOU10120 · Answer

Bonjour F894009 
 
--Si cela ne vous complique pas trop la vie oui si non je regarderai le problème

C'est en forgeant que l'on devient forgeron. -   C'est au pied du mur que l'on voit le maçon - on apprend toujours de ses erreurs

f894009 · Answer

Bonjour,

A quoi sert le code vu qu'apparemment vous ne voulez pas l'utiliser pour la recherche?
Vu qu'il est unique, ca serait beaucoup plus simple

La partie creation fiche parrain et filleul presque fini, petit detail a regler pour Parrain Nb. filleul
Quand vous voulez creer une fiche filleul, comment faites vous pour l'appairer a un parrain?
Un parrain a pulsieurs filleul Ok. Un filleul peut-il avoir plusieurs parrain?

Je vais plancher pour la recherche/modif et recherche pour remplissage des infos date RDV etc....

PHILOU10120 · Answer

Bonjour F894009

Oui, le code permet la recherche, une fois que l'on connaît sa construction, c'est le but, il est unique.
 
Exemple :

2022_14_C1_P_23_F143 = année, semaine, Commercial N°-, Parrain N°-, Filleul N°

C'est le code qui permet d'appairer le parrain au filleul le filleul F_143 est dépendant du parrain P_23
Non un Filleul ne peut pas avoir plusieurs parrains

Pour le nombre de filleul, ils sont enregistrés en même temps que le parrain, donc numéroté en suivant, F142, F143, F144, ...
Il faut compter les filleuls colonne H du fichier une quantité supérieur à 5 validées, il aura une prime pour le parrain, supérieur à dix une deuxième prime est attribuée

Merci pour votre travail, bonne journée

PHILOU10120 · Answer

Bonjour F894009

Je n'ai peut-être pas bien répondu pour l'appairage Parrain-Filleul
Quand je crée le parrain je renseigne toutes les cases sauf le nom, le prénom, et le numéro de téléphone du Filleul. Les infos de l'adresse correspondent aux données du parrain. Le code ne contient pas de filleul mais "000" 
Pour le filleul on garde les infos et on renseigne nom, prénom, adresse du filleul le code contient Fxxx
Voilà cela sera peut-être plus clair

Merci de votre aide

f894009 · Answer

Re,
Tout à fait Thierry,ma question est :
vous voulez créer une fiche filleul, comment choisissez vous le parrain vu que les fiches parrain sont déjà créée?

PHILOU10120 · Answer

Bonjour F894009

Les informations du dernier parrain créé sont encore dans la feuille de saisie, je les utilise pour créer le filleul

f894009 · Answer

Re,
Ok, donc le parrain en question n'a pas son mot à dire!
Curieux votre fonctionnement, si cette gestion base est pour vous....
Dans ce que j'ai code à la création du parrain les infos ne reste pas afficher.
Par contre, il serait possible de récupérer les infos du dernier parrain pour la création de filleuls
Vous ne créés jamais deux ou x parrains de suite!

PHILOU10120 · Answer

Bonjour F894009

Suite à votre remarque, il est souhaitable que je puisse récupérer les informations du parrain pour créer les filleuls ou pour modification donc, je pense qu'il faut faire une recherche avec son code se terminant par 000
Je pourrai créer les filleuls, puis cela servira pour modifier, ou compléter les informations, dates, RdV, Pose, validation
Merci pour votre aide et vos remarques, cela améliore l'idée de départ et fait progresser la base  de données

f894009 · Answer

Bonjour,
Les bases parrain et filleul auront au moins une utilité pour la recherche. Je regarde ce qui serait le plus opportun base données ou base individuelle pour modif infos personnelles avec mise à jour base de données ou inversement
Il me semble que dans le fichier de départ, avec les formules magiques, le fait de supprimer un filleul modifie les calculs pour le parrain et les filleuls associes à ce parrain, voir plus.
Je vais faire des vérifications pour tout changement afin de voir avec vous ce qu'il va en retourner

PHILOU10120 · Answer

Bonjour F894009

Si on repend le parrain (2022_15_C1_P_23_000) pour créer un filleul (2022_15_C1_P_23_F143) , il faudra que je puisse modifier le code qui se termine par 000 pour qu'il devienne F143 par exemple le 143 filleul de la base

f894009 · Answer

Re,
puisse modifier le code qui se termine par 000 pour qu'il devienne F143 
Non, rien a modifier, c'est prevu dans le code

PHILOU10120 · Answer

Bonjour F894009

Si c'est prévu pas de problème

f894009 · Answer

Re,
Je n'en suis pas encore la , comme je l'avais remarque dans le fichier avec les formules recalcul code P ou F mais dans la base sans formule va y avoir probleme si suppression de ligne: doublon de code P ou Code F suivant la ligne supprimee

PHILOU10120 · Answer

Bonjour F894009

Dans ce cas il faut garder le compteur de Parrain et de Filleul  en mémoire pour toujours incrémenter et ne pas revenir en arrière en cas de suppression

f894009 · Answer

Bonjour,

Ok.
Le meme parrain peut apparaitre x fois a different moment de l'annee?
Le meme filleul peut apparaitre x fois a different moment de l'annee?

PHILOU10120 · Answer

Bonjour F894009

Pour le parrain oui, il peut proposer des nouveaux filleuls 
Le Filleul non, mais il peut devenir parrain et proposer des filleuls

Merci pour tout ce travail, j'espère que je ne vous embête pas trop avec tous ces contraintes

f894009 · Answer

Re,

ne vous embête pas trop avec tous ces contraintes
Pas du tout, l'objectif est de vous faire kake chose que vous souhaiter
je "bosse" sur quatre Userform simultanement pour votre demande
Va demander un peu de temps car je ne suis pas a temps complet sur le sujet.

Ma question sur le code colonne A reste d'actualite, en dehors de l'annee et semaine qui sont utiles pour la recherche, a quoi sert-il?

PHILOU10120 · Answer

Bonjour F894009

Le code sert de clé et  à différencier chaque enregistrement, et pour la recherche d'une ligne particulière, pourquoi cela vous pose des problèmes

f894009 · Answer

Re,
non, ce n'est pas moi qui devra connaître par cœur les codes de chaque ligne pour pouvoir en trouver la ligne sauf si vous avez des dossiers papier ou informatique ou le code y figure.
Dans ce que je vous code, pas prévu pour le moment de recherche par code.

PHILOU10120 · Answer

Bonjour F894009

On a quand même l'année, la semaine et le commercial pour chercher un Parrain et il n'y a pas plus de 50 lignes à consulter par semaine pour un commercial, ou on met un filtre sur la base de données pour trouver le code à modifier
Vous en pensez quoi ?

f894009 · Answer

Bonjour,

trouver le code à modifier
Le code ne se modifie pas manuellement mais par le type de modif que vous y apporterez qui fera en sorte que ce code sera recalcule ou non pas la programmation. Pour moi, je suis desole d'insister mais votre code ne sert a rien puisque qu'a aucun moment il ne fera l'objet d'une recherche direct par son contenu, mais c'est vous qui voyez.

On a quand même l'année, la semaine et le commercial
Donc la recherche ne se fera pas avec le nom du parrain et pour le filleul de meme?

PHILOU10120 · Answer

Bonjour F894009

Bonjour

Je viens de rentrer, je vois 2 mails, le premier me disant que le code ne sert à rien et le deuxième qui me dit que vous avez eu une lumière.
J'étais prêt à supprimer le code, mais pourtant dans une base de données il faut un code une clé pour différencier chaque ligne donc j'y tiens quand même
Si cela est vraiment un problème, vous me dites à quoi vous pensez
Merci de suivre ce dossier de prêt.

f894009 · Answer

Re,
il faut un code une clé pour différencier chaque ligne 
A condition que ce code fasse l'objet d'une recherche sur lui meme ce qui n'est pas le cas puisque je vais passer par quatre criteres  afin d'analyser les codes colonne A pour arriver a un resultat incomplet vu qu'il faudra selectionner un parrain ou un filleul en final

Definition du code: annee-semaine- code commercial-p-000 pour parrain et F-xx en plus pour filleul

Donc en faisant une recherche avec un commercial (en plus des autres criteres) le code est le plus rapide car une seule colonne a tester et mise en memoire dans une combox pour affiner la recherche Parrain ou Filleul. Combobox aussi pour parrain car je ne sais pas s'il est possible de creer x parrains dans la meme semaine.
Combobox: Nom_Prenom Parrains ou Nom_Prenom Filleuls et numeros de ligne des enregistrements pour une collecte directe des informations de la ligne recherchee des la selection de l'individu

Est-ce que vous connaissez le control activex Listview?

Ce fichier est prevu a tourner sur votre PC ou un autre?

PHILOU10120 · Answer

Bonjour F894009

Est-ce que vous connaissez le control activex Listview? Non

Sur un PC portable ou le mien PC de bureau, pourquoi cette question, Il faut stocker quelques choses en plus du fichier Excel contenant la base de données.

Faites comme vous voulez pour le code, si vous pensez que cela sera plus simple avec une combox, je ne sais pas, c'est vous le Pro. sur ce sujet; Je ne veux pas vous compliquer la tâche

f894009 · Answer

Re,
Importance du pc, oui, demain je vous mettrai un fichier avec une listview pour savoir si ça marche chez vous.
Pour le genre de base de "données" que vous avez, habituellement je programme un peu différemment de façon à ce que personne en dehors du gestionnaire ne puisse accéder à la base et faire des modif en manuel ALD d'utiliser le formulaire .
Si listview ok, je vous ferai la chose. Ce qui est fait actuellement servira sans problème.
Je pourrai faire avec une listbox mais c'est moins performant

PHILOU10120 · Answer

Bonjour F894009

Je viens de tester, à première vu cela fonctionne, il y a un décalage de 1 je demande 25 il affiche 24 et 25.
Certainement des réglages à effectuer
Merci beaucoup

Bonne journée

PHILOU10120 · Answer

Bonjour F894009

J'ai collé ma base dessus il trouve bien les lignes donc c'est Ok

f894009 · Answer

Bonjour,

Ca avance avec une listview.
Quand vous parlez de modification d'une ligne P ou F quelles sont les colonnes qui ne seraient pas modifiables et qu'est ce que entendez par modification
Je parle bien de modification pas d'une mise a jour de la partie DRDV etc..

PHILOU10120 · Answer

Bonjour F894009

En principe une fois enregistré un client ou un parrain, le commercial, le nom, le prénom, le numéro et le nom de la rue, le CP la ville et le couple parrain filleul la colonne B

f894009 · Answer

Re,

Donc, il s'agit de faire simplement une mise a jour des infos en dehors des infos personnelles parrain/filleul. Cette mise a jour peut etre la modification d'une infos RDV etc... a la suite de changement de contexte, erreur de sasie etc..
La date colonne 11(K) est la date du jour ou une saisie de date car dans vos formules c'est =MAINTENANT

Des parrains ont des infos RDV etc..... Normal ou pas

PHILOU10120 · Answer

Bonjour F894009

Oui, la saisie faite on mettra à jour les infos RdV dates
Pour la date saisie les colonnes C, D, E elle peut être défini avec la fonction Maintenant() et copier/coller/valeur pour rester figée dans la base

Les colonnes de A à U informations saisies à la création ne devraient pas être modifiables, Mais peut-être prévoir la possibilité de correction d'erreur ?

f894009 · Answer

Re,
Pour la date saisie les colonnes 
Tout a fait, mais cette date doit etre saisie ex: aujourd'hui nous sommes 18/04/2022 puis je saisir 15/04/2022 ou c'est la date du jour qui fait foi

Mais peut-être prévoir la possibilité de correction d'erreur ?
Il faudrait voir a ce moment de donner une cle unique pour un parrain ou un filleul avec une base Parrain et Filleul qui contient la cle de facon a pouvoir modifier les infos de ces personnes sans a avoir a tripatouiller les enregistrements de la base de donnee a la vue d'une erreur  a posteriori. Cles independantes de votre code colonne A (a voir). La base Filleul aura la cle Parrain au moment de l'appairage
Dans la base de donnees, seulement une colonne avec la cle parrain et la cle filleul. les infos completes apparaitrons dans la listview en allant chercher ce qu'il faut dans les base parrain/filleul en fonction de ces cles comme si vous aviez une base ACCESS

Il faudra une Userform pour creer la base parrain et la base filleul au moment de l'appairage Parrain/filleul pour creation fiche base de donnee et une Userform pour mise a jour des Autres infos

Qu'en pensez vous?

PHILOU10120 · Answer

Bonjour F894009

Pour moi c'est la date de saisie qui fait foi donc 18/04/2022
Oui pour les 2 bases parrain filleul on pourra corriger les erreurs de saisie sans possibilité de modifier les autres informations
Je pense qu'il faut que l'on retrouve la clé parrain filleul, il faut savoir qu'un parrain qui a 5 filleuls qui signent et valide l'achat, touche une prime et pour 10 une prime
Merci pour tout ce travail.

f894009 · Answer

Bonjour,

La partie saise des infos date RVD etc  avec recherche commercial, annee, semaine, Parrain/Filleul est presque finie.
Le pave Date RVD etc.. pourrait se definir avec quel designation?

Je vais reprendre l'Userform Creation Fiche P/F pour inclure la modification en cas d'erreur ou omission d'infos

PHILOU10120 · Answer

Bonjour F894009

Ok, merci j'attends de voir le résultat avec impatience
Bonne journée

f894009 · Answer

Bonjour,

Le pave Date RVD etc.. 
Quel nom donner a ce pave?

PHILOU10120 · Answer

Bonjour F894009

RDV_R_Tel_Val

Pour Rendez-vous Relance Téléphonique Validation

J'espère que cela n'est trop long

J'avais répondu de mon téléphone et cela n'a pas fonctionné et je préfère car je voyais mon adresse mail s'afficher dans la réponse, plutôt gênant

PHILOU10120 · Answer

Bonjour F894009

Il y a un problème avec les macros voire copie d'écran, je suis en 64 bits


 https://www.cjoint.com/c/LDzsHGxcIt4

Le Pingou · Answer

Bonjour PHILOU10120,
Juste au passage, en 64 bits  il faut ajouté le terme [PtrSafe]

' 64-bit Declare statement example: Declare PtrSafe Function GetActiveWindow Lib "User32" () As LongPtr

f894009 · Answer

Re,
Mettre Ptrsafe entre Declare  et Function pour toutes les api
Je modifierai le code pour que ça tourne en 32/64 bits

PHILOU10120 · Answer

Bonjour F894009

J'ai modifié au fur et à mesure du déroulement des macros et je bloque voir image 

https://www.cjoint.com/c/LDztrmEltE4

Merci Le Pingou pour votre aide

Je regarderai demain

Bonne soirée

PHILOU10120 · Answer

Bonjour F894009

J'ai un autre souci, une incompatibilité de type voire image

 https://www.cjoint.com/c/LDAi4ju1cW4

PHILOU10120 · Answer

Bonjour F894009

Windows 11 pro 22H2  22598.200

Les lignes de déclaration ou j'ai peut-être fait une bêtise 

Private Declare PtrSafe Function GetDC Lib "user32" _
(ByVal hwnd As Long) As LongPtr
Private Declare PtrSafe Function GetDeviceCaps Lib "gdi32" _
(ByVal hDC As Long, ByVal nIndex As Long) As LongPtr
Private Declare PtrSafe Function ReleaseDC Lib "user32" _
(ByVal hwnd As Long, ByVal hDC As Long) As LongPtr

PHILOU10120 · Answer

Bonjour F894009

Office Pro 2019

PHILOU10120 · Answer

Bonjour F894009

J'ai bien du mal, il y a souvent des blocages et parfois je ne sais même pas comment m'en sortir
Ctrl-Alt-Suppr pour fermer l'application Excel est la solution finale 

Je commence à découvrir tout le travail que vous avez fait et c'est énorme, je suis très loin mais très, trés loin de tout comprendre

Je vous laisse débugger car je ne sais pas trop le faire

Merci pour cet énorme travail

PHILOU10120 · Answer

Bonjour F894009

Oui j'ai eu les User Forme Feuille Accueil je peux aller sur Parrain, Filleul, RDV Ferner, Quitter tant que je n'écris rien cela se passe bien si j'écris une fiche il y a un blocage avec le numéro de téléphone argument non facultatif

Private Sub TextB_PhoneP_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If Len(TextB_PhoneP) < 10 And TextB_PhoneP <> "" Then
        Cancel = True
        Me.TextB_PhoneP.ForeColor = vbRed
        MsgBox "date format:00 00 00 00 00  !!!!!"
        Call Raz_Telephone("TextB_PhoneP")
    Else
        Me.TextB_PhoneP.ForeColor = vbBlack
    End If
End Sub

PHILOU10120 · Answer

Bonjour F894009

J'ai eu du mal vu que cela plante je n'ai pas d'accès aux captures d'écran, donc j'ai fait un imprime écran et je suis sortie d'Excel avec Ctrl-Alt-Suppr. J'ai ouvert Word et Copie/Coller cela a marché donc voilà l'information demandée.

https://www.cjoint.com/c/LDBkCjRgnq4

f894009 · Answer

Re,

Erreur sur sortie saisie?
Mettez un point d'arret sur toutes les lignes un call pour telephone Parrain pour voir ou il y a probleme

PHILOU10120 · Answer

Bonjour F894009

Il manque quelque chose mais je ne sais pas quoi

https://www.cjoint.com/c/LDCjN6pzb04

f894009 · Answer

Bonjour,

A priori rien d'anormal. J'ai recupere le fichier que vous utilisez et aucun probleme sur la partie num telephone
Mettez la ligne en commentaire pour pouvoir valider un Parrain et creez un filleul pour voir si l'erreur apparait vu que c'est la meme procedure qui est appelee
 
cette procedure est dans le Module Raz1: Sub Raz_Telephone(TBox), il ne doit y avoir qu'un seul argument qui est le nom de la TextBobox

Mettez le fichier a dispo que je puisse voir s'il y a des differences

PHILOU10120 · Answer

Bonjour F894009

En mettant la ligne en commentaire je remplis la fiche jusqu'au bout mais rien ne se passe quand je valide, ni si je ferme, ou nettoie

Le fichier dfemandé

https://www.cjoint.com/c/LDCkpHzTwS4

f894009 · Answer

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

PHILOU10120 · Answer

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

f894009 · Answer

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.

PHILOU10120 · Answer

Bonjour F894009

Pas de souci, je vais patienter

f894009 · Answer

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

PHILOU10120 · Answer

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.

f894009 · Answer

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

PHILOU10120 · Answer

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

f894009 · Answer

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

PHILOU10120 · Answer

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

f894009 · Answer

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!

PHILOU10120 · Answer

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

f894009 · Answer

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

PHILOU10120 · Answer

Bonjour F894009

Ok Merci

PHILOU10120 · Answer

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 ?

f894009 · Answer

Bonjour,

Ou bien je me trompe à voir ?
Non, c'est un copier/froisser. Recitifiez. Vous savez a quoi cela m'a servi?

PHILOU10120 · Answer

Bonjour F894009

Je pense que c'était pour les labels des Texbox dans UserForm ?

PHILOU10120 · Answer

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é.

f894009 · Answer

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.

PHILOU10120 · Answer

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

f894009 · Answer

Re,

Au plus simple
Modification donnees perso parrain/filleul
J'ai deja commence en partant de l'UF creation fiche ou je vais integrer la partie recherche de l'l'UF_Gestion_RDV_R_Tel_Val 

Suppression ligne base donnee : sur l'UF_Gestion_RDV_R_Tel_Val ou il y a un bouton supprimer.

Je vous demande de reflechir au fait de supprimer un enregistrement et surtout aux consequences.
Si c'est un filleul, il faut recalculer le nombre de filleul pour le parrain: a priori assez simple
Si c'est un parrain, a qui seront rattaches les filleuls devenus orphelins
Et enfin, pourquoi supprimer un enregistrement?

f894009 · Answer

Bonjour,

un parrain qui a des filleuls Ok
un parrain seul qui est mal enregistré deux possibilites, soit suppression ligne ou passer par modification avec l'UF que je prepare a cet effet pour parrain et filleul. je pense de plus en plus que votre base de donnees ne facilite pas les modifications commercial, donnees parrain avec filleuls ou filleul. Les bases Parrain et filleul font doublon avec ce qui enregistre dans la base de donnees. Pour moi toutes les colonnes de donnees relatives aux infos commercial, infos perso Parrain, filleul ne devraient pas etre. Ces infos ne devraient servir qu'a de l'affichage ex:
Dans listview Gestion RDV etc, ces colonnes n'y seraient pas mais sur clic d'un enregistrement seules les infos utiles apparaitraient dans les cases vertes ou/et jaunes: nom prenom parrain et nom prenom filleul.  A voir, car j'ai prevu un bouton consultations Bases de donnees (parrain, filleul et peut-etre base de donnees principale) sans modification possible.
Maintenant c'est a vous de voir ce qui vous convient

Dans votre base de donnees, il y a des parrains ou le pave RDV etc... est rempli, normal ou pas?

PHILOU10120 · Answer

Bonjour F894009

Pour les parrains, ils sont clients donc c'est normal qu'il y ait des informations commerciales
Pour Parrain et filleul si vous pensez qu'il est préférable d'avoir des enregistrements individuels, si on est capable de reconnecter le parrain et ses filleuls cela ne me pose pas de problème de faire de cette manière le principal est de simplifier la gestion de la base de données.

f894009 · Answer

Bonjour,

simplifier la gestion de la base de données.
C'est ce que j'essaie de faire.
Parrain=client
Filleul=??
Rapport entre Parrain et Filleul et surtout Commercial?
Qui cree les fiches Parrain et Filleul?
Qui remplit le Pave RDV etc....
Ca m'aiderait fortement pour construire la base et le code

Pour moi, la base de donnees se compose d'une table que vous appelez Base_Donnees, des tables Base Parrain, table base Filleul et  Grand_Est

PHILOU10120 · Answer

Bonjour F894009

Je n'avais pas vu votre réponse

Parrain = client
Filleul = client
Le parrain touche une prime pour 5 et 10 Filleuls validés
Le commercial pose des RDV auprès des filleuls le parrain étant déjà validé
Les créations du parrain et des Filleuls sont réalisées par le commercial
Les RDV sont aussi gérés par le commercial
Le code est créé lors de l'enregistrement d'un parrain ou d'un filleul il doit être unique et permettre de faire l'association Parrain et Filleul
Ok pour la base de données et les tables base Parrain et Filleul et la table Grand Est

J'espère que cela sera plus simple pour Vous

Merci pour votre aide

f894009 · Answer

Bonjour,
Merci, ca me permet de mieux cerner la "fabrication" de la chose

f894009 · Answer

Bonjour,

Je reviens sur la creation fiche Filleul. Vous avez ecrit que la creation Filleul se fait dans la foulee de la creation du parrain.
Cette foulee est seulement sur un jour ou plusieurs?

PHILOU10120 · Answer

Bonjour F894009

Oui en principe on enregistre tout en même temps, Mais il peut y avoir des problèmes donc prévoir plusieurs saisies au cas où.

Merci pour votre aide

f894009 · Answer

Re,

Si besoin de saisir un autre parrain alors que la saisie des filleuls du precedent n'est pas finie, vous la jouee comment?

PHILOU10120 · Answer

Bonjour F894009

Si on enregistre les parrains et les filleuls indépendamment les uns des autres dans leurs bases respectives, et que l'on sait raccoupler les filleuls avec le parrain cela ne pose pas de problème d'où le code P-31_000
Je ne sais pas ce que vous en pensez ? 

Merci pour ce suivi

f894009 · Answer

Bonjour,

l'on sait raccoupler les filleuls avec le parrain
Ah Bon! Ben, pour le moment pas possible, puisqu'il faut le code complet Parrain 2022_05_19_C4-P-41-000
pour construire le code Filleul 2022_05_19_C4-P-41-F-199.
J'ai ajoute le mois pour faire des analyses
Comment vous retrouvez le parrain a rattacher aux filleuls, de memoire?

les parrains et les filleuls indépendamment
Pour moi c'est comme ceci que les enregistrements devraient se faire.
Depuis le debut je vous demande quel indicateur nous permettrait de rattacher P/F. 
Perso, une liste de parrains a choisir pour des filleuls, mais faudra prendre le bon.

PHILOU10120 · Answer

Bonjour F894009

Le filleul 2022_05_19_C4-P-41-F-199 à pour parrain P-41-000 
Le 19 c'est bien le numéro de semaine on ne change pas

f894009 · Answer

Re,
Je vais pose la question differemment.
Qui decide qu'il y a un parrain?
Qui decide qu'il y a des filleuls?
Qui decide de refiler des filleuls a un parrain?
Qui decide de refiler un parrain a des filleuls?
Simple Non!
La construction du code Filleul en depend

PHILOU10120 · Answer

Bonjour F894009

C'est super simple !
Le Parrain, c'est un client qui donne au commercial les coordonnées de personnes pouvant être intéressées par le produit. Le commercial enregistrera les informations dans la base en tant que filleul du parrain. Le commercial par phoning prendra contact avec cette personne, si le contact accepte le RDV  et lors de la visite du commercial il valide une commande puis valide la pose égale filleul validé.

f894009 · Answer

Re,

La seule personne en dehors du parrain qui sait a qui sont les filleuls est le commercial. Donc ce commercial est capable de rechercher le parrain pour l'enregistrement des filleuls et cela meme si l'enregistrement des filleuls n'est pas fait en continu

PHILOU10120 · Answer

Bonjour

Avec le nom du parrain et la date, il doit bien arriver à retrouver les informations pour créer un nouveau filleul avec le code du parrain intégré dans le code du filleul 
  2022_05_21_C4-P-41-F-199.

f894009 · Answer

Re,
 il doit bien arriver à retrouver les informations
Oui, sinon ca craint. C'est ce que pense depuis le debut,donc je fais en sorte qu'il y ait une recherche de parrain pour saisie filleul car le dernier parrain saisie n'est peut-etre pas celui des filleuls qui suivent
Autre question, les commerciaux ne saisissent que ce qui les concerne je suppose.

Suite:

Pour la saisie filleul, recherche du parrain et pour le filleul suivant je peux ouvrir une boite a dialogue pour confirmer si le parrain affiche est le meme si non recherche

PHILOU10120 · Answer

Bonjour F894009

Oui c'est bien cela le commercial ne gère que ses clients parrains et filleuls 

Ok pour la boîte de dialogue pour la saisie des filleuls pour le parrain en cours ou non

f894009 · Answer

Bonjour,

UF_Creation_Fiche et UF_Gestion:  https://www.cjoint.com/c/LErpwTVAAmg

A vous de tester. 
UF_Creation_Fiche parrain/Filleul:
 creation, modification et suppression fiche (P seulement si seul).
Ne pas creer de fiche F si pas de parrain, je dois ajouter un test pour eviter plantage

UF_Gestion:
Saisies infos et modification sur selection d'un enregistrement Listview et evidement click sur le bouton Mise a jour

Apres quelques manip, vous trouverez comment le tout fonctionne

Qu'avez vous envisage en terme d'analyse?

Une Uf_Consultation_BD serait elle utile, sans modif possible?

PHILOU10120 · Answer

Bonjour F894009

Je vous remercie pour ce travail, je regarde et vous tiens au courant. Déjà il faut que je remette en 64 bits car il n'affiche un message d'erreur, je fais le nécessaire et j'étudie la chose pour voir où il y des problèmes bloquant

f894009 · Answer

Bonjour,

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

f894009 · Answer

Re,

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

PHILOU10120 · Answer

Bonjour F894009

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

f894009 · Answer

Bonjour,

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

PHILOU10120 · Answer

Bonjour F894009

Pour 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

f894009 · Answer

Re,

pour ne pas vous créer des problèmes.
Ya pas d'lezards

PHILOU10120 · Answer

Bonjour F894009

Oui pour la date s'il n'y a qu'à valider avec calendrier comme pour le RDV
Merci pour ces propositions

PHILOU10120 · Answer

Bonjour F894009

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

f894009 · Answer

Bonjour,

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

PHILOU10120 · Answer

Bonjour F894009

Voici ce que j'avais eu comme problème l'autre jour, il est toujours d'actualité

https://www.cjoint.com/c/LExrKlLmyb4

PHILOU10120 · Answer

Bonjour F894009

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

f894009 · Answer

Bonjour,

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

PHILOU10120 · Answer

Bonjour F894009

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

PHILOU10120 · Answer

Bonjour F894009

Je vous envoie un comparatif de macro

https://www.cjoint.com/c/LEylQztAuG4

f894009 · Answer

Re,

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.

PHILOU10120 · Answer

Bonjour F894009

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

PHILOU10120 · Answer

Bonjour F894009

Le fichier sur lequel je suis bloqué ou je tourne en rond sans pouvoir passer l'accueil

https://www.cjoint.com/c/LEAjfhEYbJ4

f894009 · Answer

Re,

Fichier codes 64Bits modifie:  https://www.cjoint.com/c/LEAjwHrIcIg

PHILOU10120 · Answer

Bonjour F894009

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

f894009 · Answer

Re,

J'ai oublie une modification dans le module Screen. Sorry Sir
 https://www.cjoint.com/c/LEApKpqPvtg

PHILOU10120 · Answer

Bonjour F894009

Rien de changer c'est toujours pareil, bandeau accueil croix fermer 

https://www.cjoint.com/c/LEAsTn75Qr4

f894009 · Answer

Re,

Ok, c'est un probleme de declaration 64bits puisqu'en 32bits pas de probleme

Je vous avais demande un des dernier fichiers que vous avez modifie au niveau des API et qui tourne.
Pouvez le mettre a dispo?

PHILOU10120 · Answer

Bonjour F894009

Voici un fichier ou la macro UserForm accueil fonctionnait

https://www.cjoint.com/c/LEBgtzWJZN4

f894009 · Answer

Re,

Ok, ce qui est surprenant le as Long en retour devrait etre en LongPtr. Ben si l'UF occupe tout l'ecran comme prevu avec ce type de declaration, allons y.

fichier modifie: https://www.cjoint.com/c/LEBjub5cg3g

PHILOU10120 · Answer

Bonjour F894009

Merci pour ce fichier, j'ai passé du temps à faire des tests et pour le moment à part les modifications sur les filleuls qui ne sont pas terminées, je suppose ? 
Je n'ai pas pu valider un nouveau filleul sur un parrain, le code n'est pas présent sur dans l'UserForm 
Je continuerais demain
Bonne soirée

f894009 · Answer

Bonjour,

 le code n'est pas présent sur dans l'UserForm
Si, mais je viens de verifier, y a quelques recitifications et ajout de code a faire pour la partie modif ceci en fonction du contexte de depart
et une modif pour creation x filleuls pour un parrain

Ce qui est curieux, j'utilise le fichier API 64bits et ca tourne sans probleme en 32bits sans modif!!


Suite:
Fichier:  https://www.cjoint.com/c/LEChO4qNCxg
Je vais ecrire un mode operatoir pour l'utilisation car cote creation/modif P/F y a pas mal de manips possible

Si vous voulez creer des filleul pour un parrain existant, il faut le recreer pour avoir le code correspondant a la date de creation.
Avec quelques modif, Il est possible de selectionner un parrain existant et creer un ou des filleuls avec la creation du parrain avec le code de la date de creation. A vous de voir, si le parrain est de l'annee precedente, le commercial devra faire une recherche avant de cliquer sur le dit parrain

PHILOU10120 · Answer

Bonjour F894009

Merci pour ce nouveau fichier, je commence à comprendre le mode opératoire.

Pour créer un Filleul sur un Parrain existant il faut sélectionner le parrain cliquer dans le code et sélectionner Filleul et le créer et valider cela fonctionne

PHILOU10120 · Answer

Bonjour F894009

C'est ok pour création et modification

Maintenant je viens d'essayer la partie RDV R Tel Val il y a un blocage et jr ne comprend pas le problème

2 Impressions d'écran

https://www.cjoint.com/c/LEClAFvLQs4

f894009 · Answer

Re,
Mise a jour de code a la suite de suppression a l'insu de mon plein gres
fichier modifie:  https://www.cjoint.com/c/LECoYS7aHrg

PHILOU10120 · Answer

Bonjour F894009

Merci, je vais regarder cela dès que possible !

PHILOU10120 · Answer

Bonjour F894009

C'est une base pour gérer les surfaces vendues par les commerciaux, cela peut être du carrelage, du plancher, du revêtement bitume pour parking, de l'isolation ...

f894009 · Answer

Re,

Ok. Vous faites partie des utilisateurs ou vous vous refilez le baigneur une fois au point

PHILOU10120 · Answer

Bonjour F894009

Non c'est une idée pour ma fille, et j'aime bien trouver des idées de fichier utile, cela peut servir à n'importe qui.

Une question, les modifications dans RDV R Tel Val,  je n'ai pas accès à toutes les cases pour modification
La fonction supprimer Fiche Filleul ne s'exécute pas blocage

https://www.cjoint.com/c/LEDkzc8uZS4

PHILOU10120 · Answer

Bonjour F894009

Pour les modifications dans RDV R Tel Val je viens de refaire un test on n'a pas accès :

Résultat Phonings pas accès oui ou non
 RDV client pas accès
 Vente pas accès
 Date de pose pas accès
 M² et pose effectuée c'est Ok

Pour les créations parrain et ces filleuls c'est Ok
J'ai fait une macro pour la sauvegarde, il faudrait prévoir de sauvegarder quand on quitte peut-être ?

Merci pour tout ce travail qui est super en présentation et en utilisation, cela avance bien

-- 
C'est en forgeant que l'on devient forgeron. -   C'est au pied du mur que l'on voit le maçon - on apprend toujours de ses erreurs

f894009 · Answer

Re,

prévoir de sauvegarder quand on quitte
Sauvegarde sur fermeture, creation/modification/suppression fiche et mise ajour fiche

Fichier modifie:  https://www.cjoint.com/c/LEEoi17zbwg

PHILOU10120 · Answer

Bonjour F894009

Tests effectués, il y a toujours un problème dans : 
la partie modification RDV R Tel Val 

Résultat Phonings pas accès oui ou non (accès si déjà rempli)

Vente pas accès
Certaine case on ne peut pas mettre oui ou non mais seulement la date

Sauvegarde sur fermeture, (et, ou) en quittant

Pour la sauvegarde c'est l'application Excel, le classeur qu'il faut sauvegarder avant de fermer celui-ci
Je n'ai pas supprimé tous les noms en #réf# dans le gestionnaire de nom puisse que le fichier que vous m'envoyez les a en mémoire

Il va avoir un peu de nettoyage à faire dans les macros et les feuilles mais c'est bon ça va le faire.
Quand la base commerciale sera opérationnelle, si cela ne te gêne pas on pourra le laisser à disposition
Encore une fois un grand merci pour toute cette aide

--C'est en forgeant que l'on devient forgeron. -   C'est au pied du mur que l'on voit le maçon - on apprend toujours de ses erreurs

f894009 · Answer

Bonjour,

Vente pas accès
Certaine case on ne peut pas mettre oui ou non mais seulement la date

Resultat Phonning, Vente non/oui sur click du label en dessous du titre, c'est une bascule (je vous l'ai deja ecrit)
Seulement une date, c'est ce qui a ete convenu, de plus une date est plus appropriee que oui/Non.
Oui/Non: ne vous dit pas quand 

Sauvegarde sur fermeture, (et, ou) en quittant
C'est fait

Il va avoir un peu de nettoyage à faire dans les macros et les feuilles 
Les feuilles: oui
Le code: pas vraiment, je le fais au fur et a mesure

le laisser à disposition
Pouvez preciser?

PHILOU10120 · Answer

Bonjour F894009

La sauvegarde est opérationnelle sur le fichier que vous m'avez envoyé hier où et comment je n'ai rien constaté ?
Pour moi je sauvegarde du classeur s'effectue sur 2 disques durs différents.
Dossier identique avec le même chemin sauf le DD E:/ xxxxx et DD D:/xxxxx

Je regarde cette histoire de bascule pour phonings

Peut-on faire une procédure sur une feuille "Lisez-moi" avec un pavé texte dans laquelle la démarche serait décrite

Mettre à disposition (Si vous vous êtes d'accord, vous avez fait une très grosse partie du travail)
Comme une base de gestion commerciale avec un lien sur CJOINT.COM c'est vous qui voyez.

PHILOU10120 · Answer

Bonjour F894009

Je suis toujours sur les résultats Phonings et Vente non/oui click du label rien ne se passe

https://www.cjoint.com/c/LEFnbtWeY54

f894009 · Answer

Re,
Ok, j'ai trouve: https://www.cjoint.com/c/LEFoyIW6WAg

Une solution qui m'est venu: si une date phonning Rhp="N" de facon a pouvoir mettre oui ou non suivant et idem pour Vente
Ai pas trouve mieux pour le moment

PHILOU10120 · Answer

Bonjour F894009

Ok ça marche, j'ai testé c'est bon
Je continue les tests
Je vous tiens au courant
Merci

blackmefias_3350 · Answer

Bonjour, 

Qu'est-ce que vous appelez " UserForm " ?  

L' UserForm  est comme une fenêtre de formulaire vierge en mode création dans lequel on insert grâce à la boite d'outils des contrôles comme des boutons, des images, des liste déroulantes, des zone de saisie et donc l'interaction se fait via du code VBA, 

UserForm ressemble à ceci :

PHILOU10120 · Answer

Bonjour

Oui c'est cela mais en plus complexe
J'ai bien avancé avec l'aide de F894009 qui m'a fait une superbe mise en page

PHILOU10120 · Answer

Bonjour F894009

Lors des tests je m'aperçois qu'il faudrait faire la même démarche que pour Phonings et vente dans la case "Pose effectuée", qu'il y ait obligatoirement "non" ou "la date" cela permettra de comptabiliser les dossiers non traités et la somme des M² encore à exécuter
Une autre chose les M² sont en texte dans la base de données, je préférerai les avoir en nombre si possible

Merci

f894009 · Answer

Bonjour,

Ok, je regarde la chose

Suite:
 obligatoirement "non" ou "la date"
Apparemment vu que vous voulez tester un texte ou une date, une cellule vide ce teste sans probleme
Ou cellule avec date ou pas

PHILOU10120 · Answer

Bonjour F894009

Oui je suis d'accords, mais cela peut-être un oubli donc si on mais Non on devra obligatoire valider avec la date
Donc tout ce qui est NON reste à faire 

Le fichier au dernier Jus

https://www.cjoint.com/c/LFcqq2nTO74

f894009 · Answer

Re,

Ok, c'est entre autre pour vos TCD. Je fais

f894009 · Answer

Bonjour,

fichier modifie, non de D a L sauf K(posem²): https://www.cjoint.com/c/LFdizdpVDBg

PHILOU10120 · Answer

Bonjour F894009

Je j'ai testé c'est ok
Je continue les essais, cela se présente très bien

PHILOU10120 · Answer

Bonjour F894009

Voilà j'ai bien avancé :

Sur la feuille Base_données  j'ai ajouté colonne O à Q pour essai, il me faut ces informations pour les statistiques. je dois aussi compter les filleuls pour un parrain pour attribution de prime le cas échéant.
J'ai eu un problème avec des données qui sont en texte au lieu de nombre (date et M²) voire si on peut faire quelque chose
Dans la Base_données une colonne avec le mois aurait été plus facile à manipuler que les dates

Je vous joins le fichier et vous me dites ce que vous en pensez

Merci pour ce gros travail sans vous j'aurai beaucoup galéré

https://www.cjoint.com/c/LFfrDcWUVV4

f894009 · Answer

Bonjour,

une colonne avec le mois aurait été plus facile
Si je comprends bien, vous voulez remettre les colonnes que vous aviez, au depart

date et M²
Chez mois ce sont les bons format. Quel est le séparateur de décimal chez vous: un point ou une virgule ?

Suite:

Pour le mois, avec vos formules magiques (idem O/Q) facile a faire.

PHILOU10120 · Answer

Bonjour F894009

Pour les colonnes :
"Mois" et "Semaine" pour les statistiques

"P" et "F" pour le calcul des primes  

Pour le séparateur décimal "," c'est la virgule

Merci bonne journée

f894009 · Answer

Re,

"Mois" et "Semaine" pour les statistiques
Faites des formules comme vous avez fait pour P/F ou est ce que vous tenez absolument avoir vos anciennes colonnes en R/S et les colonnes O/Q ecrites sans formule

PHILOU10120 · Answer

Bonjour F894009

Si et seulement si cela n'engage pas trop de modifications j'aurai préféré que ces informations soient présente dans la base de données sans avoir à intervenir dans celle-ci

Merci pour votre aide

f894009 · Answer

Re,

Ok, il y a seulement l'ecriture des cellules Base de donnees a la creation fiche et pas  de lecture pour la listview dans aucune Userform

PHILOU10120 · Answer

Bonjour F894009

Non juste les infos dans la base pour ne pas avoir à intervenir

PHILOU10120 · Answer

Bonjour F894009

Merci pour cette mise à jour rapide

Oui j'avais vu ce problème de -- dans le numéro Filleul, on aurait pu formater F-001, ou F-041 avoir 3 ou 4 caractères en permanence quoique on aura peut-être plus donc je ne sais pas

f894009 · Answer

Re,
Par défaut je peux mettre sur 5 caractères : F00001. Ça fait 99999 , y a de la marge

PHILOU10120 · Answer

Re: oui c'est une bonne solution

PHILOU10120 · Answer

Bonjour F894009

Ce matin lors de test l'application bloc sur UserForm RDV R Tel V, le faites de mettre à jour les informations il y a un blocage si on laisse la case M² vide.
On peut prévoir le RDV mais on ne sait pas encore la surface celle-ci est mesurée lors du RDV chez le client donc il y a un souci

PHILOU10120 · Answer

Bonjour F894009

Je crois que l'on arrive au bout de ce long travail, je viens de refaire des tests et tout fonctionne
Il reste juste à regarder sur la feuille base de données, des informations ne se placent pas bien, c'est de ma faute une modification que je n'ai pas due vous transmettre, pouvez-vous regarder ?
Je vous ai mis un pavé texte avec les explications

Le fichier en lien

https://www.cjoint.com/c/LFikZGqZ384

Si vous avez des commentaires ou des idées faites les moi parvenir.

Encore une fois un grand merci pour tout le temps que vous m'avez consacré tout au long de ces 200 post

f894009 · Answer

Bonjour,
un pavé texte avec les explications
Suppression M/N ok
S/T ok. 
Comprends pas pour colonne R 
Liste P (O) doit contenir quelle info
Liste F(P) idem

En colonne Q devra y avoir quoi puiqu'elle est vide pour le moment

PHILOU10120 · Answer

Bonjour F894009

Comprends pas pour colonne R = Numéro semaine( une fois les colonnes M & N supprimées)

Liste P (colonne O) doit contenir le code Parrain

Liste F (colonne P) doit contenir le code Filleul

Colonne N le code P/F peut-être supprimée les données venant de L'UserForm je pense à voir ?

Le fichier comme il devrait être après modification

https://www.cjoint.com/c/LFipQrDu7Y4

Merci

f894009 · Answer

Bonjour,

Fichier modifie: nouvelles colonnes
 https://www.cjoint.com/c/LFjgVD2L2Rg

Code parrain dans colonne liste F!

PHILOU10120 · Answer

Bonjour F894009

Le test de la base de données n'est pas conforme voir fichier

https://www.cjoint.com/c/LFjjAVlwf34 


Une erreur dans les infos récupérées

Merci pour cette modification

f894009 · Answer

Re,

Erreur de ma part quand j'ai commencé a faire la modif, pas au bon endroit et oubli d'enlever

https://www.cjoint.com/c/LFjnPt2Dq0g

PHILOU10120 · Answer

Bonjour F894009

Tout est ok, juste une information pourquoi ce message ?

Voir fichier

https://www.cjoint.com/c/LFjq5vOaEj4

Je n'ai pas trouvé de lien ou autres liaisons, donc je ne sais pas d'où cela ne vient ni pourquoi ?
Avez-vous un lien avec le fichier sur votre PC ?

Merci pour votre travail

f894009 · Answer

Re,
Avez-vous un lien avec le fichier sur votre PC ?
Pas de lien. J'ai eu ce message avec vos fichiers de temps en temps

Suite:
C'est chez vous:

PHILOU10120 · Answer

Bonjour F894009

Je viens d'avoir ce message lorsque j'ai voulu le sauvegarder en tant que modèle, donc je me suis posé la question

J'ai beaucoup apprécié votre travail et les Posts rapides et précis, nos échanges ont été fructueux et vous avez bien compris le problème, nous voici arrivée au bout et je tiens à vous remercier une fois de plus pour tout cet Investissement de temps.
Je suis très content d'être en au terminus
Mon idée de départ n'était pas aussi élaborée mais avec des gens compétant on avance bien et on progresse 

MERCI

PHILOU10120 · Answer

Bonjour F894009

Il y a encore une chose que l'on peut faire et que j'ai oublié, si vous êtes toujours partant ?
Il faut mettre en place une protection avec mot de passe pour chaque commercial.
Quand il ouvre le fichier il doit sélectionner son nom et taper son mot de passe
La base de données doit être filtrer pour ne laisser apparaître que ses clients parrains et filleuls
Il doit pouvoir faire toutes les manipulations prévues sans blocage, mais sans accès aux données des autres commerciaux.
Moi l'administrateur, avec mon code et mon mot de passe je dois avoir accès à tout sans problème
J'ai déjà une macro dans le fichier, il va falloir la remettre au point pour obtenir ce résultat
C'est un nouveau défi, cela vous tente ?

f894009 · Answer

Bonjour,

si vous êtes toujours partant ?
Oui.

 mot de passe pour chaque commercial.
Je attendais votre demande vu que dans votre fichier de base il y a une userform fmMotDePasse
La base de données doit être filtrer
Pour les Userform, ca fait modifier l'ouverture par defaut avec ce qui concerne le commercial "connecte"
Feuille Base:
Parce que pour moi a la fin de la mise au point, en dehors de vous personne accéde l'application Excel. 

C'est un nouveau défi, cela vous tente ?
Rien d'impossible a l'homme, tout ce qu'il ne sait pas faire, il le laisse.

PHILOU10120 · Answer

Bonjour F894009

Je vois que cela ne vous fait pas peur, donc on va regarder comment faire, la partie programmation c'est votre domaine donc je ne voudrai pas mettre le bazar.

Mon idée c'est un outil qui servira à un responsable, pour suivre les commerciaux, leurs productions et leurs résultats, le but des TCD et de la feuille statistique
Les commerciaux suivent leurs clients et leurs résultats et le responsable suit l'ensemble des commerciaux
Qu'en pensez-vous ?

Si cette base peut servir à d'autres, on n'aura pas travail pour rien.

Faut-il ouvrir un autre post ou on continue sur celui-ci ?

f894009 · Answer

Bonjour,

Je vois que cela ne vous fait pas peur
Ce n'est pas la premiere fois que je fais ce genre "d'application" en Excel ou autre

commerciaux suivent leurs clients et leurs résultats
Tout peux se faire avec les Userform sans acceder aux feuilles Excel

Faut-il ouvrir un autre post 
Oui

PHILOU10120 · Answer

Bonjour F894009

Je viens d'ouvrir un nouveau Post pour la création de la protection avec accès individuel.
Je ne trouve pas l'option pour déclarer ce post Clôturé

PHILOU10120 · Answer

Merci, c'est fait

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

195 réponses

Votre réponse

Discussions similaires

Newsletters