Tri de données dans excel 2003

Question

Bonjour,
J'ai besoins d'aide pour copier dans une autre feuille une ligne sur 3 d'un fichier, j'explique en montrant le début de ma colonne.
titre1
infos1a
infos1b
titre2
infos2a
infos2b
titre3
infos3a
infos3b
....
titre2240
infos2240a
infos2240b
Comment faire pour ne copier que les titre dans une nouvelle colonne ou page excel2003
Merci de me venir en aide car je n'ai pas trouvé la solution..

Bidouilleu_R · Answer

dans ce code qu'il faut placer dans un module
je considére que les données sources sont sur la feuil1 en colonne A
cells(i,1) et cells(j,1) représentent les lignes de la colonne A sur la feuille 1 et 2
InStr(1, Cells(i, 1), "titre" ) test la presence de titre dans la valeur de la cellule.

si cela ne convient pas donne des valeurs réelles plus le titre d'entête et sa position.





Sub extrait_les_lignes_titres()
Dim DerLig As Integer ' numero de la dernière ligne
Dim i, j As Integer
Sheets("feuil1").Select
DerLig = Range("A65535").End(xlUp).Row
j = 2
For i = 2 To DerLig
    If InStr(1, Cells(i, 1), "titre") > 0 Then
        'il y a le mot titre on écrit la valeur en feuille2
        Sheets("feuil2").Cells(j, 1).Value = Cells(i, 1).Value
        j = j + 1
    End If
Next
End Sub



A+

Tri de données dans excel 2003

1 réponse

Votre réponse

Discussions similaires

Newsletters