Macro pour éclater des lignes dans fichiers

Hello,

Alors voici mon problème. Je dois créer une macro qui me permet d’éclater les lignes de mon fichiers en pleins de fichiers excel sous le principe suivant (voir PJ) :

  • Chaque fichier doit contenir un seul cas de test sans la ligne de titre. Les cas de tests sont les lignes jaunes+ les lignes blanches en dessous (jusqu’à la prochaine ligne jauneàà
  • Chaque fichier doit se nommer VDxxx (le xxx étant dans la colonne C de la ligne jaune)

Voilà je ne sais même pas si c’est faisable, je sèche complétement…

Merci infiniment pour votre aide !!

21test.xlsx (12.69 Ko)

Bonsoir,

Ci-joint une proposition à tester.

Quelques remarques ;

  • se base sur la couleur orange pour découper le fichier
  • ajouter une ligne de fin en orange
  • dans l'exemple donné, on a 2 fois le même nom dans la colonne C (pas normal : créera 2 fichiers avec le même nom ...)

Bonne soirée

Bouben

45eclaterlignes.xlsm (33.16 Ko)

Elle est top cette macro, j'avais bien avancé sur quelque chose mais c'était bcp plus compliqué...

Par contre comment changer le chemin derrière les codes du

srtyle sRepFinal = ThisWorkbook.Path & "\" & Format(Now, "YYMMDD-HHNNSS") & "\"

Car j'aurai aimé déplacer et renommer le fichier et je ne connais pas cette manip de chemin "caché derrière des codes"...

Merci d'avance et merci pour ton aide

Vanessa

c'est bon j'ai réussi à adapter, cette macro est juste géniale!!

Par hasard tu vis où? Car j'aimerai vraiment que quelqu'un me donne des cours...

Merci encore

Rechercher des sujets similaires à "macro eclater lignes fichiers"