je dispose d'un tableau sur plusieurs colonnes
ccertaines cellules sont gris=E9es et je voudrais avoir en=20
bas de chaque colonne le nombre de cellules de couleurs
j'ai deja regard=E9 dans dans le forum mais sans succ=E8s
merci de votre aide
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"ludivine" a écrit dans le message de news:0a4c01c3d55e$dc7f05a0$ je dispose d'un tableau sur plusieurs colonnes ccertaines cellules sont grisées et je voudrais avoir en bas de chaque colonne le nombre de cellules de couleurs j'ai deja regardé dans dans le forum mais sans succès merci de votre aide
ludivine
Bonsoir Ludivine,
Cette macro, à adapter, devrait convenir :
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"ludivine" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:0a4c01c3d55e$dc7f05a0$a001280a@phx.gbl...
je dispose d'un tableau sur plusieurs colonnes
ccertaines cellules sont grisées et je voudrais avoir en
bas de chaque colonne le nombre de cellules de couleurs
j'ai deja regardé dans dans le forum mais sans succès
merci de votre aide
Retirer A_S_ pour répondre. XL97 / XL2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"ludivine" a écrit dans le message de news:0a4c01c3d55e$dc7f05a0$ je dispose d'un tableau sur plusieurs colonnes ccertaines cellules sont grisées et je voudrais avoir en bas de chaque colonne le nombre de cellules de couleurs j'ai deja regardé dans dans le forum mais sans succès merci de votre aide
ludivine
Philippe.R
Re, Ca peut aussi être un truc du genre
Sub engris() For i = 1 To 10 If Cells(i, 8).Interior.Color = 12632256 Or _ Cells(i, 8).Interior.Color = 9868950 Then lavar = lavar + 1 End If Next i MsgBox lavar End Sub
pour la colonne H -- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"ludivine" a écrit dans le message de news:0a4c01c3d55e$dc7f05a0$ je dispose d'un tableau sur plusieurs colonnes ccertaines cellules sont grisées et je voudrais avoir en bas de chaque colonne le nombre de cellules de couleurs j'ai deja regardé dans dans le forum mais sans succès merci de votre aide
ludivine
Re,
Ca peut aussi être un truc du genre
Sub engris()
For i = 1 To 10
If Cells(i, 8).Interior.Color = 12632256 Or _
Cells(i, 8).Interior.Color = 9868950 Then
lavar = lavar + 1
End If
Next i
MsgBox lavar
End Sub
pour la colonne H
--
Amicales Salutations
A_S_rauphil@wanadoo.fr
Retirer A_S_ pour répondre.
XL97 / XL2002
"ludivine" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:0a4c01c3d55e$dc7f05a0$a001280a@phx.gbl...
je dispose d'un tableau sur plusieurs colonnes
ccertaines cellules sont grisées et je voudrais avoir en
bas de chaque colonne le nombre de cellules de couleurs
j'ai deja regardé dans dans le forum mais sans succès
merci de votre aide
Sub engris() For i = 1 To 10 If Cells(i, 8).Interior.Color = 12632256 Or _ Cells(i, 8).Interior.Color = 9868950 Then lavar = lavar + 1 End If Next i MsgBox lavar End Sub
pour la colonne H -- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"ludivine" a écrit dans le message de news:0a4c01c3d55e$dc7f05a0$ je dispose d'un tableau sur plusieurs colonnes ccertaines cellules sont grisées et je voudrais avoir en bas de chaque colonne le nombre de cellules de couleurs j'ai deja regardé dans dans le forum mais sans succès merci de votre aide