Rajout de lignes sur conditions

  • Initiateur de la discussion Initiateur de la discussion pepparkakor
  • 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 !

P

pepparkakor

Guest
Bonjour,
Dans le fichier ci-joint j'ai pour le moment une ligne par client (cf onglet fichier brut).
Je voudrais arriver à un fichier où dès que j'ai plusieurs invités pour un client, des lignes clients se rajoutent pour n'avoir plus qu'une seule colonne invité et les invités en dessous les uns des autres (cf onglet fichier final)
Suis-je obligée de passer par une macro et si oui avez-vous des pistes à me suggérer, je débute dans ce domaine...
Merci d'avance,
 

Pièces jointes

Re : Rajout de lignes sur conditions

Bonjour,

Une solution par macro, qui peut se lancer par le bouton de la feuille "fichier final" ou par les touches Ctrl+A :

Code:
Sub InsérerLignes() 'Peut se lancer par Ctrl+A
Dim i As Long, n As Byte, j As Byte
Application.ScreenUpdating = False
Sheets("fichier final").Activate
[1:65000].Delete
Sheets("fichier brut").Cells.Copy [A1]
For i = [D65000].End(xlUp).Row To 2 Step -1
  n = Application.CountA(Cells(i, 11).Resize(, 246)) 'nombre d'invités - 1
  For j = 1 To n 'insertion de n lignes
    Rows(i).Copy
    Rows(i + 1).Insert
    Cells(i + 1, 10) = Cells(i, 11 + n - j) 'noms des invités
  Next
Next
[J1] = "Invité"
[K:L].Delete
End Sub

A+
 

Pièces jointes

Dernière édition:
Re : Rajout de lignes sur conditions

Re,

Désolé mais je ne vois pas le rapport entre la feuille "problème" et le résultat souhaité.

Il semble que cela n'ait plus rien à voir avec le problème initial du fil.

Il vaut mieux, à mon avis, en rester là.

Bon courage.

A+
 
Re : Rajout de lignes sur conditions

Re,

je ne comprend pas pourquoi tu trouve qu'il n'y à plus de rapport.
En feuille problème il y a plusieurs chiffres par ligne et en feuille problème chaque numéro envoi à une machine
Je pense qu'on se trouve dans une situation similaire à celle des clients (premier post) mais vu que je n'y mi connais pas en vba je n'arrive pas à le modifier
a+

QUOTE=job75;745575]Re,

Désolé mais je ne vois pas le rapport entre la feuille "problème" et le résultat souhaité.

Il semble que cela n'ait plus rien à voir avec le problème initial du fil.

Il vaut mieux, à mon avis, en rester là.

Bon courage.

A+[/QUOTE]
 

Pièces jointes

Re : Rajout de lignes sur conditions

Bonjour,

est ce que quelqu'un comprend ce que je veut faire?
C'est difficile à expliquer et je pensais que mon tableau était clair mais je voit que ce n'est peut être pas le cas donc si quelqu'un à une idée je pourrais essayer de réexpliqué

bisous
 
Re : Rajout de lignes sur conditions

Bonjour,

est ce que quelqu'un comprend ce que je veut faire?
C'est difficile à expliquer et je pensais que mon tableau était clair mais je voit que ce n'est peut être pas le cas donc si quelqu'un à une idée je pourrais essayer de réexpliqué

bisous
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

F
Réponses
9
Affichages
2 K
G
Réponses
2
Affichages
2 K
Retour