Ajout d'un bouton pour récupérer données d'un fichier externe

Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention   -  
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

Je fais appel à votre amabilité et connaissance éventuelle en VBA pour m'aider à ajouter un bouton à ma macro.

A la base j'ai 3 fichiers :
  • Un premier nommé « cadencier » contenant tous mes articles reconnu par un code IFLS colonne J
  • Une macro « Macro alim cadencier » qui permet de récupérer des fichiers sur mon disque dur et d'alimenter la colonne Ventes du cadencier aves les boutons
  • Le fichier contenant les données qui vont être intégré dans le cadencier grâce à la macro : « fichier_pour_alim_ventes »


Je souhaiterai ajouter un bouton dans ma macro du même type que le deuxième « indiquer le fichier stocks » `qui alimente la colonne Ventes de mon fichier cadencier à partir de Qté Unités colonne L du fichier »SUM( [FLDC-Qté unites] ) »). Cette fois-ci je veux aller chercher un fichier Commandes prendre la colonne U « Arr. Intégrées » du fichier «fichier_alim_CMD »(dossier test macro) et la coller dans le fichier nommé Cadencier à la colonne CMD.

J'ai tout d'abord dans excel recopié la partie pour aller chercher le fichier créer le bouton et je l'ai affecté à une nouvelle macro « Sub CommandButton3_Click() »

Ensuite dans le code j'ai cherché à peu près tout le code ou y avait stock dedans et je l'ai recopié pour « commandes » en changeant le nom de toutes les variables...

PS: quand on appuie sur le bouton mettre a jour le cadencier ça marche ça alimente la colonne ventes. Mais mon bouton CMD ne marche pas... par contre avant d'appuyer sur mettre a jour faut qu'il y ait que la macro d'ouverte sur le pc.

Le dossier ci-joint contient donc : le cadencier, la macro de base, la macro test (contenant le code que j'ai ajouté qui se trouve entre des commentaires `TEST Bouton & `end test bouton pour pouvoir se repérer facilement ; le fichier pour alimenter les stocks avec le 2ème bouton et celui pour alimenter les commandes (nouveau bouton).
... je n'ai fait que reprendre la méthode de création du bouton 2. Je pense avoir fait le plus gros mais n'ayant que des connaissances très basiques de VBA, je suis incapable de rectifier.

Voici tous les fichiers :
https://www.cjoint.com/c/EDwleLoGB1Z
Merci par avance et bonne journée.
A voir également:

305 réponses

Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Pourquoi est-ce que le x ne marche plus qu'avec cet article ? Sincèrement j'aimerai éviter de changer le code... car j'ai plusieurs macros.

Et puis c'était plus pratique la croix quand la ligne n'est pas à jour car repérable plus facilement
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Comme je vous l'ai ecrit, le MJ est provisoire le temps de traiter votre soucis

Merci pou l' IFLS en defaut
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Très bien je n'avais pas compris je pensais que vous vouliez changé de système. merci
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

https://www.cjoint.com/c/EGynix3JoWf

j'ai suivi en pas a pas le code IFLS dont vous dites que la mise a jour ne se fait pas, elle se fait comme les autres codes IFLS jusqu'au 07/08. Les nombres ecrits dans les cellules proviennent bien de calcul prevision.

Que voulez-vous de plus ???????????????
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Excusez moi mais de mon côté il y a un réel problème avec cette ligne là
SVP refaites la même manip que moi avec ces fichiers:
https://www.cjoint.com/c/EGynZWTeqfm

Mise à jour du jour et vous verrez la croix apparait ligne 369. La vente n'est pas mise à jour ! alors que dans commentaires maj ok apparait.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Pourquoi ne pas avoir envoyer ce fichier a la place de l'autre ?????????????????
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
de quel fichier parlez-vous ? Je vous ai envoyé il me semble le cadencier avec la ligne en question à jour car nous la mettons à jour manuellement. Là j'ai supprimé pour que vous voyiez bien qu'elle ne se met pas à jour
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Les fichiers CadencierChristophe ne sont pas les memes(le code IFLS en question est a la ligne 30 pour l'un et 369 pour l'autre ( a priori pas d'importance, mais ...) et le fichier que vous utilisez pour les mises a jour ,Macro cadencier AB LENS 6 mai, n'est pas le meme que celui que j'utilise (derniere modifs du 25/06) Macro_cadencier_Bain_Rheu_Mans_Carpi

Donc, je veux bien regarder cette fois-ci ce qui ne va pas, mais a vous d'utiliser les fichiers des dernieres modifs
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Ligne 369 car les filtres sont ouverts je pense. Les cafenciers sont les mêmes la seule différence est que j'ai supprimé les valeurs dans ventes du jour.
Je dispose de 2 macros : une pour Lens et une autre qui gère 4 codes entrepôts voilà pourquoi ce n'est pas les mêmes ...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Pas un probleme de fichier de mise a jour,
vous avez DEUX FOIS LED MEME CODE IFLS 831583 dans votre cadencier
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Très bien vu ! MERCI A VOUS votre aide m'a été précieuse
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

Gros problème sur mon fichier cadencier : Je n'arrive plus à fermer ni ouvrir mes (grouper/dissocier). Ni à utliser la mise en forme conditionnelle...

Voici le fichier : https://www.cjoint.com/c/EHfmHQwfcim

Merci par avance.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

Vous avez deux onglets selectionnes 2015 et feuil2, faites un clic sur feuil3
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
MERCI
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

J'ai un gros problème avec un de mes fichiers : impossible de faire un copier coller depuis des semaines. Message d'erreur: "La sélection est trop grande".
J'ai pourtant copier-coller en valeurs, arranger la mise en forme confitionnelle... je ne trouve pas de solution.
C'est très embêtant étant donné qu'il y'a sans cesse des nouveaux produits à ajouter : un bloc de 5 lignes avec les formules ...
Ce que je faisais avant c'est que j'avais toujours unj bloc de ligne vierge avec des formules que je copiais coller mais là ça n'est plus possible.

Voici le fichier : https://www.cjoint.com/c/EHsoMQhkRvn

Pouvez-vous voir svp?

merci
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

J'ai fait du copier/coller, du copier/Inserer cellules copier et pas de probleme !!

https://www.cjoint.com/c/EHspqXftr6f
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
?
Avez-vous essayer de copier tout un bloc de 5 lignes ?
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Qu'avez-vous fait si je reprend le fichier qui est sur mon pc je n'y arrive pas! mais ouvrant votre lien oui ?
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Rien de plus que les manips que j'ai ecrites
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

Oui dans votre fichier il n'y a plus les mises en forme conditionnelle sur les colonnes A et stock.
J'ai essayé de les remettre mais malgré que les cellules soient bien nommées les premières colonnes (19 aout) ne sont pas prises en compte

Voici le fichier :
https://www.cjoint.com/c/EHtgSLiLp8n
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

ai supprime les lignes sans mise en forme et fait un copier/coller de lignes avec mise en forme: https://www.cjoint.com/c/EHthP1UNMtf

Normalement je devais faire un bouton pour cette duplication, mais je vois que vous n'utilisez deja pas le fichier qui permet de dupliquer des semaines ....
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour!

Encore un problème aujourd'hui à la mise à jour d'un cadencier ! (pas de problème pour tous les autres).
ERREUR: Dépassement de capacité.

Je pensais que ça venait du fait que le fichier est peut être trop lourd j'ai copié collé en valeurs... mais toujours la même erreur !
Pouvez vous voir svp : https://www.cjoint.com/c/EHvihwsF64m

merci bcp
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

d'ou vient cette vente pour le 20/08:

0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Oooooh c'est une grosse erreur effectivement !!
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Tout est réglé merci à vous
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

Je reviens vers vous svp. Je suis en train de créer de nouveaux cadenciers j'ai repris le même modèle que j'avais pour la structure les colonnes... En essayant de créer un historique (j'ai d'abord alimenté les colonnes VENTES manuellement), j'ai essayé d'alimenter avec la macro mais j'ai une erreur incompatibilité de type. Je ne trouve pas l'erreur...

Je vous mets à dispo le nouveau cadencier + le fichier pour alimenter les sorties. De plus, autre question : est-il nécessaire de mettre les formules dans les colonnes A ou est-ce que la macro les met automatiquement ?
https://www.cjoint.com/c/EIwnLGyyw4m
https://www.cjoint.com/c/EIwnMqtF1xm


Merci par avance.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

Formules colonne A ecritent par Function Alerte_Stock

Je regarde pour l'erreur
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Pour le fichier Macro_Cadencier, onglet Maj Cadencier, vous avez quelles Date du jour et Date a mettre a jour ???
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,
Je reviens vers vous car je suis actuellement coincée. En période de fêtes exceptionnellement nous allons devoir travailler un dimanche et donc ajouter au cadencier (ci-joint comme exemple) la journée du dimanche 20 décembre. Or la macro est il me semble configurée pour fonctionner avec seulement 6 jours par semaine ? Il est prévu d’ajouter au tableau poids des jours une valeur pour le dimanche. Quelles sont les autres modifs à faire ? De plus, est-ce possible de n’ajouter que le dimanche 20 et toutes les autres semaines resteront à 6 jours du lundi au samedi ,
Merci par avance pour votre aide

Voici un cadencier : https://www.cjoint.com/c/ELhpIMpYqjn
La macro de mise à jour : https://www.cjoint.com/c/ELhpJi0Wx7n
Et le fichier d'alimentation des sorties : https://www.cjoint.com/c/ELhpKcq1vxn
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
s'il vous manque des infos n'hésitez pas à me demander. Merci
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention   > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Les différents problèmes que je rencontre :
Avec un poids des jours du lundi au samedi et en ajoutant dans le cadencier le dimanche 20 décembre, ERREUR 400
En ajoutant le dimanche dans les poids des jours : erreur Dépassement de capacité
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

Je recupere tout et vous tiens au courant. Modif pour une seule semaine, va etre un peu rock&roll

A demain
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,
Merci pour votre réponse. J’ai un peu avancé sur le sujet : dans l’onglet paramètres j’ai modifié la plage de cellules nommée Poids des jours (pour qu’elle prenne en compte le dimanche ajouté). Dans le code j’ai également modifié les coordonnées de cellules pour les nombres de jours pris en compte pour la prev (vu que j’ai ajouté une ligne dans l’onglet paramètres.)
Maintenant j’ai une erreur 400 du surement au dimanche 20 ajouté.
Voici la macro modifiée : https://www.cjoint.com/c/ELihQLjCKVm
Merci par avance pour votre aide.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Bonjour,

Question:

Vous mettez a jour ce calandrier tous les jours ou .....???????
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Oui tous les jours sauf le dimanche... le 20 décembre sera une exception
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Ok
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Si ça peut vous aider : je pense que le blocage se fait au niveau du calcul de la prevision.
En enlevant le bloc de la feuille6 (MaJ_Cadencier) suivant :
  'Mise à jour des prévision
Ligne_Ref = Ligne
'Calcul des prévisions
Col_Prev = Colonne
Somme_Ref = -1 'Initialisé à -1 pour indiquer que la somme des sorties de la période de référence n'a pas encore été calculée [V6]
For I_Prev = 1 To Nombre_jours_prev 'on alimente la prévision pour le nombre de jours glissants paramétré
IPNCJ = I_Prev * Nombre_Colonne_Jour
'Prevision = Round(Calcul_Prevision(MFMP, MFC, Ligne_Ref, Col_Prev + (IPNCJ), Jour_Ferie, Nombre_Colonne_Jour, Somme_Ref), 0) '[V6]

Prevision = Calcul_Prevision(MFMP, MFC, Ligne_Ref, Col_Prev + (IPNCJ), Jour_Ferie, Nombre_Colonne_Jour, Somme_Ref) '[V6]
If Prevision < 1 Then Prevision = 0 Else Prevision = Round(Prevision, 0) '[V7] End If
MFC.Cells(Ligne, Col_Prev + 3 + (IPNCJ)) = Prevision

'Alerte pour le stock J+2 a J+6
If (I_Prev >= 2 And I_Prev <= 6) Then
'Format Anglais
MFC.Cells(Ligne, Col_Prev + (IPNCJ) + 1).Formula = Alerte_Stock(MFMP, MFC, Ligne_Ref, Col_Prev + (IPNCJ), Col_Sensibilite)
End If
If (I_Prev = 1 Or I_Prev = 2) Then 'Alerte Tendance pour les prév J+1, J+2
If Alerte_Tendance(MFMP, MFC, Ligne_Ref, Colonne, Nombre_Colonne_Jour) Then
'changement du format de la cellule
MFC.Cells(Ligne, Col_Prev + 3 + (IPNCJ)).Borders.Weight = 4 'Epaisseur de la bordure
MFC.Cells(Ligne, Col_Prev + 3 + (IPNCJ)).Borders.Color = RGB(255, 0, 0) 'Couleur de la bordure : rouge
End If
End If
Next I_Prev
'Fin mise à jour des prévisions
Les sorties ont été mises à jour même si un seul dimanche est présent dans le cadencier.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714
 
Re,

Oui, il semblerait que passer de 6 jours a 7 avec un dimanche de surcroit peut poser un soucis
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Je ne vois pas dans le code où est le parameter n'indiquant que 6 jours par semaine ?
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
J’ai également ajouter des dimanches à toutes les semaines et refait tourner la macro : erreur 400. Je pense donc que le problème n’est pas la colonne ajoutée mais un paramètre dans le code qui ne doit voir que 6 jours par semaine.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Ben, vu qu'il n'y a rien qui indique que c'est 7 et pas 6, 6 reste

Nb jour glissant: cellule 21,9 pas 20,9
Permier diag: erreur 400 pour le onzieme jour glissant
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
J’ai modifié hier :
Nombre de jours glissants de référence pour le calcul de la prévision (20,9)
Nombre de jours glissants pour lesquels on calcule la prévision (21,9)
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
correspondants aux 6 et 12 dans l'onglet paramètres
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Nombre de jours glissants de référence pour le calcul de la prévision (20,9) Utilise nulle part, c'est un test qui est dans Prevision
0
Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Erreur repérée j'avais oublié un 20. mais toujours erreur 400
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 714 > Kivanc Messages postés 390 Date d'inscription   Statut Membre Dernière intervention  
 
Re,

Ai trouve pour une partie: Dimanche------>1 pas 8, les jours de la semaine vont de 1 (dimanche) a 7 (Samedi) avec l'instruction WeekDay parametree par defaut et de 1 (Lundi) a 7(Dimanche) si parametre =2 voir:

https://www.techonthenet.com/excel/formulas/weekday.php
0