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 -
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 :
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.
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:
- Ajout d'un bouton pour récupérer données d'un fichier externe
- Comment réduire la taille d'un fichier - Guide
- Comment ouvrir un fichier epub ? - Guide
- Fichier bin - Guide
- Comment recuperer un message supprimé sur whatsapp - Guide
- Fichier rar - Guide
305 réponses
Juste une Autre question svp : j'ai besoin de la même macro d'alimentation cadencier sans mise à jour des stocks (maj des sorties seulement) ; est-ce qu'il me suffit pour cela de passer en commentaire cette ligne de code : 'Mise à jour du stock
MFC.Cells(Ligne, Colonne) = MFS.Cells(LigStock, Col_Stocks)
Où y'a t'il autre chose ?
merci
MFC.Cells(Ligne, Colonne) = MFS.Cells(LigStock, Col_Stocks)
Où y'a t'il autre chose ?
merci
Bonjour,
Avez-vous besoin d'infos pour le fichier de prévisions ? merci
Avez-vous besoin d'infos pour le fichier de prévisions ? merci
Bonjour,
Pour quand pensez-vous que vous puissiez le faire ? merci beaucoup
Pour quand pensez-vous que vous puissiez le faire ? merci beaucoup
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour,
Je suis en train de construire un cadencier mais je n'arrive pas à mettre les mises en formes sur plusieurs cellules ? lorsque je sélectionne toutes les plages cellules que je veux en mettant appliquant ça s'efface tout seul.
Sur les cases stocks à partir du 8 juin pour les cellules <0 Fond rouge écriture en blanc.
Sur les cases A à partir du 8 juin ;
Valeur =0 fond blanc ; valeur = 1 fond rouge clair ; valeur = 2 fond jaune clair.
Voici l'ensemble des cellules :
Pour stock :
=$DU$5:$DU$750;$EA$5:$EA$750;$EG$5:$EG$750;$EM$5:$EM$750;$ES$5:$ES$750;$EY$5:$EY$750;$FE$5:$FE$750;$FK$5:$FK$750;$FQ$5:$FQ$750;$FW$5:$FW$750;$GC$5:$GC$750;$GI$5:$GI$750;$GO$5:$GO$750;$GU$5:$GU$750;$HA$5:$HA$750;$HG$5:$HG$750;$HM$5:$HM$750;$HS$5:$HS$750;$HY$5:$HY$750;$IE$5:$IE$750;$IK$5:$IK$750;$IQ$5:$IQ$750;$IW$5:$IW$750;$JC$5:$JC$750;$JI$5:$JI$750;$JO$5:$JO$750;$JU$5:$JU$750;$KA$5:$KA$750;$KG$5:$KG$750;$KM$5:$KM$750;$KS$5:$KS$750;$KY$5:$KY$750;$LE$5:$LE$750;$LK$5:$LK$750;$LQ$5:$LQ$750;$LW$5:$LW$750;$MC$5:$MC$750;$MI$5:$MI$750;$MO$5:$MO$750;$MU$5:$MU$750;$NA$5:$NA$750;$NG$5:$NG$750;
Pour A :
=$DV$5:$DV$750;$EB$5:$EB$750;$EH$5:$EH$750;$EN$5:$EN$750;$ET$5:$ET$750;$EZ$5:$EZ$750;$FF$5:$FF$750;$FL$5:$FL$750;$FR$5:$FR$750;$FX$5:$FX$750;$GD$5:$GD$750;$GJ$5:$GJ$750;$GP$5:$GP$750;$GV$5:$GV$750;$HB$5:$HB$750;$HH$5:$HH$750;$HN$5:$HN$750;$HT$5:$HT$750;$HZ$5:$HZ$750;$IF$5:$IF$750;$IL$5:$IL$750;$IR$5:$IR$750;$IX$5:$IX$750;$JD$5:$JD$750;$JJ$5:$JJ$750;$JP$5:$JP$750;$JV$5:$JV$750;$KB$5:$KB$750;$KH$5:$KH$750;$KN$5:$KN$750;$KT$5:$KT$750;$KZ$5:$KZ$750;$LF$5:$LF$750;$LL$5:$LL$750;$LX$5:$LX$750;$MD$5:$MD$750;$MJ$5:$MJ$750;$MP$5:$MP$750;$MV$5:$MV$750;$NB$5:$NB$750;$NH$5:$NH$750;
PS : j'ai mis jusque ligne 750 pour éviter qu'il n'aille cherche toutes les lignes de la colonne..
Pouvez-vous voir svp : https://www.cjoint.com/c/EFxhAJ4FjXm
merci
Je suis en train de construire un cadencier mais je n'arrive pas à mettre les mises en formes sur plusieurs cellules ? lorsque je sélectionne toutes les plages cellules que je veux en mettant appliquant ça s'efface tout seul.
Sur les cases stocks à partir du 8 juin pour les cellules <0 Fond rouge écriture en blanc.
Sur les cases A à partir du 8 juin ;
Valeur =0 fond blanc ; valeur = 1 fond rouge clair ; valeur = 2 fond jaune clair.
Voici l'ensemble des cellules :
Pour stock :
=$DU$5:$DU$750;$EA$5:$EA$750;$EG$5:$EG$750;$EM$5:$EM$750;$ES$5:$ES$750;$EY$5:$EY$750;$FE$5:$FE$750;$FK$5:$FK$750;$FQ$5:$FQ$750;$FW$5:$FW$750;$GC$5:$GC$750;$GI$5:$GI$750;$GO$5:$GO$750;$GU$5:$GU$750;$HA$5:$HA$750;$HG$5:$HG$750;$HM$5:$HM$750;$HS$5:$HS$750;$HY$5:$HY$750;$IE$5:$IE$750;$IK$5:$IK$750;$IQ$5:$IQ$750;$IW$5:$IW$750;$JC$5:$JC$750;$JI$5:$JI$750;$JO$5:$JO$750;$JU$5:$JU$750;$KA$5:$KA$750;$KG$5:$KG$750;$KM$5:$KM$750;$KS$5:$KS$750;$KY$5:$KY$750;$LE$5:$LE$750;$LK$5:$LK$750;$LQ$5:$LQ$750;$LW$5:$LW$750;$MC$5:$MC$750;$MI$5:$MI$750;$MO$5:$MO$750;$MU$5:$MU$750;$NA$5:$NA$750;$NG$5:$NG$750;
Pour A :
=$DV$5:$DV$750;$EB$5:$EB$750;$EH$5:$EH$750;$EN$5:$EN$750;$ET$5:$ET$750;$EZ$5:$EZ$750;$FF$5:$FF$750;$FL$5:$FL$750;$FR$5:$FR$750;$FX$5:$FX$750;$GD$5:$GD$750;$GJ$5:$GJ$750;$GP$5:$GP$750;$GV$5:$GV$750;$HB$5:$HB$750;$HH$5:$HH$750;$HN$5:$HN$750;$HT$5:$HT$750;$HZ$5:$HZ$750;$IF$5:$IF$750;$IL$5:$IL$750;$IR$5:$IR$750;$IX$5:$IX$750;$JD$5:$JD$750;$JJ$5:$JJ$750;$JP$5:$JP$750;$JV$5:$JV$750;$KB$5:$KB$750;$KH$5:$KH$750;$KN$5:$KN$750;$KT$5:$KT$750;$KZ$5:$KZ$750;$LF$5:$LF$750;$LL$5:$LL$750;$LX$5:$LX$750;$MD$5:$MD$750;$MJ$5:$MJ$750;$MP$5:$MP$750;$MV$5:$MV$750;$NB$5:$NB$750;$NH$5:$NH$750;
PS : j'ai mis jusque ligne 750 pour éviter qu'il n'aille cherche toutes les lignes de la colonne..
Pouvez-vous voir svp : https://www.cjoint.com/c/EFxhAJ4FjXm
merci
Re,
Pouvez-vous m'expliquer ce que fait la macro en détail pour ce fichier de prévision ? Je viens de faire les calculs avec ce fichier et l'ancien pour les 3 semaines précédentes et je n'obtiens pas les mêmes chiffres... je ne sais pas à qui me fier !
Et dans la colonne H nombre de jours glissant j'obtiens des valeurs jusque 12 ? normalement je devrai avoir de 0 à 6 car c'est sur une semaine (sans dimanche).
merci
Pouvez-vous m'expliquer ce que fait la macro en détail pour ce fichier de prévision ? Je viens de faire les calculs avec ce fichier et l'ancien pour les 3 semaines précédentes et je n'obtiens pas les mêmes chiffres... je ne sais pas à qui me fier !
Et dans la colonne H nombre de jours glissant j'obtiens des valeurs jusque 12 ? normalement je devrai avoir de 0 à 6 car c'est sur une semaine (sans dimanche).
merci
Re,
Pouvez-vous m'expliquer ce que fait la macro en détail pour ce fichier de prévision ? Le programme ne fait que ce que vos formules faisaient avant, ni plus, ni moins pour la colonne prevision
Et dans la colonne H nombre de jours glissant Ca c'est toujours fait avec vos formules, comme je vous l'ai ecrit ici f894009 - 22 juin 2015 à 08:31
Kivanc 23 juin 2015 à 09:29 Je regarde a faire une macro pour ecrire les MFC
Pouvez-vous m'expliquer ce que fait la macro en détail pour ce fichier de prévision ? Le programme ne fait que ce que vos formules faisaient avant, ni plus, ni moins pour la colonne prevision
Et dans la colonne H nombre de jours glissant Ca c'est toujours fait avec vos formules, comme je vous l'ai ecrit ici f894009 - 22 juin 2015 à 08:31
Kivanc 23 juin 2015 à 09:29 Je regarde a faire une macro pour ecrire les MFC
Bonjour,
Gros problème aujourd'hui : nous avons changé l'extraction pour les stock et sorties mais j'ai bien veillé à nommer les colonnes comme sur l'ancienne : code entrepot, commentaire, SUM( [FLDC-Qté unites] ),ARTI -Code IFLS et ST Qte saisie.
Mais ça ne fonctionne pas !! erreur 400 ou incompatibilité de type... alors qu'avec une ancienne extraction c ok...
Pouvez-vous voir SVP.
https://www.cjoint.com/c/EFyqIsw2ROm
MERCI beaucoup
Gros problème aujourd'hui : nous avons changé l'extraction pour les stock et sorties mais j'ai bien veillé à nommer les colonnes comme sur l'ancienne : code entrepot, commentaire, SUM( [FLDC-Qté unites] ),ARTI -Code IFLS et ST Qte saisie.
Mais ça ne fonctionne pas !! erreur 400 ou incompatibilité de type... alors qu'avec une ancienne extraction c ok...
Pouvez-vous voir SVP.
https://www.cjoint.com/c/EFyqIsw2ROm
MERCI beaucoup
Bonjour,
Vous avez demande a ce que le nom de feuille se mette automatiquement au lieu de le mettre manuellement, je vous ai ecrit de faire attention au nom de feuille et dans le fichier 1150624.xlsx le nom de feuille est: 1150624new2 et je vois que le code qui doit faire cette mise a jour n'est pas dans ce fichier !!!!!!!
Pour le reste, je regarde
Vous avez demande a ce que le nom de feuille se mette automatiquement au lieu de le mettre manuellement, je vous ai ecrit de faire attention au nom de feuille et dans le fichier 1150624.xlsx le nom de feuille est: 1150624new2 et je vois que le code qui doit faire cette mise a jour n'est pas dans ce fichier !!!!!!!
Pour le reste, je regarde
Re,
Apres mise a jour des differentes modifs faites depuis quelque(s) temps , j'ai une erreur incompatibilite de type liee a des cellules vides pour le calcul des prevision a x jours a cette ligne
Je vais ajouter un test si cellule est numerique
Apres mise a jour des differentes modifs faites depuis quelque(s) temps , j'ai une erreur incompatibilite de type liee a des cellules vides pour le calcul des prevision a x jours a cette ligne
Somme_Ref = Somme_Ref + MFC.Cells(Ligne_Ref, Colonne)
Je vais ajouter un test si cellule est numerique
Re,
Ai trouve, nombre de colonnes fichier 1150624.xlsx +2 par rapport aux autres fichier du meme type. Dans le code, pour minimiser le temps d'execution, j'avais mis 14 pour le nombre de colonnes du dit fichier. J'ai remplace par derniere colonne utilisee dans
fichier modifie y compris le code pour supprimer l'onglet old_parametres (parametres)
https://www.cjoint.com/c/EFzhTbT5wIf
Ai trouve, nombre de colonnes fichier 1150624.xlsx +2 par rapport aux autres fichier du meme type. Dans le code, pour minimiser le temps d'execution, j'avais mis 14 pour le nombre de colonnes du dit fichier. J'ai remplace par derniere colonne utilisee dans
Sub MaJ_Cadencier_Prevision(MFM As Worksheet)
dercol = MFS.Cells.Find("*", , , , xlByColumns, xlPrevious).Column
For Colonne = 1 To dercol
fichier modifie y compris le code pour supprimer l'onglet old_parametres (parametres)
https://www.cjoint.com/c/EFzhTbT5wIf
MERCI bcp !! ça a l'air de fonctionner
Autre question svp : il me semblait que la macro prenait bien en compte la sensibilité pour le calcul des prévisions. Or, parfois des articles n'ont pas de sensibilité et le calcul de la prév se fait correctement ? comment se fait-il ?
Autre question svp : il me semblait que la macro prenait bien en compte la sensibilité pour le calcul des prévisions. Or, parfois des articles n'ont pas de sensibilité et le calcul de la prév se fait correctement ? comment se fait-il ?
Re,
C'est tout a fait normal et ecrit d'origine dans le code de le fonction:
C'est tout a fait normal et ecrit d'origine dans le code de le fonction:
Function Alerte_Stock(
'Pour récupérer le stock, la marge supérieure et la marge inférieure (Parametre_sensibilite, Sensibilite, Valeurs_stock_marges
'Si on ne trouve pas de valeur ou pas de valeur cohérente pour la sensibilité, on considère la sensilité à "Normal"
If Sensibilite <> "SOLIDE" And Sensibilite <> "NORMAUX" And Sensibilite <> "SENSIBLES" Then
Sensibilite = "NORMAUX"
End If
Le bouton des Entrées ne fonctionne pas !!!
Erreur : "l'indice n'appartient pas à la sélction"
Erreur : "l'indice n'appartient pas à la sélction"
Re,
Le fait d'avoir renommer l'onglet parametres a mis en evidence des lignes de code qui sont inutiles dans
fichier modifie: https://www.cjoint.com/c/EFzlVJwq5Kf
Le fait d'avoir renommer l'onglet parametres a mis en evidence des lignes de code qui sont inutiles dans
Sub MaJ_Cadencier_Commande(MFM As Worksheet)
fichier modifie: https://www.cjoint.com/c/EFzlVJwq5Kf
Voici : https://www.cjoint.com/c/EFzmzawlkTn
1150625 : fichiers stocks et sorties
Et 1150625AP : fichier entrées
1150625 : fichiers stocks et sorties
Et 1150625AP : fichier entrées
Re,
vous avez un probleme avec votre logiciel d'extaction pour le fichier stocks et sortie: entete de colonne
CASE WHEN EUEDREP,[ST Modification stock O/N] = ' ' THEN EUEDREP,[ST Qte stock] ELSE EUEDREP,[ST Qte saisie] END
a la place de ST Qte saisie
vous avez un probleme avec votre logiciel d'extaction pour le fichier stocks et sortie: entete de colonne
CASE WHEN EUEDREP,[ST Modification stock O/N] = ' ' THEN EUEDREP,[ST Qte stock] ELSE EUEDREP,[ST Qte saisie] END
a la place de ST Qte saisie
oui désolée je vous ai envoyé le mauvais fichier stocks on a réglé le pb : https://www.cjoint.com/c/EFzmR25w1Hn
Bonjour,
J'ai un nouveau besoin au niveau de la macro : il faudrait que le bouton Entrées mette à jour à la fois la colonne CMD du jour et la colonne CMD de J+1.
Aujourd'hui il y'a plusieurs problèmes :
1. Nous avons actuellement 2 extractions pour ces données (et nous ne pouvons pas nommer la colonne de la même façon pour les CMD j et les CMD à J+1)
2. Le vendredi après-midi les données CMD J+1 donc samedi et de J+2 lundi doivent être mises à jour ...
Donc pensez-vous que l'on puisse mettre à jour le J+1 en même temps que le jour J avec le bouton entrées avec 2 requêtes différentes ? ou faut-il absolument qu'il n'y ait qu'une requête avec des colonnes différentes pour CMD J et CMD J+1 ?
Ou est-ce qu'on est obligé de créer un autre bouton ?
Merci
J'ai un nouveau besoin au niveau de la macro : il faudrait que le bouton Entrées mette à jour à la fois la colonne CMD du jour et la colonne CMD de J+1.
Aujourd'hui il y'a plusieurs problèmes :
1. Nous avons actuellement 2 extractions pour ces données (et nous ne pouvons pas nommer la colonne de la même façon pour les CMD j et les CMD à J+1)
2. Le vendredi après-midi les données CMD J+1 donc samedi et de J+2 lundi doivent être mises à jour ...
Donc pensez-vous que l'on puisse mettre à jour le J+1 en même temps que le jour J avec le bouton entrées avec 2 requêtes différentes ? ou faut-il absolument qu'il n'y ait qu'une requête avec des colonnes différentes pour CMD J et CMD J+1 ?
Ou est-ce qu'on est obligé de créer un autre bouton ?
Merci
Voici le fichier : https://www.cjoint.com/c/EFDmSkXQQMM
il s'agit de l'avant dernière colonne
merci
il s'agit de l'avant dernière colonne
merci
Re,
1/ il faut ajouter le code pour prendre en compte le fichier pour J+1
2/ il faut le code pour ecrire au bon endroit les commandes J+1 en fonction de la date selectionnee et si c'est a J+1 ou J+2
Avec le programma actuel (d'origine) il n'y a aucun test sur la date du jour pour savoir quel jour de la semaine est-ce !!!!!!!!!!!
1/ il faut ajouter le code pour prendre en compte le fichier pour J+1
2/ il faut le code pour ecrire au bon endroit les commandes J+1 en fonction de la date selectionnee et si c'est a J+1 ou J+2
Avec le programma actuel (d'origine) il n'y a aucun test sur la date du jour pour savoir quel jour de la semaine est-ce !!!!!!!!!!!
Oui, non