Macro pour créer dossier jour et enregistrer dans ce dossier

bambi

XLDnaute Occasionnel
Bonjour à tous :)

J'ai une macro qui me permet d'exporter tableau et graphique en un clic
Dans cette macro, j'ai spécifié le dossier d'enregistrement
Mais j'aurais aimé créer à chaque fois un dossier avec la date du jour et enregistrer dans ce dossier du jour
Même chose avec la date de la veille

Je met un petit fichier modèle avec un tableau, un graphique et ma macro simplifiée
(via un clic sur le petit appareil photo)

Merci de votre aide ;)
 

Pièces jointes

  • bambi.xlsm
    22.6 KB · Affichages: 49
Solution
Je me réponds puisque je viens de trouver et d'adapter la solution
En résumé, pour que cela fonctionne avec Excel 2016, il faut utiliser une commande .Activate avant de coller l'image
Par contre, cela bloque l'exportation des graphiques
Mais si on met le code pour exporter les graphiques avant celui des ranges, tout fonctionne :)
Je poste le fichier (solution donnée par Lone-Wolf ;)) en version adaptée pour Excel 2016

Lone-wolf

XLDnaute Barbatruc
Bonjour Bambi :)

ton fichier en retour. J'éspère que la macro est fonctionnelle vu que tu es sous Excel 2007.

EDIT: qu'est-ce que tu entends par : "même chose avec la date de la veille" ?? :rolleyes:

Avec la macro tu vas créer un dossier nommé 20 mai 2018, alors pourquoi un dossier 19 mai 2018?? :rolleyes:
 

Pièces jointes

  • bambi.xlsm
    23.4 KB · Affichages: 59
Dernière édition:

bambi

XLDnaute Occasionnel
Merci Lone-Wolf, c'est top et ça fonctionne parfaitement :)
Je vais faire quelques adaptations pour mon fichier final et ce sera parfait

Pour la date de la veille, c'est simplement que je voulais me laisser les deux possibilités d'enregistrement si j'ai un jour de retard
Mais dans deux macros différentes

T’embêtes pas avec ça, ça n'a pas beaucoup d'importance
Ce que tu as fait me convient parfaitement
Encore un grand merci d'avoir pris du temps pour me répondre
Bonne soirée ;)
 

bambi

XLDnaute Occasionnel
Un petit up pour Lone-Wolf ou pour un autre membre ;)

J'ai adapté la macro de Lone-Wolf ci-dessus:
- Pour choisir mon dossier d'exportation
- Pour exporter plusieurs graphiques depuis la même feuille

Mais je cherche également à exporter plusieurs ranges (tableau) depuis la même feuille
Et là, je ne trouve pas comment faire.

Si quelqu'un à une suggestion à partir de la macro de Lone-Wolf ...ou autre

Merci d'avance :)
 

bambi

XLDnaute Occasionnel
Merci à tous les deux pour vos réponses

Désolée stapple d'avoir lancé un nouveau sujet.
J'avais cherché (et trouvé) sur le forum
Mais je n'avais absolument pas compris comment adapter à mon classeur les différentes propositions (dont la tienne)
Je vais m'y pencher de nouveau mais mes capacités en VBA sont limitées :oops:

Pour répondre à Lone-Wolf, sur mon classeur final j'ai un total de 5 ranges et 3 graphiques
Je prépare un modèle car je ne peux pas poster l'original
 
Dernière édition:

Staple1600

XLDnaute Barbatruc
Re

@bambi
Il n'y pas mort d'homme ;)
Mais si le demandeur ne précise pas qu'il a fait des recherches au préalable, nous ne sommes pas censés le savoir, non ?

Et comme souligné par Lone-Wolf
Quels sont les ranges à exporter? Sur quelles feuilles
Et ou? (dans quel dossier)
 

bambi

XLDnaute Occasionnel
Pas de souci Staple, c'est toi qui as raison :)

Voici ce que j'ai actuellement, 5 ranges et 3 graphiques
Je les exporte via la macro "export_images" du fichier joint dans un dossier "Kit"
mais cela ne va pas car cela écrase systématiquement les images précédemment exportées

Je voulais donc créer à chaque export un dossier avec la date du jour

Lone-Wolf a répondu à ma demande mais je n'arrive pas à l'appliquer correctement à mon fichier

J'aurais du le poster dès le départ
Donc le voici

:)
 

Pièces jointes

  • bambi2.xlsm
    32 KB · Affichages: 28
Dernière édition:

bambi

XLDnaute Occasionnel
Encore un très grand merci Lone-wolf pour le temps passé
Non seulement c'est parfait.
Mais cette fois, je crois que je comprends tout ton code et que je serais capable de l'adapter si besoin
Vraiment un énorme merci
Très bonne journée à toi ;)
 

bambi

XLDnaute Occasionnel
Bonjour à tous, :)
Je fais un petit up sur mon propre message pour évoquer un petit souci avec la macro ci-dessus , message #11 de Lone-wolf
Je l'ai adaptée sans souci à mon fichier et elle a toujours fonctionné parfaitement
Mais je viens de passer d'Excel 2007 à Excel 2016
Et là, problème !! Les ranges qui sont exportés en images génèrent tous des images blanches
Aucun souci avec l'exportation des graphiques. Seuls les ranges sont blancs.
Le problème est évoqué par endroit sur le net mais je n'ai pas trouvé de solution
Donc je préfère vous soumettre le problème. Merci d'avance de vos idées ;)
Je ne poste pas de fichier, il est déjà dans le message de Lone-Wolf
Par contre voici une image du résultat de l'exportation avec les images blanches des ranges
 
Dernière édition:

bambi

XLDnaute Occasionnel
Je me réponds puisque je viens de trouver et d'adapter la solution
En résumé, pour que cela fonctionne avec Excel 2016, il faut utiliser une commande .Activate avant de coller l'image
Par contre, cela bloque l'exportation des graphiques
Mais si on met le code pour exporter les graphiques avant celui des ranges, tout fonctionne :)
Je poste le fichier (solution donnée par Lone-Wolf ;)) en version adaptée pour Excel 2016
 

Pièces jointes

  • bambi.xlsm
    33.4 KB · Affichages: 25
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 941
Membres
101 846
dernier inscrit
Silhabib