Probleme sur excel
ben
-
random -
random -
Bonjour
je souhaite trouver une fonction qui me permet de noircir des cases selon d'un tableau si la condition est pas respectée. Je crois qu'il faut faire du visual basic mais suis pas sur.
Moi pour mon souci je teste si une case est egal a 4 ou a 5 et si la reponse est 4 je veux que cela noircir une partie de mon tableau, soit quelques cases que je designerai.
je vous remercie d'avance
je souhaite trouver une fonction qui me permet de noircir des cases selon d'un tableau si la condition est pas respectée. Je crois qu'il faut faire du visual basic mais suis pas sur.
Moi pour mon souci je teste si une case est egal a 4 ou a 5 et si la reponse est 4 je veux que cela noircir une partie de mon tableau, soit quelques cases que je designerai.
je vous remercie d'avance
A voir également:
- Probleme sur excel
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Comment trier par ordre alphabétique sur excel - Guide
- Comment calculer la moyenne sur excel - Guide
- Si ou excel - Guide
4 réponses
Si la valeur de la cellule est égale à 4
Format -> Motif = Couleur noire
Ca fonctionne !!!
Toco y se gausos !!!
Format -> Motif = Couleur noire
Ca fonctionne !!!
Toco y se gausos !!!
bon j'y connais rien en macro mais celle-ci fonctionne si B1 = 4
elle noircie les cellules A1 B6 D8 ...
Sub noircir()
'
' noircir Macro
' Macro enregistrée le 04/12/2004 par Utilisateur
'
'
Dim Nb1 As Double
Nb1 = Feuil1.Cells(1, 2)
If Nb1 = 4 Then
Range("A1,B6,D8,D4,F3,F7,F12,G10,G5").Select
Range("A1").Activate
With Selection.Interior
.ColorIndex = 1
.Pattern = xlSolid
End With
Else
End If
End Sub
mais va surtout voir là :
http://www.cathyastuce.com/w-agora/index.php?site=cathyastuce&bn=
où là
http://vlohr.free.fr/Forum_VeriTi/forum_1.php
(_Usul d'Arrakis
Serial_dreamer_)
elle noircie les cellules A1 B6 D8 ...
Sub noircir()
'
' noircir Macro
' Macro enregistrée le 04/12/2004 par Utilisateur
'
'
Dim Nb1 As Double
Nb1 = Feuil1.Cells(1, 2)
If Nb1 = 4 Then
Range("A1,B6,D8,D4,F3,F7,F12,G10,G5").Select
Range("A1").Activate
With Selection.Interior
.ColorIndex = 1
.Pattern = xlSolid
End With
Else
End If
End Sub
mais va surtout voir là :
http://www.cathyastuce.com/w-agora/index.php?site=cathyastuce&bn=
où là
http://vlohr.free.fr/Forum_VeriTi/forum_1.php
(_Usul d'Arrakis
Serial_dreamer_)
j'avais eu la même idée mais cela ne fonctionne pas pour
"je veux que cela noircir une partie de mon tableau, soit quelques cases que je designerai"
car la mise en forme est conditionelle de la cellule.
toujours zen