Excel - Macro

Bonjour,

Afin de créer un fichier de gestion des stocks, je souhaiterais savoir comment automatiser tout cela avec des macros.

J'ai une page sur laquelle j'aimerais remplir les valeurs, une feuille qui servirait de feuille de saisie (ma fiche de production sur mon classeur) et j'aimerais que ces valeurs s'exportent sur mes différentes feuilles. Mes données de ma feuille 1 sont fixes et j'aimerais que cette feuille (uniquement cette feuille) soit sauvegarder dans mon pc. Les valeurs exportées de ma feuille sur les autres doivent être misent en ligne. Je vous envoie mon fichier en PJ.

Merci d'avance,


Morgane

Bonjour,

Ci-joint une proposition d'une solution qui fonctionne mais n'est pas très souple, il faudrait remodifier le code afin d'améliorer les automatisme.
Dans le code vous trouverais beaucoup d'annotation (en vert) afin de vous aider à comprendre le code.
Si vous l'utilisez comme ça il y a quelque précaution à prendre sinon il faudra modifier le code :
ne pas changer l'ordre des composants dans la feuille "Fiche de production"
ne pas renommer les feuilles
ne pas changer l'ordre des composants dans les feuilles "Sucres", "Stabilisant"...
Si ajout d'autre composant (en plus de "Autre 1" et "Autre 2") il faudra modifier le code (c'est juste un copier/coller des lignes déjà présente plus qq ajustements)


Par contre le fichier de sauvegarde est fait dans le répertoire C:\ changer le chemin pour un enregistrement personnalisé

comme j'ai dit c'est un départ pour pouvoir commencer à l'utiliser, après avoir mieux compris le code vous pourrez le modifier et rendre ce programme plus flexible.
N'hésitez pas à me dire si ça fonctionne bien chez vous et si vous voulez des complément d'information sur une partie de code que vous ne comprenez pas.

Cordialement

(Ne pas oublier de cliquer sur "Résolu" si vous pensez que c'est résolu...

Bonjour,

Merci pour toutes vos explications maintenant j'y voit plus clair, c'est exactement les réponses dont j'avais besoin. En revanche, quand j'essaye de changer les codes pour la partie "je renome le fichier avec la date de production" pour l'enregistrer dans un autre emplacement le code ne fonctionne pas...

Cordialement,

Morgane

Citation:

---

Envoyé par Morgane271253

En revanche, quand j'essaye de changer les codes pour la partie "je renome le fichier avec la date de production" pour l'enregistrer dans un autre emplacement le code ne fonctionne pas...

---

Il faudrait spécifier le message d'erreur et montrer la partie de code concernée.

Morgane,
Effectivement comme le dit Menhir il faudrait mettre le code qui pose problème, je pense que c'est le suivant :

Code:

---

1 2 3 4 5

'je renome le fichier avec la date de production ActiveWorkbook.SaveAs Filename:="C:\Production " & dateprod & ".xlsx", _ FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False ActiveWorkbook.Close

---

Ce qui peut poser problème si tu ne change pas le chemin c'est l'accès au disque "C:\", c'est d'avoir ce style d'erreur : "Erreur d'exécution'1004'" afin d'éviter ce problème change le chemin, tu crée un répertoire sous "C:\", exemple "Archives"
puis tu remplaces le code comme suit :

Code:

---

1 2	ActiveWorkbook.SaveAs Filename:="C:\Archives\Production " & dateprod

---

Le nom du fichier sauvegardé sera donc "Production 20190115.xlsx" (20190115 est un exemple cela dépend de la date de ta production)
Seul bémol qui faudrait résoudre, si la production est le 1 Mars 2019 la date de prod dans ton fichier sera "201931" (il ne mets pas le "0" devant la date du mois ni du jours comporte un seul digit) il faudrait modifier le code afin d'avoir le résultat suivant "20190301" dans le but d'avoir un archivage des production avec exactement le même nombre de digit.

C'est une rigueur qu'il faut essayer d'avoir car si dans le futur vous décidez d'extraire toute les productions d'une année, il sera plus facile de faire des tri et autre manipulation si le nombre de digit est le même pour l'ensemble des données.
En espérant que cela solutionnera ton problème.

Cordialement