Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Découper un fichier en plusieurs fichiers

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion nat54
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

nat54

XLDnaute Barbatruc
Bonjour,

J'aimerai pouvoir découper l'onglet base, selon l'onglet param, en s'arrêtant à la colonne W.

Dans ce fichier test on obtiendrait donc 3 fichiers avec 2 lignes complétées dans chaque fichier

Je souhaiterai que le fichier soit nommé ainsi
AAAA-MM-JJ_nom avec AAA-MM-JJ selon la date de l'envoi de la macro
exemple : 2025-10-22_RES 1.xlsx

Pourriez-vous m'aider ?

Merci d'avance,

J'ai commencé mais je ne sais pas comment sélectionner la plage

Code: 
Sub Créer_fichiers()

Application.ScreenUpdating = False 'ne pas voir ce qui se passe à l'écran, diminue besoin mémoire

For lgn = 1 To 12 'pour boucler sur les lignes 1 à 12

Sheets("param").Select 'on se place sur la feuille de référence

indic = Cells(lgn, 1).Value 'on variabilise, indic = cellule ligne de la boucle, colonne 1

Sheets("base").Select ''on se place sur la feuille où se trouve la BD

Next lgn ' on continue sur 2nd, 3èm.. indicateur (boucle)

Application.ScreenUpdating = True

End Sub


Dans un 2ème temps j'aimerai bien voir comment gérer un envoi par mail
Un fichier = un destinataire
Mais ça c'est facultatif, ce serait la cerise sur le gâteau
 

Pièces jointes

Solution
Bonjour à tous😃,
Et pourquoi pas ma pomme? Ma p'tite version...

Sur la feuille "param":
  • dans la cellule F2, indiquer le dossier de sauvegarde des fichiers ventilés par unité de gestion
  • dans la cellule F5, indiquer quelle option de sauvegarde on désire
  • cliquer sur le bouton bleu pour lancer la ventilation
  • le code est dans le module de la feuille "param"
Trier par date Trier par votes
nat54 à dit:
Il y a un hic car le fichier RES1 n'a pas de données, alors que RES2 et RES3 c'est bon.
Cliquez pour agrandir...
Tu ne fais même pas la différence entre "RES2", dont tu parles ici, et "RES 2" qui est dans ton classeur... 🤪

Tu ne sais pas quelles sont les trois données que tu as dans ton classeur et tu viens me reprocher de te filer une proposition bancale.
Spacoul 😢
 
Vote positif 0 Vote négatif
sylvanu à dit:
Bonjour tout le monde,
Franchement à labour, mais puisque c'est fait.
Voir PJ.
Les fichiers créés sont dans le même dossier que le fichier d'origine.
Cliquez pour agrandir...
Waouh c'est quasi parfait, énorme merci !

Il me reste 2 points :
- est-il possible de rapatrier les lignes 1-2 de la base param (surtout qu'il y a le total des postes budgétés et postes occupés, ô combien important pour les directeurs de site) ?
- quelle est la syntaxe pour indiquer le lieu de stockage des fichiers crées au lieu du même endroit
dans cette ligne de code
chemin = ThisWorkbook.Path & "\"
exemple : à stocker dans U:\RH-UG-SC

Merci à toi, c'est déjà génial !
Là c'est du peaufinage

ce sont des codes inventés (tu penses bien que nos sites ne s'appellent pas comme ça) donc oui je n'ai pas regardé que tu avais modifié un code fictif.
 
Dernière édition:
Vote positif 0 Vote négatif
Re,
Voir V2.
nat54 à dit:
est-il possible de rapatrier les lignes 1-2 de la base param (surtout qu'il y a le total des postes budgétés et postes occupés, ô combien important pour les directeurs de site) ?
Cliquez pour agrandir...
Fait
nat54 à dit:
quelle est la syntaxe pour indiquer le lieu de stockage des fichiers crées au lieu du même endroit
dans cette ligne de code
Cliquez pour agrandir...
Au lancement de la macro, on vous demandera dans quel dossier ranger les fichiers.
 

Pièces jointes

Vote positif 0 Vote négatif
Merci c'est top, quasi parfait 🙂

- tu as bien mis les 2 lignes en haut mais elles sont vides sans le contenu des lignes :d
- pourquoi ne pas enregistrer de suite dans le répertoire donné ? (ce sera toujours le même)
 
Vote positif 0 Vote négatif
nat54 à dit:
pourquoi ne pas enregistrer de suite dans le répertoire donné ? (ce sera toujours le même)
Cliquez pour agrandir...
Si le dossier est toujours le même, modifier la première ligne avec le bon emplacement sans oublier le "\" final :
VB: 
Public Const Chemin = "C:\Users\PC_PAPA\Desktop\XLD\" ' Ne pas oublier le "\" à la fin.
Voir PJ.
nat54 à dit:
tu as bien mis les 2 lignes en haut mais elles sont vides sans le contenu des lignes :d
Cliquez pour agrandir...
Je recopie intégralement les deux lignes avec leurs formules qui sont remises à jour pour chaque feuille.
Voulez vous que les formules exportées donne la même valeur que dans "base" c'est à dire les valeurs et non les formules ?
 

Pièces jointes

Vote positif 0 Vote négatif
Bonjour à tous😃,
Et pourquoi pas ma pomme? Ma p'tite version...

Sur la feuille "param":
  • dans la cellule F2, indiquer le dossier de sauvegarde des fichiers ventilés par unité de gestion
  • dans la cellule F5, indiquer quelle option de sauvegarde on désire
  • cliquer sur le bouton bleu pour lancer la ventilation
  • le code est dans le module de la feuille "param"
 

Pièces jointes

Vote positif 0 Vote négatif
Solution

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

J
  • Question Question
Microsoft 365 macro qui ouvre des fichiers excel de type "analyze in excel" généré par power bi et met à jour un filtre "mois" sur plusieurs tcd
Réponses
0
Affichages
558
JJ69
J
P
  • Question Question
XL 2019 Changer nom d'export en VBA
Réponses
3
Affichages
795
job75
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
519
Phil69970
  • Résolu(e)
XL 2010 Problème màj feuilles depuis fichiers CSV
2
Réponses
23
Affichages
3 K
cathodique
  • Résolu(e)
Autres Tests de diverses solution pour lister dans un dialog perso des fichiers en filtrant par expression et extension
10 11 12
Réponses
175
Affichages
21 K
patricktoulon
A
  • Résolu(e)
XL 2021 Céer un fichier (.text) avec VBA pour enregistrer les évènements dans un journal
Réponses
4
Affichages
662
arnoldbrice19
A
Vérifier la disponibilité d'un fichier généré en différé
Réponses
0
Affichages
340
Lu76Fer
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
825
Nel'
N
M
  • Question Question
Microsoft 365 Copier / coller avec mise en forme VBA
Réponses
0
Affichages
872
marie3107
M
L
  • Résolu(e)
Microsoft 365 Décompte via plusieurs fichiers CSV
Réponses
12
Affichages
782
WTF
  • Résolu(e)
Microsoft 365 Vba : Transférer des données d'un tableau dans un autre fichier
Réponses
7
Affichages
740
Chaton77
  • Question Question
XL 2016 conservation du format de la date
Réponses
3
Affichages
629
Dranreb
D
  • Question Question
Microsoft 365 Couper Coller Fichiers en VBA
Réponses
3
Affichages
877
patricktoulon
A
  • Question Question
XL 2016 Boucle sur sous répertoire fso.GetFolder SharePoint
Réponses
0
Affichages
950
Aldonanou
A
Q
  • Résolu(e)
Microsoft 365 Exécutions directes différentes vs "pas à pas"
Réponses
2
Affichages
594
Quentin2106
Q
  • Résolu(e)
XL 2019 Aide pour un module d'archivage de feuille en pdf dans répertoire
Réponses
5
Affichages
955
Nico2978
D
  • Question Question
Microsoft 365 Cas réel - avec problème complexe sur de la prevision de match en evitant les doublons
Réponses
1
Affichages
875
Dock91
D
EXCEL :: Exporter un onglet/plage de cellules dans un fichier PDF
Réponses
0
Affichages
595
oguruma
S
  • Résolu(e)
XL 2019 VBA Découper une feuille en plusieurs classeurs puis recompiler dans une même feuille
Réponses
3
Affichages
852
SOSjeBloque
S
A
  • Question Question
XL 2010 Date dans fichier pour impression pdf
Réponses
2
Affichages
1 K
Aldonanou
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…