Logo du forum
 

Forum TT-Hardware

| Inscription | | Recherche | | FAQ | | Accueil | | Liste des membres |
| Calendrier |
 
Vous n'êtes pas identifié! [Connexion] ou [Inscription] Forum » Software - OS - Réseaux » [Software] » Excel 2003 : calcul de cellules de couleur
Login Mot de passe

2 visiteurs sur ce topic (0 membre(s), 2 invité(s) )


Auteur
Sujet : Excel 2003 : calcul de cellules de couleur
Fe®nánjot
Vétéran
Membre # 4167

 Avatar du membre
Lieu : Nivelles (B)

Messages :
2155 (0.7 par jour)




Message du 21-11-2009 @ 11:48   Afficher le profil   Envoyer un message privé   Editer le message   Citer le message      Afficher l'adresse IP   Alerter les modérateurs   


J'ai un fichier excel dans lequel il y a une plage qui contient des cellules de différentes couleurs. Existe-t-il une formule qui puisse compter le nombre de cellules de chaque couleur dans cette plage ? Si pas de formule possible, est-ce réalisable via une macro en vb et si oui, comment car vb n'est pas trop ma tasse de thé ?
Merci pour vos réponses. :)
----------
Ne dites pas : la situation est grave, mais pas désespérée. Dites : la situation est désespérée, mais ce n'est pas grave.
- Haut de page -
B2000
Administrateur
Membre # 185

 Avatar du membre
Lieu : France/Poitiers/juste à côté...

Messages :
9667 (2.54 par jour)




Message du 21-11-2009 @ 22:27   Afficher le profil   Envoyer un message privé   Editer le message   Citer le message      Afficher l'adresse IP   Alerter les modérateurs   

voici une macro que j'ai trouvé sur le net (http://www.commentcamarche.net | Test sur la couleur d'une cellule) :
Code :

Sub couleur_cellule()
Dim i
For i = 4 To 12
Worksheets(1).Range("B" & i).Value = Worksheets(1).Range("C" & i).Interior.Color
Next i
End Sub


ca retourne dans les cellules B4 à B12 le code de la couleur des cellules C4 à C12

reste à essayer cette macro pour déterminer les codes des couleurs que tu vas utiliser

PS : sous-entendu qu'il n'existe pas dans excel de fonction permettant ce genre de chose...

[message édité le 21-11-2009 @ 22:28 Par B2000]
----------
AMD Barton 2600+| MSI K7N2 DELTA L| 1.5Go DDR400| Maxtor 160Go| LG GSA-4165B| Liteon LTD16X6S| Geforce Ti4800 128Mo| Creative SBLive! 1024| Logitech QuickCam Pro 5000| Microsoft Natural Ergonomic 4000| Logitech Cordless Optical Mouse| 2 Iiyama ProLite E2472HDD

Nikon COOLPIX 5900 + Kingston Ultimate 120x 2GB | Canon PIXMA IP4000 | ADSL neufbox de SFR

Pour dialoguer en live, le chat TTH ou par mIRC sur irc://porsche.webchat.org:6667/tt-hardware

Rejoignez la team EBuyClub TTH !!!

Un jour j'ai mangé une pomme...
- Haut de page -
Fe®nánjot
Vétéran
Membre # 4167

 Avatar du membre
Lieu : Nivelles (B)

Messages :
2155 (0.7 par jour)




Message du 22-11-2009 @ 9:48   Afficher le profil   Envoyer un message privé   Editer le message   Citer le message      Afficher l'adresse IP   Alerter les modérateurs   

Merci B2000. Vais tester ça. ;)

Edit : après adaptation à mes besoins et test, ça marche nickel. Encore merci, B2000 :)

[message édité le 22-11-2009 @ 10:02 Par Fe®nánjot]
----------
Ne dites pas : la situation est grave, mais pas désespérée. Dites : la situation est désespérée, mais ce n'est pas grave.
- Haut de page -


Aller dans le forum :  

Plan du forum | Contacter l'administrateur

Powered by SoulBB 3.0.1
© Soulmanto, 2003-2010

Valid XHTML 1.0 Transitional

Page générée en 0.522 secondes