Dans ce tableau il peut y avoir au départ, un certains nombres de
cellules qui comportant des chiffres.
Comment faire un formatage automatique de couleurs noire, sur les
cellules qui comportent un chiffre
et
un formatage de couleur bleu sur les cellules qui ne comportent pas de
chiffres ? ( cellules qui seront remplies par la suite mais qui devront
rester bleu)
Je ne connais pas le VB, je pense qu'il faut balayer chaque cellule
et tester la valeur null/ non null pour y appliquer un format couleur....
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Nicolas B.
Salut jeanB,
Tu peux par exemple tester pour chaque cellule la longueur du texte contenu dans chaque cellule :
Sub Coloriage() Dim c As Range For Each c In Selection If Len(c.Value) <> 0 Then c.Font.ColorIndex = 0 Else c.Font.ColorIndex = 5 End If Next End Sub
NB : "If Len(c.Value) Then" fonctionne aussi.
A+ Nicolas B.
Bonjour
j'ai un tableau de 20 lignes et 20 colonnes.
Dans ce tableau il peut y avoir au départ, un certains nombres de cellules qui comportant des chiffres.
Comment faire un formatage automatique de couleurs noire, sur les cellules qui comportent un chiffre et un formatage de couleur bleu sur les cellules qui ne comportent pas de chiffres ? ( cellules qui seront remplies par la suite mais qui devront rester bleu)
Je ne connais pas le VB, je pense qu'il faut balayer chaque cellule et tester la valeur null/ non null pour y appliquer un format couleur....
Merci
Salut jeanB,
Tu peux par exemple tester pour chaque cellule la longueur du texte
contenu dans chaque cellule :
Sub Coloriage()
Dim c As Range
For Each c In Selection
If Len(c.Value) <> 0 Then
c.Font.ColorIndex = 0
Else
c.Font.ColorIndex = 5
End If
Next
End Sub
NB : "If Len(c.Value) Then" fonctionne aussi.
A+
Nicolas B.
Bonjour
j'ai un tableau de 20 lignes et 20 colonnes.
Dans ce tableau il peut y avoir au départ, un certains nombres de
cellules qui comportant des chiffres.
Comment faire un formatage automatique de couleurs noire, sur les
cellules qui comportent un chiffre
et
un formatage de couleur bleu sur les cellules qui ne comportent pas de
chiffres ? ( cellules qui seront remplies par la suite mais qui devront
rester bleu)
Je ne connais pas le VB, je pense qu'il faut balayer chaque cellule
et tester la valeur null/ non null pour y appliquer un format couleur....
Tu peux par exemple tester pour chaque cellule la longueur du texte contenu dans chaque cellule :
Sub Coloriage() Dim c As Range For Each c In Selection If Len(c.Value) <> 0 Then c.Font.ColorIndex = 0 Else c.Font.ColorIndex = 5 End If Next End Sub
NB : "If Len(c.Value) Then" fonctionne aussi.
A+ Nicolas B.
Bonjour
j'ai un tableau de 20 lignes et 20 colonnes.
Dans ce tableau il peut y avoir au départ, un certains nombres de cellules qui comportant des chiffres.
Comment faire un formatage automatique de couleurs noire, sur les cellules qui comportent un chiffre et un formatage de couleur bleu sur les cellules qui ne comportent pas de chiffres ? ( cellules qui seront remplies par la suite mais qui devront rester bleu)
Je ne connais pas le VB, je pense qu'il faut balayer chaque cellule et tester la valeur null/ non null pour y appliquer un format couleur....
Merci
jeanB
Salut jeanB,
Tu peux par exemple tester pour chaque cellule la longueur du texte contenu dans chaque cellule :
Sub Coloriage() Dim c As Range For Each c In Selection If Len(c.Value) <> 0 Then c.Font.ColorIndex = 0 Else c.Font.ColorIndex = 5 End If Next End Sub
NB : "If Len(c.Value) Then" fonctionne aussi.
A+ Nicolas B.
Bonjour
j'ai un tableau de 20 lignes et 20 colonnes.
Dans ce tableau il peut y avoir au départ, un certains nombres de cellules qui comportant des chiffres.
Comment faire un formatage automatique de couleurs noire, sur les cellules qui comportent un chiffre et un formatage de couleur bleu sur les cellules qui ne comportent pas de chiffres ? ( cellules qui seront remplies par la suite mais qui devront rester bleu)
Je ne connais pas le VB, je pense qu'il faut balayer chaque cellule et tester la valeur null/ non null pour y appliquer un format couleur....
Merci merci de votre aide
cela repond parfaitement au probleme cordialement
Salut jeanB,
Tu peux par exemple tester pour chaque cellule la longueur du texte
contenu dans chaque cellule :
Sub Coloriage()
Dim c As Range
For Each c In Selection
If Len(c.Value) <> 0 Then
c.Font.ColorIndex = 0
Else
c.Font.ColorIndex = 5
End If
Next
End Sub
NB : "If Len(c.Value) Then" fonctionne aussi.
A+
Nicolas B.
Bonjour
j'ai un tableau de 20 lignes et 20 colonnes.
Dans ce tableau il peut y avoir au départ, un certains nombres de
cellules qui comportant des chiffres.
Comment faire un formatage automatique de couleurs noire, sur les
cellules qui comportent un chiffre
et
un formatage de couleur bleu sur les cellules qui ne comportent pas de
chiffres ? ( cellules qui seront remplies par la suite mais qui
devront rester bleu)
Je ne connais pas le VB, je pense qu'il faut balayer chaque cellule
et tester la valeur null/ non null pour y appliquer un format couleur....
Tu peux par exemple tester pour chaque cellule la longueur du texte contenu dans chaque cellule :
Sub Coloriage() Dim c As Range For Each c In Selection If Len(c.Value) <> 0 Then c.Font.ColorIndex = 0 Else c.Font.ColorIndex = 5 End If Next End Sub
NB : "If Len(c.Value) Then" fonctionne aussi.
A+ Nicolas B.
Bonjour
j'ai un tableau de 20 lignes et 20 colonnes.
Dans ce tableau il peut y avoir au départ, un certains nombres de cellules qui comportant des chiffres.
Comment faire un formatage automatique de couleurs noire, sur les cellules qui comportent un chiffre et un formatage de couleur bleu sur les cellules qui ne comportent pas de chiffres ? ( cellules qui seront remplies par la suite mais qui devront rester bleu)
Je ne connais pas le VB, je pense qu'il faut balayer chaque cellule et tester la valeur null/ non null pour y appliquer un format couleur....
