Macro : ajouter des lignes et déplacer des données Résolu/Fermé

Question

Bonjour, 

Ci-joint un tableau avec sur les 7 premières lignes mon tableau excel de départ ; et à partir de la ligne 10 le tableau que je veux obtenir.

En gros, j'ai une base de données salariés avec sur 1 seule ligne toutes les informations d'un salarié.
Afin de réaliser un import dans un SIRH, je dois obtenir 1 ligne pour chaque données d'un collaborateur.
Il faudrait donc pour voir ajouter dès que l matricule change; autant de ligne qu'il y a de données, et en plus ajouter le nom des champs des colonnes en face des données concernées.

J'espère avoir été claire :).

Merci pour votre solution si vous en avez une :)

Configuration: Windows / Edge 101.0.1210.39

via55 · Answer

Bonjour

Il a forcément une solution par macro en VBA
Pour cela il nous faut le fichier pas son image
Poster l'exemple du fichier sur cjoint.com (ne pas choisir la durée illimité car ça bug), faire créer un lien, le copier et revenir le coller ici dans un prochain message

Cdlmnt
Via

KatleenR · Answer

Bonjour,

Voici le fichier. entre temps pas mal de choses ont changé, je dois ajouter des colonnes également

https://www.cjoint.com/c/LEymWu5mFTG

ccm81 · Answer

Bonjour à tous les deux

à tester
 https://www.cjoint.com/c/LEyoq6FJamB

Cdlmnt

KatleenR · Answer

Bonjour @ccm81,

Génial ta Macro.
En revanche ça ne fonctionne pas si on a 300 ligne :)

ccm81 · Answer

ça ne fonctionne pas si on a 300 ligne 
mais si ;-()
Tu supprimes la ligne lifin = 7 et ça ira jusqu'à la dernière ligne renseignée colonne 1
Public Sub ok()
Dim li As Long, lifin As Long
lifin = Cells(Rows.Count, 1).End(xlUp).Row
lifin = 7
For li = lidebFBD To lifin
  Call Transfert(li)
Next li
End Sub
Cdlmnt

KatleenR · Answer

Ca marche!!
Merci beaucoup!!! c'est vraiment top!!

ccm81 · Answer

De rien

Si c'est fini, peux tu mettre le sujet à résolu (en haut dans ton premier message > les trois petits points)

Cdlmnt

via55 · Answer

Bonjour

Voilà une possibilité par macro - explications dans le fichier
https://www.cjoint.com/c/LEyq7SfU6Ye

Macro : ajouter des lignes et déplacer des données

8 réponses

Discussions similaires