[EXCEL] Conditions sur cellules ? HELP

Conditions sur cellules ? HELP [EXCEL] - Logiciels - Windows & Software

Marsh Posté le 30-11-2007 à 14:18:31    

Hello
 
Je vous explique mon probleme. au taf, nous avons une feuille excel avec le planning de toute l'année. Je me suis fait une feuille de planning perso ou je recopie les lignes du planning automatiquement (fichier sur le reseau). Comme je bosse en equipe et que de tps en tps il faut remplacer et/ou faire des formations, le responsable du planning general le modifit, donc la mise a jour de mon planning perso doit se faire automatiquement des que je lance le fichier (question au debut pour lancer ou non la macro)
 
Bref, pour la recopie des equipe je n'ai pas de probleme. mais j'en rencontre d'autres.
 
- Quand je suis en repos, sur le planning principale la case est vide. Et quand je j'utlise la fonction = a la case, je me retrouve avec un 0. que puis-je faire pour que ce soit vide ?
- De +, selon mes equipe, j'applique une couleur sur la cellule afin d'avoir une viso rapide. Pour cela je comptai utiliser l'outil "format conditionnel" mais on ne peut "programmer" que 3 conditions differentes. J'aurais voulu en avoir + (6 couleur pour 6 cas spécifique)
 
Je précise quand meme que je suis une bille en Excel donc faudra m'expliquer clairement les macros a taper. J'ai biensur fait des recherche sur google mais je n'ai pas trouvé mon bonheur... ou rien compris  [:ddr555]  
 
Merci d'avance

Reply

Marsh Posté le 30-11-2007 à 14:18:31   

Reply

Marsh Posté le 30-11-2007 à 15:18:38    

VW Seb a écrit :

Hello
- Quand je suis en repos, sur le planning principale la case est vide. Et quand je j'utlise la fonction = a la case, je me retrouve avec un 0. que puis-je faire pour que ce soit vide ?
-


Hello, moi non plus pas très doué sur excel mais à priorit la formule à mettre dans la cellule est =SI(A1="";"";A1) ce qui signifit si A1 = rien ("" ) ça n'affiche rien ("" ) sinon ça affiche le contenu de A1 ;)  
 

VW Seb a écrit :

Hello
Pour cela je comptai utiliser l'outil "format conditionnel" mais on ne peut "programmer" que 3 conditions differentes. J'aurais voulu en avoir + (6 couleur pour 6 cas spécifique)


 
là par contre je n'ai pas de solution, i'm sorry...

Reply

Marsh Posté le 30-11-2007 à 18:13:37    

Oui pour la 1ere formule ca marche. Je la connaissat celle la. Mais ca m'obligerai a retpaer tout mon tableau (265 jours.. c'est lourd a refaire !) surtout que le A1 chez moi fait quasi 40 caracteres (chemin du fichier via reseau)
 
J'aimerai un filtre collé par dessus avec une macro genre if=0 alors on met rien.

Reply

Marsh Posté le 30-11-2007 à 18:23:37    

Ca existe mais ce sera valable pour toute ta feuille (voire ton classeur) : menu Outils, Options..., onglet Affichage, décoches "Afficher un zéro pour les cellules qui ont une valeur nulle" (ou un truc du genre, je suis en 2007)

Reply

Marsh Posté le 30-11-2007 à 18:43:02    

Ben cela ne me derange pas si c'est valable pour toute la feuille. Je testerai cela.
 
Petite precision quand meme, au taf nous utilisons encore office 97  [:spamafote] Je ne sais pas si cela a une influence

Reply

Marsh Posté le 01-12-2007 à 07:46:26    

Up

Reply

Marsh Posté le 01-12-2007 à 09:21:07    

VW Seb a écrit :

Oui pour la 1ere formule ca marche. Je la connaissat celle la. Mais ca m'obligerai a retpaer tout mon tableau (265 jours.. c'est lourd a refaire !) surtout que le A1 chez moi fait quasi 40 caracteres (chemin du fichier via reseau)
 
J'aimerai un filtre collé par dessus avec une macro genre if=0 alors on met rien.


Un simple copier-coller devrait suffire si les cellules de destination sont organisées à peu près de la même manière que les cellules du fichier en réseau.
Copier A1/local avec réf à D1/réseau et coller en A2/local donnera une formule avec réf à D2/réseau
 
 
Pour les 6 couleurs, il va falloir passer par VBA je suppose. Pour démarrer, tu peux enregistrer une macro qui enregistre tes faits et gestes en train de modifier la couleur d'une cellule, puis jeter un oeil au code généré (Alt-F11 et chercher les macros).
"Malheureusement" (OOou pas :o) je n'ai plus Office donc je pourrai plus t'aider mais sinon il y a un topic Excel dans le coin.

Reply

Marsh Posté le 02-12-2007 à 08:52:51    

up

Reply

Marsh Posté le 02-12-2007 à 16:22:13    

Pour ta question sur les formats conditionnels, tu as ce lien :
http://www.excelabo.net/excel/conditionformat.php
 
avec cette partie :
Plus de 3 couleurs pour une mise en forme conditionnelle
 
ou ça :
7 formats conditionnels
 
à voir si ça peut coller pour toi

Reply

Marsh Posté le 03-12-2007 à 08:00:58    

et pour effacer mon 0 ??

Reply

Marsh Posté le 03-12-2007 à 08:00:58   

Reply

Marsh Posté le 03-12-2007 à 14:17:01    

@Blueteen.
 
J'ai bien cherché sur ce site mais je ne trouve tjs pas reponse a mon probleme.
J'ai retourné 2x internet sans trouver un cas comme moi...
 
Pourtant pour quelqu'un qui a l'habitude de coder en VBA ca doit etre enfantin non ?
 
Pour faire simple ce que je demande c'est ca:
Dans mon classeur:
Si cellule = A alors bleu  
Si cellule = B alors jeune
etc... (+ que 3 donc)  
Si 0 dans cellule alors je voudrai qu'il n'y ai rien d'affiché.

Reply

Marsh Posté le 03-12-2007 à 14:48:08    

Je viens de faire une recherche sur : more than 3 conditions excel
Le 1er lien donne un truc pas mal:

 

http://www.mrexcel.com/archive/Formatting/12054.html

 

Ouvre une feuille excel
Fait un clic droit sur un onglet, puis 'visualiser le code'
Colle le code suivant :

Code :
  1. 'START OF CODE
  2. Private Sub Worksheet_Change(ByVal Target As Excel.Range)
  3. Dim WatchRange As Range
  4. Dim CellVal As Integer
  5. If Target.Cells.Count > 1 Then Exit Sub
  6. If Target = "" Or Not IsNumeric(Target) Then Exit Sub
  7. CellVal = Target
  8. Set WatchRange = Range("A1:A10" )
  9. If Not Intersect(Target, WatchRange) Is Nothing Then
  10. Select Case CellVal
  11. Case 0 To 10
  12. Target.Interior.ColorIndex = 5
  13. Case 11 To 20
  14. Target.Interior.ColorIndex = 10
  15. Case 21 To 30
  16. Target.Interior.ColorIndex = 6
  17. Case 31 To 40
  18. Target.Interior.ColorIndex = 46
  19. Case 41 To 50
  20. Target.Interior.ColorIndex = 45
  21. End Select
  22. End If
  23. End Sub
  24. 'END OF CODE


fais : alt+q
pour quitter et revenir sur ta feuille
à présent, quelque part dans la plage A1 à A10, tape des chiffres
par exemple :
10, 17 et 28
les cellules devraient avoir un fond qui change de couleur automatiquement.
Dans cette macro, 5 conditions sont gérées :
0 à 10, 11 à 20, 21 à 30, 31 à 40, 41 à 50

 

tu peux donc modifier cette macro pour étendre la plage surveillée, et ajouter des plages de calcul en te basant sur l'existant.
Ce sont des données chiffrées ou lettrées que tu veux tester ?
Pour l'affichage du 0, ça dépend un peu de ta feuille de calcul, j'aurais eu tendance à proposer la même chose que plus haut, avec la condition :
=SI(A1="";"";A1)

 

Sinon, tu peux envisager d'appliquer une couleur blanche au cas où la cellule contienne 0, ainsi tu n'auras rien à l'écran ou à l'impression.

 

Essaie déjà le code ci-dessus pour voir si ça peut coller à ce que tu veux, ça fera déjà une base de travail.


Message édité par blueteen le 03-12-2007 à 16:30:34
Reply

Marsh Posté le 03-12-2007 à 14:58:49    

Je viens de faire un test rapide avec ce code :

Code :
  1. 'START OF CODE
  2. Private Sub Worksheet_Change(ByVal Target As Excel.Range)
  3. Dim WatchRange As Range
  4. Dim CellVal As String
  5. If Target.Cells.Count > 1 Then Exit Sub
  6. If Target = "" Then Exit Sub
  7. CellVal = Target
  8. Set WatchRange = Range("A1:I20" )
  9. If Not Intersect(Target, WatchRange) Is Nothing Then
  10. Select Case CellVal
  11. Case "A"
  12. Target.Interior.ColorIndex = 5
  13. Case "B"
  14. Target.Interior.ColorIndex = 10
  15. Case "C"
  16. Target.Interior.ColorIndex = 6
  17. Case "D"
  18. Target.Interior.ColorIndex = 46
  19. Case "E"
  20. Target.Interior.ColorIndex = 45
  21. Case "F"
  22. Target.Interior.ColorIndex = 15
  23. Case "G"
  24. Target.Interior.ColorIndex = 20
  25. Case 0
  26. Target.Font.ColorIndex = 2
  27. End Select
  28. End If
  29. End Sub
  30. 'END OF CODE
 

Je te laisse tester les lettres correspondantes (attention aux majuscules)
edit : Je viens d'ajouter la gestion du 0


Message édité par blueteen le 03-12-2007 à 15:31:52
Reply

Marsh Posté le 03-12-2007 à 16:28:35    

Bon la je suis a la maison, j'ai testé rapidement sur une feuille virege et ca a l'ai de fonctionner.  
Bienvu l'astuce de mettre le 0 en blanc  :lol:  J'ai juste rajouté le fait de mettre aussi le fond en blanc et ca marche.
 
Merci beaucoup ca fait plusieur jour que je me casse la tete la dessus (pas toute la journée non plus hein  :whistle: ) Jsuis vraiment une bille sur excel.
 :love:  :love:  Je test ca demain

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed