Nbr de lignes aléatoires

sonskriverez

XLDnaute Occasionnel
Bojour le forum,

Dans la colonne A, je retire par VBA un certain nombres de ligne, combien de lignes non vides me restent-il sachant:


par module, j'ai 2 lignes de titres (ne pas compter), un nombre X de lignes à compter, 1 ligne vide, le titre 'total=', 1 lignes vides.

j'ai plusieurs modules de ce genre qui se suivent


merci de votre aide [file name=exemple_20060110112752.zip size=4331]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_20060110112752.zip[/file]
 

Pièces jointes

  • exemple_20060110112752.zip
    4.2 KB · Affichages: 9

Jacques87

XLDnaute Accro
Bonjour

Ta question est intéressante, je m'y suis penché et ai réussi à pondre un truc qui marche à moitié.
Question pour me faciliter la tâche
Combien de modules as-tu ? est-ce que ce nombre sera fixe ou non ? pourrais tu insérer un séparateur (exemple ----- ) entre 2 modules ?

A+

Message édité par: Jacques87, à: 10/01/2006 12:24
 
S

Sonskriverez

Guest
Salut Jacques

je n'ai que 4 modules mais pourquoi pas d'autres, le nbr de ligne pouvant êtres suoorimés est aléatoire. En attendant de l'aide j'ai bossé dessus et j'ai pondu ce truc qui fonctionne qu'en penses tu ?

'réajustement des compteurs
compte = 0
y = 1
i = 0
Sht1.Select

Range('A1').Select
For i = 3 To Cells(65536, y).End(xlUp).Row 'Boucle sur la colonne
compte = compte + 1
Cells(i, y).Select
If Cells(i, y) Like '' Then 'si trouvé
i = i + 1
Cells(i, y).Value = 'le nombre est de ' & compte - 1
i = i + 3
compte = 0
End If
Next i


pour le séparateiur '----' il suffit de le mettre dans le Like
 

Jacques87

XLDnaute Accro
Re

Je suis resté sur ma première idée et pour le moment ça fonctionne avec 2 modules (et sans rajouter de séparateurs)
Dis moi ce que tu en penses après essai avec plusieurs modules [file name=exemple_20060110131419.zip size=9566]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exemple_20060110131419.zip[/file]
 

Discussions similaires

P
Réponses
3
Affichages
1 K
P

Statistiques des forums

Discussions
312 488
Messages
2 088 843
Membres
103 972
dernier inscrit
steeter