Budgets 1 : création des produits

Bonsoir,

Je regarde tout ça dans la journée demain, et oui tu as déjà envoyé un fichier MENUS-10.

Cordialement

Bonsoir BUDGETS,

Par rapport à tout ce que tu as transmis, je ne comprends pas tout ce que tu veux, mais j'ai l'impression qu'une simple BD des dépenses (et/ou recettes) est suffisante. Je ne vois pas l'intérêt de tous les articles (ou produits) que tu veux créer dans le fichier BUDGETS-1. Pour analyser cette BD on peut facilement utiliser par la suite un tableau croisé dynamique.
Dans un premier temps, on peut faire une interface de saisie des dépenses, feuille Excel ou formulaire VBA et prévoir la feuille BD pour contenir le maximum d'information.
Mais peut-être as-tu déjà des idées précises de ce que tu veux.

Cordialement

Bonsoir,

Et bien je crois que c'est le premier post de cette conversation

Cordialement

Bonsoir BUDGETS,

Oui, c'est certainement mieux.
Mais je ne comprends toujours pas à quoi vont servir ces articles ou produits quand tu vas saisir tes dépenses !

Cordialement

Bonsoir,

Oui, j'ai vu ça dans le fichier posté à 15h39. Mauvaise manip sans doute. Repars d'une sauvegarde.

Bon courage

Bonjour BUDGETS,

Y-a-t-il une raison pour laquelle tu as enregistré ton fichier au format xltm (modèle Excel) ?

Cordialement

Je pense que tu t'embêtes pour pas grand chose. L'intérêt d'un modèle est de générer un nouveau fichier à chaque ouverture (double-clic par défaut) en préservant ainsi le fichier original.
D'autre part il me semble qu'il serait plus judicieux de terminer complètement le code de tes articles alimentaires avant de passer aux autres.

Cordialement

Bonjour BUDGETS,

La formule du numéro de création était adaptée à ton fichier Menus (lignes vides pour les mois courts). Le fichier Budgets n'a pas la même structure aussi une formule comme celle-ci peut -être suffisante :

=SI(E2<>"";"DA" & TEXTE(NBVAL(E$2:E2);"00");"")

Elle doit être copiée sur chaque ligne, il n'y a rien d'automatique.
Néanmoins, ce numéro de création ne me paraît pas utile.

Je t'incite à coder la création d'un article alimentaire de A à Z, les autres catégories suivront plus facilement quand le premier sera au point.
Je t'incite surtout à coder les feuilles et BD de saisie de tes dépenses au plus tôt même si tes articles ne sont pas terminés afin de détecter les problèmes potentiels.

Cordialement

Bonjour,

Travailler sur le fichier Budgets 1 détaillé sera plus facile pour le codage mais tu auras une multitude de feuilles et de procédures. A contrario avec le fichier Budgets, plus compact, tu limiteras les feuilles et les procédures mais tu pourras avoir du codage un peu plus complexe dans certains cas.

Cordialement

BUDGETS,

Comme je vois que tu as un peu de mal à démarrer, j'ai ça sous le coude depuis un moment, en fonction de ton fichier initial et de tes exemples :
https://www.cjoint.com/c/IKzpqIdXNa4
C'est juste une ébauche pour les article, les dépenses et la feuille Soldes numéraires

Il y a plusieurs méthodes, regarde s'il y en a une qui te plaît.

Cordialement

Bonjour BUDGETS,

Dans l'ordre :

1) Créer la feuille BD Produits (sous forme de tableau), mais surement pas avec 88 colonnes sinon ce ne sera pas une vraie BD, tu as la colonne catégorie qui typera la ligne, 11 colonnes me paraît juste
2) Créer la feuille articles alimentaires (sous forme de tableau, c'est plus facile), mais ce n'est jamais qu'un sous-ensemble de la feuille BD Produits
3) Créer et tester la procédure InsérerABDA, c'est le gros morceau !
4) Créer et tester la procédure TrierTableaux

Après l'ordre n'a pas vraiment d'importance, mais peut-être :

5) Créer et tester la procédure SupprimerABDA
6) Créer et tester la procédure ModifierABDA
7) Créer et tester la procédure GénérerABDA éventuellement

Et au fur et à mesure du codage créer les procédures annexes permettant de se faciliter la vie : Afficher, Masquer, Effacer, etc ...

Je ne peux pas ouvrir ton dernier fichier, mot de passe erroné.

Bon courage

Ne change rien si c'est plus simple pour toi. Avance ton codage.

Bon courage

Bonjour BUDGETS,

Ben oui, dans le fichier du message #52, ton tableau débutait en ligne 2, et dans ce fichier il débute en ligne 6, donc ...
J'ai encore vu un .Range("A6.E130") au lieu de .Range("A6:E130") dans la procédure EffacerDonnéesABDA

NB : Si tu es parti pour faire une feuille par article budgétaire, la BD produits est probablement inutile, ce qui faciliterait ton code.
Pendant ta phase de mise au point, passe plutôt au format xlsm sans mots de passe, ce qui est quand même plus facile.

Cordialement

Bonjour BUDGETS,

Effectivement il y a plusieurs problèmes.
Ci-joint ton fichier corrigé, j'ai mis avec 5 quotes les deux instructions erronées et j'ai corrigé en dessous
https://www.cjoint.com/c/IKCnCQVqANi

Instruction For I = 4 ...
Erreur sur le mot clé all sans #
Erreur sur l'indice de fin de boucle (vu que la BD produits ne commence pas en ligne 1 comme dans Menus) remplacé par
Range("TabProduits[#All,[Code produit]]").End(xlDown).Row

Instruction If shBDProduits(I, 2).Value = ...
Erreur sur un mot cells absent
Erreur sur les indices de colonnes 2 et 5 remplacés par 3 et 1

Avec ça, c'est ok, mais à l'occasion je changerais légèrement la méthode pour éviter la deuxième boucle.

Merci pour le format xlsm sans mot de passe

Bonne continuation

Bonjour BUDGETS,

J'ai généré, j'ai effacé : tout a fonctionné, j'ai généré de nouveau mais cela n'a plus fonctionné
Effectivement, la procédure initiale était prévue pour rechercher les valeurs code article en colonne1 mais ces valeurs étaient effacées avec la procédure EffacerDonnéesABDA donc il n'y avait plus de correspondances.

si le tes tableaux ne commencent pas en ligne 1, il faut employer Row au lieu de Count
Pas exactement, .Count donne le nombre de ligne de la table et .Row donne le numéro de ligne dans la feuille. Si la table commence en ligne 1, ces deux valeurs sont identiques pour la dernière ligne, ce qui était le cas dans Menus, sinon, selon les cas, il faut jouer avec l'un ou l'autre.

Vas-tu m'envoyer un nouveau fichier avec le changement que tu préconises pour éviter la deuxième boucle ?
Oui, et comme j'y étais, j'ai pris le temps de refondre la procédure GénérerDonnéesABDA (j'ai laissé pour info l'ancienne corrigée avec le nom _old), on travaille maintenant uniquement avec les noms de table sans utiliser les références de cellules dans la feuille. C'est plus évolutif en cas d'ajout ou de déplacement de colonnes, c'est peut-être un peu plus difficile à comprendre mais comme tu es volontaire ...
J'ai modifié dans le même esprit la procédure EffacerDonnéesABDA et j'ai changé la formule de numéro de création.
https://www.cjoint.com/c/IKDppLKwiVE

En espérant que tout aille bien,

Cordialement

Bonsoir,

C'est parce que j'ai renommé dans le gestionnaire de noms la table existante TabArticlesProduits en TabArticlesProduitsAlimentaires en prévision de tes futures ajouts de tables.
Comme tu es reparti de ton fichier pour mettre les macros et bien fais de même,.
Je pensais que tu aurais repris mon fichier !
Il y aura peut-être encore d'autres erreurs de ce type.

Cordialement