XL 2016 Ajustement d'un formulaire

[Michest94]

Bonjour,

Je vous sollicite pour votre aide sur l'ajustement d'un formulaire que j'ai repris par rapport à un autre formulaire du même type de gestion, je pensais faire mes modif. sans problèmes et excel en a décidé autrement ...
(Mélange dans les listes de données)
Voir fichier joint.

Merci à vous.

 

[sousou]

Bonjour, tu dois revoir tout tes noms de listes dans données gestionnaires de noms

 

[sylvanu]

Bonjour Michest, Sousou,
Effectivement, tous les noms sont mélangés. Vous avez utilisé une distribution aléatoire ?
De plus "arr" est mal dimensionné, il fait 7 éléments, donc arr(6) et non arr(5).
En PJ un "truc" qui tourne sans erreur.
Utilisez donc le pas à pas, il vous permet de détecter ce genre d'erreur simple.

 

[sousou]

Re
Voila corrigé en gardant les tables comme liste, même si c'est peut_être pas le plus simple

 

[Michest94]

Merci Sylvanu et Sousou,

Cela fonctionne par contre dans ma demande j'ai oublié 2 champs.
le champs Mode et Détails
Voir fichier joint.

Merci à vous

 

[sylvanu]

PJ à tester. 😉

 

[Michest94]

PJ à tester. 😉

 

[Michest94]

C'est parfait!
Juste un détail dans le formulaire concernant la saisie Débit et Crédit il faut que ce soit l'un ou l'autre actuellement si je saisis que du débit ou crédit j'ai le message saisie du formulaire incomplet .

 

[sylvanu]

Le test était celui que vous aviez implémenté.
En PJ le test est repris, subdivisé en trois:
1- Manque une infos dans les 6 premiers champs
2- Débit et crédit vide
3- Débit et crédit tous deux renseignés.

    If arr(0) = "" Or arr(1) = "" Or arr(2) = "" Or arr(3) = "" Or arr(4) = "" Or arr(7) = "" Then
            MsgBox "La saisie du formulaire est incomplète !...", 64, "Information"
            Exit Sub
    End If
    If arr(5) = "" And arr(6) = "" Then
            MsgBox "Manque somme débit ou crédit !...", 64, "Information"
            Exit Sub
    End If
    If arr(5) <> "" And arr(6) <> "" Then
            MsgBox "Seul crédit OU débit doit être renseigné !...", 64, "Information"
            Exit Sub
    End If

 

[Michest94]

Merci Sylvanu,

C'est nickel👍

Une dernière question mes colonnes dans la feuille 'données' est ce que je peux les mettre dans le même ordre que celui du formulaire de saisie ?...

 

[sylvanu]

En redistribuant les colonnes et en réorganisant le tableau arr.
C'est vous qui avez fait le reste de la macro ?

 

[Michest94]

Ok, merci pour l'aide vraiment sympa,
Etant pas spécialiste en VBA la macro est un ajustement par rapport à un autre formulaire.
D'où le besoin d'aide...

 

[Michest94]

Ok, merci pour l'aide vraiment sympa,
Etant pas spécialiste en VBA la macro est un ajustement par rapport à un autre formulaire.
D'où le besoin d'aide...

Re Sylvanu

Petite question sup., à ton avis en ajoutant dans le formulaire, un champs Compte entre le champs Jour et Mode, idem pour la feuille Listes afin de faire du multi compte ( Compte-perso, compte-joint et LivretA ) avec chacun leurs soldes par rapport à la saisie...
Exemple CP solde initial 200 CJ solde initial 800 et livret A solde initial 400 en fonction de la saisie le débit/crédit se gère au bon compte...

 

[sylvanu]

Bonjour Michest,
Vous auriez pu le faire vous même, c'est le même principe que précédemment :
1- En redistribuant les colonnes dans la feuilles Données.
2- En réorganisant le tableau arr avec Compte et réaffectation des indices.
3- En créant la liste Compte pour la liste déroulante.
Voir PJ.
Je n'ai pas géré les Soldes, les trois colonnes sont en KLM. Je vous laisse faire.

 

[Michest94]

Merci Sylvanu,

Je suis désolé mais je m'en sort pas avec la gestion des soldes par rapport aux comptes.( formules, vba, ... ?)
Pour les feuilles de données et réorganisant le tableau je pense avoir compris.
En K1L1M1 tu as normée les colonnes

Solde(€) Compte perso

Solde(€) Compte joint

Solde(€) Livret A

Je ne vois pas comment tu as écris compte perso, joint et livret A pour les renommer au besoin.