Insertion d'une ligne automatique dans Excel

Fermé

US.AL Messages postés 4 Date d'inscription mardi 12 juillet 2011 Statut Membre Dernière intervention 13 juillet 2011 - 12 juil. 2011 à 21:36
CG - 30 oct. 2015 à 14:39

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

A voir également:

Ajout de ligne automatique dans un tableau excel
Tableau croisé dynamique - Guide
Aller à la ligne excel - Guide
Liste déroulante excel - Guide
Frédéric cherche à faire le buzz sur les réseaux sociaux. il a ajouté une image de manchots sur une image de plage. retrouvez l'image originale de la plage. que cachent les manchots ? ✓ - Forum Windows
Tableau ascii - Guide

5 réponses

Réponse 1 / 5

Raymond PENTIER Messages postés 58389 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 18 avril 2024 17 090
14 juil. 2011 à 00:37

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 ?

Réponse 2 / 5

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
14 juil. 2011 à 10:56

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.

Réponse 4 / 5

Raymond PENTIER Messages postés 58389 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 18 avril 2024 17 090
13 juil. 2011 à 06:17

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° ?

US.AL Messages postés 4 Date d'inscription mardi 12 juillet 2011 Statut Membre Dernière intervention 13 juillet 2011
13 juil. 2011 à 14:00

Dans un deuxième temps, j'aimerai effectivement insérer une formule dans une des colonnes à chaque fois qu'il y a une insertion de ligne automatique. Une formule du type " =min( ". Cette formule devra calculer le Chiffre minimum entre les lignes insérées automatiquement. Est-ce possible?

Réponse 5 / 5

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
13 juil. 2011 à 09:32

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.

US.AL Messages postés 4 Date d'inscription mardi 12 juillet 2011 Statut Membre Dernière intervention 13 juillet 2011
13 juil. 2011 à 14:02

Merci je vais voir ce que ça donne !! Si tu as une solution pour mon second problème énoncé ci-dessus en réponse à la question de Raymond.
Merci par avance.
Alain

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
13 juil. 2011 à 14:51

Dans ta question tu demandes l'insertion d'une ligne : cela sous entend une ligne vide.
Si tu veux mettre des données sur la ligne insérée c'est tout autre chose.

Si tu pouvais nous mettre un exemple de classeur, sans données identifiables et privées, mais avec la structure de tes données et ce que tu veux obtenir et dans quelles conditions sur http://www.cijoint.fr/ puis nous mettre le lien généré ici ce serait plus facile.

US.AL Messages postés 4 Date d'inscription mardi 12 juillet 2011 Statut Membre Dernière intervention 13 juillet 2011
13 juil. 2011 à 15:07

Bonjour,

Merci pour cette réponse rapide. Je dois avouer qu'il y a une certaine urgence sur ce dossier.
Ci dessous le lien :
http://www.cijoint.fr/cjlink.php?file=cj201107/cijVJUvGRV.xlsx

Pour rappel : Cela devra s'appliquer pour plus de 76000 lignes.

Rosa
21 oct. 2014 à 13:36

Bonjour,

La macro fonctionne très bien, mais je n'arrive pas à identifié l'endroit où on décide que la macro s'applique à la colonne B. Car je voudrais applique cette même macro mais a partir de ma colonne A.

Merci d'avance

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
21 oct. 2014 à 20:41

Bonjour Rosa,

La colonne B, c'est la colonne 2 et donc si tu remplaces 2 par 1 tu seras avec la colonne A.

Discussions similaires

Copier un tableau excel avec mise en forme !!

inverser les données d'une colonne sur excel

Centrer tout le tableau excel

Excel | Inverser axe X et Y dans graphique

Comment choisir l'abscisse et l'ordonnée dans Excel

comment supprimer le tableau et laisse le texte

Discussions similaires

Newsletters