XL 2013 Code Vba

Le_Troll_Du_27

XLDnaute Occasionnel
Bonjour le forum et je vous souhaite mes meilleurs vœux pour l'année 2016.
Après plusieurs essaie infructueux j’ai décidé de vous contacter afin de parvenir à finaliser mon projet.

Je souhaiterai pouvoir traduire ce qui suit dans le CmdB_Valider.
En sélectionnant P_PAIEMENT, nous avons dans une listView le rappel du Tableau SUIVI_DES_FACTURES.

Dans cette listView les factures dites « validée » apparaissent en vert et la frame paiement correspondante à la facture sélectionnée doit être obligatoirement remplie.
Pour les factures dite "en attente", nous validons cette facture par une liste déroulante type (ComboBox), les moyens de paiements possible ou par une facilité de Paiement type (CheckBox).

I. COMBOBOX

COMBOBOX : le frame du paiement correspondant s'affiche et les textBoxs "MONTANT TTC, MAJORATION, RESTANT DU, LA DATE DU JOUR".

Nous rentrons les informations manquantes qui les remplirons le tableau SUIVI_DES_FACTURES. Un contrôle s'effectue pour vérifier que les textBoxs ne soient pas vide.

A la VALIDATION, les informations dans les carrés ROUGE de la feuille <SUIVI FACTURES> sont remplies. On inscrit NON dans la colonne 36 (CheckBox).

Information déjà connus à remplir dans les textBoxs

  • E (5)Montant TTC TextBox17, TextBox24, TextBox38, TextBox46, TextBox54
  • G (7)Majoration TextBox18, TextBox25, TextBox39, TextBox47, TextBox55
  • H (8)Restant Du TextBox19, TextBox26, TextBox40, TextBox48, TextBox56
  • J (10)Date du Règlement (TextBox21, TextBox28, TextBox42, TextBox50, TextBox58) = AUJOURDHUI

    Les Informations dans les carrés Rouges sont inconnues pour le moment :

  • Y (25) Mode de paiement : ESPECES, CHEQUES, VIREMENT, PAYPAL, CARTE BANCAIRE
  • Z (26) Titulaire du Compte TextBox22, TextBox29, TextBox43, TextBox51
  • AA (27) N° de chèque ou Domiciliation TextBox23, TextBox30
  • AB (28) Transaction TextBox44, TextBox53
  • AC (29) Libellé ou Adresse Mail TextBox31, TextBox45, TextBox52
  • AD (30) Code Banque TextBox32
  • AE (31) Code Guichet TextBox33
  • AF (32) Numéro de compte TextBox34
  • AG (33) Clé RIB TextBox35
  • AH (34) Code BIC/SWIFT TextBox36
  • AI (35) Code IBAN TextBox37
  • AK (37) Paiement Comptant TextBox20, TextBox27, TextBox41, TextBox49, TextBox57
    Reste AJ soit écrire une formule afin d'avoir OUI et NON soit écrire par la validation des infos ci-dessus si checkBox non coché écrire NON en AJ (36). Lequel choisir ?
    Mais si je choisi l'une ou l'autre je n'aurai plus de facture à traiter dans SUIVI DES CREANCES. Alors devons-nous mettre dans cette colonne OUI par défaut
    Afin de voir apparaître les factures dans SUIVI DES CREANCES ?
II. CHECKBOX


CHECKBOX : Q_MODE_REGLEMENT s'ouvre et un choix de 5 paiement est possible.
Prenons l'exemple le choix du paiement VIREMENT.
R_REGLEMENT_3 s'ouvre avec les informations pré-remplies dans les textBoxs "MONTANT TTC, MAJORATION, RESTANT DU, LA DATE DU JOUR".
Nous remplissons les informations manquantes des textBoxs.
Ensuite nous remplissons la textBox : TxtEcheance3 par un chiffre de 1 à 24 (mois) et quand à TxtQte3 est remplie automatiquement par 30jours.
Les textBoxs TxtMensuel et TxtButee font un calcul automatique selon les informations de TxtEcheance3 et TxtQte3.
Ensuite s'exerce un contrôle des textBoxs afin de vérifier que celles-ci soient toutes remplies.
A la VALIDATION, les textBoxs 1 à 9 remplissent le tableau SUIVI_DES_FACTURES les colonnes de 26 à 35 et le mot VIREMENT doit apparaître dans la colonne 25. Et pour les textBoxs TxtEcheance3 et TxtQte3 remplissent le tableau dans SUIVI DES CREANCESles colonnes 24 et 25 de la ligne de la facture choisi. Il reste alors la textBox MONTANT RECU, elle devra rempli la colonne 38.
Et R_REGLEMENT_3 se ferme pour revenir à P_PAIEMENT avec un rafraichissement de la listView.
Alors, soit nous recommençons une opération ou nous quittons.
Et on applique la même chose pour tous les autres modes de règlement :
- R_REGLEMENT_1 pour ESPECES
- R_REGLEMENT_2 pour CHEQUES
- R_REGLEMENT_3 pour VIREMENT
- R_REGLEMENT_4 pour PAYPAL
- R_REGLEMENT_5 pour CARTE BANCAIRE

Je décompose pour les 5 Stratégies quand la checkBox est cochée :
CHECKBOX appelle Q_MODE_REGLEMENT
Dans Q_MODE_REGLEMENT il y a un choix de 5 CheckBoxs appelant R_REGLEMENT de 1 à 5.

SI LE CHOIX EST R_REGLEMENT_1
Information déjà connus à remplir dans les textBoxs sans les valider sauf J (10)
FeuilleSUIVI FACTURES

  • E (5) Montant TTC TxtMontantTTC affiche juste la valeur
  • G (7) Majoration TxtMajoration affiche juste la valeur
  • H (8) Restant Du TxtMontantRecu affiche juste la valeur
  • J (10) Date du Règlement TxtDate = AUJOURDHUI
FeuilleSUIVI DES CREANCES

  • AM (39) TxtMensuel affiche juste la valeur et calcul automatique selon TxtQte1
  • AN (40) TxtButee affiche juste la valeur et calcul automatique selon TxtQte1
Les Informations dans les carrés Rouges sont inconnues pour le moment :

  1. Feuille « SUIVI FACTURES»
    1. Y (25) Mode de paiement = ESPECES
  2. Feuille « SUIVI DES CREANCES»
    1. L (12) TxtQte1
    2. M (13) TxtEcheance1 affiche juste la valeur et calcul automatique selon TxtQte1
Et R_REGLEMENT_1 se ferme pour revenir à P_PAIEMENT avec un rafraichissement de la listView.

SI LE CHOIX EST R_REGLEMENT_2
FeuilleSUIVI FACTURES

  • E (5) Montant TTC TxtMontantTTC affiche juste la valeur
  • G (7) Majoration TxtMajoration affiche juste la valeur
  • H (8) Restant Du TxtMontantRecu affiche juste la valeur
  • J (10) Date du Règlement TxtDate = AUJOURDHUI
FeuilleSUIVI DES CREANCES

  • AM (39) TxtMensuel affiche juste la valeur et calcul automatique selon TxtQte2
  • AN (40) TxtButee affiche juste la valeur et calcul automatique selon TxtQte2
Les Informations dans les carrés Rouges sont inconnues pour le moment :

  1. Feuille « SUIVI FACTURES»
    1. Y (25) Mode de paiement = CHEQUES
    2. Z (26) Titulaire du Compte TxtTitulaire
    3. AA (27) N° de chèque TxtNumeroCheque
    4. AC (29) Libellé TxtLibelleBanque
  2. Feuille « SUIVI DES CREANCES»
    1. R (18) TxtQte2
    2. S (19) TxtEcheance2 affiche juste la valeur et calcul automatique selon TxtQte2
Et R_REGLEMENT_2 se ferme pour revenir à P_PAIEMENT avec un rafraichissement de la listView.

SI LE CHOIX EST R_REGLEMENT_3
FeuilleSUIVI FACTURES

  • E (5) Montant TTC TxtMontantTTC affiche juste la valeur
  • G (7) Majoration TxtMajoration affiche juste la valeur
  • H (8) Restant Du TxtMontantRecu affiche juste la valeur
  • J (10) Date du Règlement TxtDate= AUJOURDHUI
FeuilleSUIVI DES CREANCES

  • AM (39) TxtMensuelaffiche juste la valeur et calcul automatique selon TxtQte3
  • AN (40) TxtButeeaffiche juste la valeur et calcul automatique selon TxtQte3
Les Informations dans les carrés Rouges sont inconnues pour le moment :

  1. Feuille « SUIVI FACTURES»
    1. Y (25) Mode de paiement = VIREMENT
    2. Z (26) Titulaire du Compte TxtTitulaire
    3. AA (27) DomiciliationTxtDomiciliation
    4. AC (29) Libellé TxtLibelleBanque
    5. AD (30) Code Banque TxtCodeBanque
    6. AE (31) Code Guichet TxtCodeGuichet
    7. AF (32) Numéro de compte TxtNumeroCompte
    8. AG (33) Clé RIB TxtCleRib
    9. AH (34) Code BIC/SWIFT TxtSwift
    10. AI (35) Code IBAN TxtIban
  2. Feuille « SUIVI DES CREANCES»
    1. X (24) TxtQte3
    2. Y (25) TxtEcheance3 affiche juste la valeur et calcul automatique selon TxtQte3
Et R_REGLEMENT_3 se ferme pour revenir à P_PAIEMENT avec un rafraichissement de la listView.

SI LE CHOIX EST R_REGLEMENT_4
FeuilleSUIVI FACTURES

  • E (5) Montant TTC TxtMontantTTC affiche juste la valeur
  • G (7) Majoration TxtMajoration affiche juste la valeur
  • H (8) Restant Du TxtMontantRecu affiche juste la valeur
  • J (10) Date du Règlement TxtDate = AUJOURDHUI
FeuilleSUIVI DES CREANCES

  • AM (39) TxtMensuelaffiche juste la valeur et calcul automatique selon TxtQte4
  • AN (40) TxtButeeaffiche juste la valeur et calcul automatique selon TxtQte4

Les Informations dans les carrés Rouges sont inconnues pour le moment :

  1. Feuille « SUIVI FACTURES»
    1. Y (25) Mode de paiement = PAYPAL
    2. Z (26) Titulaire du Compte TxtTitulaire
    3. AB (28) Transaction TxtTransaction
    4. AC (29)Adresse Mail TxtMail
  2. Feuille « SUIVI DES CREANCES»
    1. AD (30) TxtQte4
    2. AE (31) TxtEcheance4affiche juste la valeur et calcul automatique selon TxtQte4
Et R_REGLEMENT_4 se ferme pour revenir à P_PAIEMENT avec un rafraichissement de la listView.

SI LE CHOIX EST R_REGLEMENT_5
FeuilleSUIVI FACTURES

  • E (5) Montant TTC TxtMontantTTC affiche juste la valeur
  • G (7) Majoration TxtMajoration affiche juste la valeur
  • H (8) Restant Du TxtMontantRecu affiche juste la valeur
  • J (10) Date du Règlement TxtDate = AUJOURDHUI
FeuilleSUIVI DES CREANCES

  • AM (39) TxtMensuel affiche juste la valeur et calcul automatique selon TxtQte5
  • AN (40) TxtButeeaffiche juste la valeur et calcul automatique selon TxtQte5
Les Informations dans les carrés Rouges sont inconnues pour le moment :

  1. Feuille « SUIVI FACTURES»
    1. Y (25) Mode de paiement = CARTE BANCAIRE
    2. Z (26) Titulaire du Compte TxtTitulaire
    3. AB (28) Transaction TxtTransaction
    4. AC (29) Libellé TxtLibelleBanque
  2. Feuille « SUIVI DES CREANCES»
    1. AJ (36) TxtQte5
    2. AK (37) TxtEcheance5 affiche juste la valeur et calcul automatique selon TxtQte5
Et R_REGLEMENT_5 se ferme pour revenir à P_PAIEMENT avec un rafraichissement de la listView.

-- FIN --

Cordialement

Laurent
 

Pièces jointes

  • Mode de paiement V6.7.xlsm
    211.9 KB · Affichages: 100
Dernière édition:

Le_Troll_Du_27

XLDnaute Occasionnel
Re : Code Vba

Bonjour le forum

Pour la première partie de mon message : Mode de Paiement Immédiat

COMBOBOX : le frame du paiement correspondant s'affiche et les textBoxs "MONTANT TTC, MAJORATION, RESTANT DU, LA DATE DU JOUR".

Nous rentrons les informations manquantes qui les remplirons le tableau SUIVI_DES_FACTURES. Un contrôle s'effectue pour vérifier que les textBoxs ne soient pas vide.

A la VALIDATION, les informations dans les carrés ROUGE de la feuille <SUIVI FACTURES> sont remplies.

Information déjà connus à remplir dans les textBoxs

  • E (5) Montant TTC TextBox17, TextBox24, TextBox38, TextBox46, TextBox54
  • G (7)Majoration TextBox18, TextBox25, TextBox39, TextBox47, TextBox55
  • H (8)Restant Du TextBox19, TextBox26, TextBox40, TextBox48, TextBox56
  • J (10)Date du Règlement (TextBox21, TextBox28, TextBox42, TextBox50, TextBox58) = AUJOURDHUI

    Les Informations dans les carrés Rouges sont inconnues pour le moment :

  • Y (25) Mode de paiement : ESPECES, CHEQUES, VIREMENT, PAYPAL, CARTE BANCAIRE
  • Z (26) Titulaire du Compte TextBox22, TextBox29, TextBox43, TextBox51
  • AA (27) N° de chèque ou Domiciliation TextBox23, TextBox30
  • AB (28) Transaction TextBox44, TextBox53
  • AC (29) Libellé ou Adresse Mail TextBox31, TextBox45, TextBox52
  • AD (30) Code Banque TextBox32
  • AE (31) Code Guichet TextBox33
  • AF (32) Numéro de compte TextBox34
  • AG (33) Clé RIB TextBox35
  • AH (34) Code BIC/SWIFT TextBox36
  • AI (35) Code IBAN TextBox37
  • AK (37) Paiement Comptant TextBox20, TextBox27, TextBox41, TextBox49, TextBox57



Amicalement

Laurent
 

Pièces jointes

  • Mode de paiement Immédiat.xlsm
    167 KB · Affichages: 51
  • Mode de paiement Immédiat.xlsm
    167 KB · Affichages: 64
Dernière édition:

ChTi160

XLDnaute Barbatruc
Re : Code Vba

Bonsoir Laurent
Bonsoir le Fil
Bonsoir le Forum
Je vois que tu perds patience
personnellement je me suis intéressé a ton Post
Aujourd’hui ,Infiltration dans le Coude , pas évident le codage et la réflexion ...
Bientôt Opération de la Main gauche 6 semaines d’arrêt .
je continue à m’intéresser aux explications que tu as données et qui semblent claires .
je reprendrai a mon rythme des que possible , continues a garder le lien vers ce Fil .
même si tu trouves une réponse ailleurs .
Bonne fin de Journée
Amicalement
Jean Marie
 
Dernière édition:

Le_Troll_Du_27

XLDnaute Occasionnel
Re : Code Vba

Bonsoir le forum
Bonsoir Jean Marie
Je te remercie pour ta sollicitude et je suis dans le même cas que toi et je comprends très bien mais tu n'es pas le seul sur le forum.
Soignes toi bien , je garde ce fil au cas où pour y poster la solution à ce problème.
Amicalement
Laurent
 

Discussions similaires

Statistiques des forums

Discussions
311 732
Messages
2 081 995
Membres
101 857
dernier inscrit
mt60400