Insertion de ligne

Fermé

acfb Messages postés 2 Date d'inscription jeudi 25 juin 2009 Statut Membre Dernière intervention 25 juin 2009 - 25 juin 2009 à 14:22
Darkito Messages postés 1191 Date d'inscription vendredi 7 décembre 2007 Statut Membre Dernière intervention 26 mai 2010 - 25 juin 2009 à 15:13

Bonjour,
J'ai un fichier excel comprenant plusieurs lignes, et deux colonnes.
A contient des numéro ranger dans l'ordre croissant et B le nom du fournisseur correpondant.

Dans la colonne A les numéro ne se suivent pas.

Je recherche une macro me permettant d'inserer une ligne à chauque endoroit ou c'est necessaire afin que les numéro se suivent.

Merci par avance.

A voir également:

Insertion de ligne
Site de vente en ligne particulier - Guide
Partage de photos en ligne - Guide
Hors ligne instagram - Guide
Aller à la ligne excel - Guide
Insertion signature word - Guide

3 réponses

Réponse 1 / 3

Darkito Messages postés 1191 Date d'inscription vendredi 7 décembre 2007 Statut Membre Dernière intervention 26 mai 2010 545
25 juin 2009 à 14:27

Bonjour,
tu veux simplement trier ta liste selon la colonne A

1 fournisseur X
2 fournisseur B
5 fournisseur T

ou bien avoir une liste du style ?

1 fournisseur X
2 fournisseur B
3
4
5 fournisseur T

Réponse 2 / 3

acfb Messages postés 2 Date d'inscription jeudi 25 juin 2009 Statut Membre Dernière intervention 25 juin 2009
25 juin 2009 à 14:31

la deuxième liste

exemple j'ai actuellement ce-ci :

1 siemens
2 alcatel
4 sony

je voudrais
1 siemens
2 alcatel
3
4 sony

Réponse 3 / 3

Darkito Messages postés 1191 Date d'inscription vendredi 7 décembre 2007 Statut Membre Dernière intervention 26 mai 2010 545
25 juin 2009 à 15:13

J'ai jeté un oeil,
cette macro devrait faire ce que tu souhaites :

Sub Insertion()
    Dim ligne As Integer
    
    ligne = 1
    
    While (Not IsEmpty(Cells(ligne + 1, 1)))
        
        If (Cells(ligne, 1).Value + 1 <> Cells(ligne + 1, 1).Value) Then
            Rows(ligne + 1).Insert
            Cells(ligne + 1, 1) = ligne + 1
        End If
    
        ligne = ligne + 1
    Wend
End Sub

Discussions similaires

Que veut dire "correspondant occupé" lors d'un appel ?

Statut « en ligne » alors que non

Ligne occupée : pourquoi mon téléphone sonne occupé ?

Discussions similaires

Newsletters