Insertion d'une ligne automatique dans Excel Fermé

Question

Bonjour, 

Je voulais savoir comment je pouvais insérer une ligne automatiquement à chaque fois que le numéro client change dans la colonne B.

Exemple

Colonne A Colonne B Colonne C
                 45
                 45
                 45
                 45          <- Insertion d'une ligne en dessous
                 46         
                 46
                 46          <- Insertion d'une ligne en dessous
                 47          <- Insertion d'une ligne en dessous
                 48

Et il y a 76 000 lignes


Merci par avance pour l'attention que vous porterez à ma demande 



Configuration: Windows XP / Internet Explorer 6.0

Raymond PENTIER · Answer

Bonjour.

1) Dès qu'apparaît le mot "automatiquement" dans une question, la réponse passe obligatoirement par "macro" ; as-tu quelque connaissance en VBA ?

2) Quand tu ajoutes une ligne, celle-ci reste-telle vierge ou doit-t-elle porter un N° client ? Si oui, le N° précédent ou le prochain N° ?

gbinforme · Answer

bonjour US.AL, Raymond, Comme le dit justement Raymond tu ne peux pas insérer de ligne par formule donc je te propose cette macro qui peux le faire et que tu peux relancer : Public Sub insère_ligne() Dim lig As Long Application.ScreenUpdating = False For lig = ActiveSheet.Cells(Columns(1).Cells.Count, 2).End(xlUp).Row To 2 Step -1 If Cells(lig, 2).Value <> Cells(lig + 1, 2).Value _ And Cells(lig + 1, 2).Value <> "" _ And Cells(lig, 2).Value <> "" Then Rows(lig + 1).Insert End If Next lig End Sub Tu as une petite explication pour insérer cette macro.

Raymond PENTIER · Answer

Si je rapproche ton fichier de tes explications initiales, cela signifie qu'Excel devrait insérer une ligne après toutes les lignes actuelles (sauf la ligne 25) ? En effet tu as précisé "à chaque fois que le numéro client change dans la colonne B" ...
Et ton fichier exemple passerait brutalement de 27 à 52 lignes ! 
Tu es sûr que c'est ce que tu veux ?

gbinforme · Answer

Bonjour Raymond,

Tu as raison de préciser que le classeur test ne correspond pas aux explications initiales mais US.AL ne doit pas se rendre compte de l'importance des précisions à apporter pour avoir le résultat escompté.

Bonne fête en Guadeloupe.

Bonjour  US.AL,

Comme ton classeur test ne parait pas très rigoureux, j'ai inséré une colonne pour retrouver le numéro client dans la colonne B.

La formule insérée en colonne D ne fonctionne bien sûr qu'en colonne D avec les valeurs affichées en colonne C : à toi d'adapter ces colonnes dans la macro à ton classeur.

Il suffit de cliquer sur le bouton (après autorisation des macros) pour voir le résultat sur ton classeur :

http://www.cijoint.fr/cjlink.php?file=cj201107/cijQktvq8S.xlsm

Je n'ai fait qu'une insertion sur les premières colonnes pour que tu puisses comparer le résultat mais je t'ai laissé le code pour insérer la ligne complète en la mettant en commentaire.

Si tu n'arrives pas à adapter à ton classeur, fourni un exemple tout à fait exact.

CG · Answer

Bonjour à tous,

J'arrive après la guerre mais ma requête est similaire à ce poste.
Dans le détail je voudrais comparer deux feuilles avec des données et quand cette donnée n'existe pas d'insérer une ligne avec celle-ci ou le cas ou je ne trouve pas cette donnée de la laissé.
Je pense que ce n'est clair c'est pourquoi je vous joins un document pour que cela soit plus explicite :  http://www.cjoint.com/c/EJEnNIsBC0Z
Feuille1 colonne A : mes données (base)
Feuille2 colonne B : mes données à identifier (export)

Si A1 (feuille1) est trouvé en colonne B:B (feuille2) alors mise à jour des données
Si A1 (feuille1) n'est pas trouvé en B:B (feuille2) alors insertion d'une ligne en feuille1 après la dernière ligne A rempli du mois
Si B1 (feuille2) n'est pas trouvé en colonne A:A (feuille1) alors mise à 0 des données

Dur à expliquer, donc si ce n'est compréhensible n'hésitez pas à me demander.
Par avance, merci des retours que vous pourrez faire sur le sujet.
Bon courage et bonne journée.
Bien à vous,
CG

Insertion d'une ligne automatique dans Excel

5 réponses

Discussions similaires