XL 2013 UserForm multipages

[murainesouspatate]

Bonjour à tous et à toutes,
Je suis en train de créer un classeur de suivi client à ma fille qui est esthéticienne.
Afin d'enregistrer, modifier ou supprimer des clients ainsi que la fiche client, j'ai créé un UserForm multipages.
Pour la page Enregistrement et consultation, j'ai réussi à les faire fonctionner grâce aux foires au questions et l'aide de certains sur ce forum.
Pour la page Modification, je ne sais pas comment renvoyer les données modifiées vers la feuille "Clients" sur la ligne du client sélectionné avec la ComboBox 1.

J'ai commencé la macro mais ne sais pas comment faire pour la suite. Je joint mon classeur test en pièce-jointe en espérant que quelqu'un puisse bien m'aider à résoudre mon problème, et surtout à m'expliquer le déroulement.
Je vous remercie par avance et vous souhaite une agréable journée.
Cordialement.
Roger

 

[Dranreb]

Pour ce qui est de mon système, s'il n'y aura à coup sûr jamais qu'une seule colonne d'identification (Nom et prénom) et même jamais besoin de rechercher un client d'après un autre critère (adresse, téléphone ?), on pourra se passer d'un objet ComboBoxLiées. Celui ci sert en effet seulement à considérer un ensemble de plusieurs ComboBox basées sur des colonnes différentes comme un seul dispositif qui les combine. Comme si on séparait le nom et le prénom dans deux colonnes, par exemple, on pourrait retrouver un client par son nom ou par son prénom. Si plusieurs portent le même prénom spécifié en premier, seuls sont proposés dans la CBxNom ceux qui le portent.
Le ControlsAssociés en revanche garderait tout son intérêt.

 

[murainesouspatate]

Bonsoir à tous
perso j'ai simplifier tout ca
j'ai reduit le multipage a 2 pages ajout et (modi/supression/consultation )
bon pour l'ajout moins de 15 lignes et c'est marre
pour le reste j'ai vachement simplifier
j'ai pas compris pourquoi les controls était locké je les aie delocké
j'ai pas compris non plus pourquoi la feuille était protégé sans MDP j'ai supprimer ça aussi

pour le principe ajout c'est simple add sur listrows converti en range et hop transfert sur les cellule de ce range dans une boucle sur les 23 textboxs que j'ai renommé bien évidement

pour le principe modif c'est simple j'entre dans la combo tout le tableau + une colonne dans le quel je stocke les index de ligne
au click sur la combo le .listindex,.liscount-1) me donne l'index du listrow du tableau t_clients
bref le reste est assez simple
tu a donc 3 boutons dans la page modif
supprimer
modifier
fermer

tu sélectionne dans la combo et tu modifie les textboxs et click sur modifier ou click sur supprimer pour supprimer le client de la list

click sur ajouter dans le page ajouter et la liste dans le tableau sur feuille se re triera auto dans l'ordre
la list dans la combo se remet a jour auto aussi

voila
j'ai stocker les index dans le tablo en dernière colonne au cas ou tu voudrais ajouter une tri des occurrence dans la combo au change les index seront toujours bons
bon je pense pas que ca soit nécessaire l'intuitivité native de la combo suffit a te rapprocher en tapant au fur et a mesure

 

[murainesouspatate]

Bonjour,
Je vous remercie beaucoup de m'accorder du temps à mon problème.
Je suis agréablement surpris de la simplicité de votre proposition qui effectivement fait moins usine à gaz pour un novice comme moi.
Je viens de télécharger votre classeur mais n'arrive pas à faire fonctionner la page 2 il y a un message d'erreur en validant la modification :

idem pour la suppression :

Comme indiqué plus haut, je n'ai pas encore assez de connaissance en VBA pour arriver à résoudre ce problème.
Auriez-vous l'amabilité de m'indiquer la procédure à suivre ?

Cordialement.

 

[patricktoulon]

bonjour
a j'ai encore oublié déclarer des variables c'est pas bien grave
voilà

 

[murainesouspatate]

bonjour
a j'ai encore oublié déclarer des variables c'est pas bien grave
voilà

Bonjour, encore merci, tout fonctionne à merveille.
Je vous suis très reconnaissant, c'est ma fille qui va être contente car je vais adopter votre solution.
Cordialement.

 

[patricktoulon]

à la bonne heure
dis moi au fait on est voisin non? vu les adresses même fictives dans le fichier

 

[murainesouspatate]

à la bonne heure
dis moi au fait on est voisin non? vu les adresses même fictives dans le fichier

Bonjour,
Oui on devait être voisin, j'étais sur la Valette. depuis 4 ans je suis retourné en Nouvelle Calédonie.
Désolé de t'ennuyer encore, je viens de remettre à jour le fichier complet de ma fille et il y a maintenant un beug l'orque je sélectionne un nom client dans la ComboBox "Nom Prénom", alors que cela ne le faisait pas sur le 1er classeur que tu m'a envoyé !

Je ne comprends pas pourquoi. Je ne pense pas avoir fait une erreur en collant le userForm1 dans le classeur de ma fille.
Pour l'ajout client tout fonctionne parfaitement.

Cordialement

 

[patricktoulon]

re
quand tu passe la souris sur la ligne jaune et sur le i i vaut combien ?

Attention il faut que le tableau sur la feuille ai la meme structure que l'exemple sur le quel j'ai travaillé si tu a changer quelque chose entre temps (supprimé ou ajouté une des colonnes) ou modifier l'ordre ca risque d'etre short

 

[murainesouspatate]

re
quand tu passe la souris sur la ligne jaune et sur le i i vaut combien ?

le i = 23

 

[ChTi160]

Bonjour le Fil,
Ca veut dire que contrôle("m" & i+1) n'existe pas(i=23) si j'ai bien compris !
a vérifier donc si tu as bien un control nommé m24
bonne journée
Jean marie

 

[murainesouspatate]

Bonjour le Fil,
Ca veut dire que contrôle("m" & i+1) n'existe pas(i=23) si j'ai bien compris !
a vérifier donc si tu as bien un control nommé m24
bonne journée
Jean marie

bonjour,
Je n'ai pas de control nommé m24
bonne journée

 

[patricktoulon]

heu....... c'est bizarre quand même normalement c'est 22 donc 23 tu dois avoir une colonne en plus dans le tableau de ta fille

 

[murainesouspatate]

heu....... c'est bizarre quand même normalement c'est 22 donc 23 tu dois avoir une colonne en plus dans le tableau de ta fille

je vous confirme avoir que 23 colonnes dans le tableau qui est identique à celui que j'ai mis en pièce-jointe,

T_Clients = Clients!$A$7:$w$30

 

[ChTi160]

Re
donc supprimer le plus 1 dans la boucle
jean marie

 

[murainesouspatate]

je vous confirme avoir que 23 colonnes dans le tableau qui est identique à celui que j'ai mis en pièce-jointe,

T_Clients = Clients!$A$7:$w$30

Si je vous envoyais le classeur de ma fille pourriez-vous y jeter un coup d'oeil ?

Re
donc supprimer le plus 1 dans la boucle
jean marie

Là du coup i=2 mais toujours le même message et débogage