Extraire une série de données
Bonjour à tous,
désolé pour le titre, il n'est pas très explicite mais je vois pas quel nom donné exactement à mon problème.
Voila je possède une base de donnée d'environ 500 lignes et 20 variables en colonnes.
Pour chaque ligne j'ai des 0 et des chiffres de toutes sortes (ex: 20,45,55...).
J'aimerais "résumé" ce tableau, c'est à dire que je voudrais pour chaque ligne faire disparaitre les zéro et rapproche les chiffres.
par exemple j'ai:
0 0 0 0 25 16 0 0 0 12 0 19
0 0 0 0 0 0 0 0 0 0 12 0 0 0
45 0 0 0 0 0 0 0 0 0 0 0 0 0
pour la ligne 1 je voudrai, sur quatre colonnes (4 chiffres présents): 25 16 12 19
pour la ligne 2, sur une colonne donc le chiffre 12
Comment traduire cela en formule? En gros ça donne, si aucun chiffre dans la colonne 1, passer à la suivante, et ainsi de suite, par contre si un chiffre le mettre dans une colonne à part, et passer à la colonne suivante, ect...
Avez-vous une solution? je galère un peu avec les fonctions !!
Merci pour votre aide, je reste à votre disposition si vous avez besoin!!
bonjour ratm13
Prend ce code colle le dans l'éditeur macro feuil1
Selectionne toutes tes données,
lance la macro deb
Ca devrait le faire
Sub deb()
c = 1
Do While c <> 0
c = 0
For Each i In Selection
If i = 0 And i <> "" Then
i.Delete shift:=xlShiftToLeft
c = c + 1
End If
Next
Loop
End Sub
C'est parfait!
Il faut vraiment que je me mette aux macros, ça facilite la vie tout de même!!
Je te remercie pour avoir pris le temps de me répondre!