Comment Afficher des Cellules si un critére correspond. Afficher aussi bien
le contenue que la mise en forme, I.E. la couleur de la cellule, savoir s'il
y a des bordures ou non ?
Peut t'on cacher / afficher une colonne si un critére de sélection est 1 ou
0 ?
Comment donne t on une couleur ou du Gras a une cellule suivant un critére
sans avoir recours à la mise en forme conditionnelle ?
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
SL
Bonjour
par exemple :
Private Sub Worksheet_Change(ByVal Target As Range) Columns(6).EntireColumn.Hidden = [F1] Columns(7).EntireColumn.Hidden = ([G1].Interior.ColorIndex = 1) [A1].Font.Bold = ([A1] = 25) Columns(2).EntireColumn.Hidden = ([B1].Borders(xlEdgeBottom).LineStyle <> xlNone) End Sub
masque la colonne F si F1 = 1, l'affiche sinon masque la colonne G si G1 est en noir, l'affiche sinon met A1 en gras si A1 = 25 masque la colonne B si B1 a une bordure inférieure.
Stéphane
"Nistan" a écrit dans le message de news:
Bonjour,
Comment Afficher des Cellules si un critére correspond. Afficher aussi bien le contenue que la mise en forme, I.E. la couleur de la cellule, savoir s'il y a des bordures ou non ?
Peut t'on cacher / afficher une colonne si un critére de sélection est 1 ou 0 ?
Comment donne t on une couleur ou du Gras a une cellule suivant un critére sans avoir recours à la mise en forme conditionnelle ?
MErci.
Bonjour
par exemple :
Private Sub Worksheet_Change(ByVal Target As Range)
Columns(6).EntireColumn.Hidden = [F1]
Columns(7).EntireColumn.Hidden = ([G1].Interior.ColorIndex = 1)
[A1].Font.Bold = ([A1] = 25)
Columns(2).EntireColumn.Hidden = ([B1].Borders(xlEdgeBottom).LineStyle
<> xlNone)
End Sub
masque la colonne F si F1 = 1, l'affiche sinon
masque la colonne G si G1 est en noir, l'affiche sinon
met A1 en gras si A1 = 25
masque la colonne B si B1 a une bordure inférieure.
Stéphane
"Nistan" <Nistan@discussions.microsoft.com> a écrit dans le message de news:
B7B80D28-BBDA-4007-A5C2-1BB541E01147@microsoft.com...
Bonjour,
Comment Afficher des Cellules si un critére correspond. Afficher aussi
bien
le contenue que la mise en forme, I.E. la couleur de la cellule, savoir
s'il
y a des bordures ou non ?
Peut t'on cacher / afficher une colonne si un critére de sélection est 1
ou
0 ?
Comment donne t on une couleur ou du Gras a une cellule suivant un critére
sans avoir recours à la mise en forme conditionnelle ?
Private Sub Worksheet_Change(ByVal Target As Range) Columns(6).EntireColumn.Hidden = [F1] Columns(7).EntireColumn.Hidden = ([G1].Interior.ColorIndex = 1) [A1].Font.Bold = ([A1] = 25) Columns(2).EntireColumn.Hidden = ([B1].Borders(xlEdgeBottom).LineStyle <> xlNone) End Sub
masque la colonne F si F1 = 1, l'affiche sinon masque la colonne G si G1 est en noir, l'affiche sinon met A1 en gras si A1 = 25 masque la colonne B si B1 a une bordure inférieure.
Stéphane
"Nistan" a écrit dans le message de news:
Bonjour,
Comment Afficher des Cellules si un critére correspond. Afficher aussi bien le contenue que la mise en forme, I.E. la couleur de la cellule, savoir s'il y a des bordures ou non ?
Peut t'on cacher / afficher une colonne si un critére de sélection est 1 ou 0 ?
Comment donne t on une couleur ou du Gras a une cellule suivant un critére sans avoir recours à la mise en forme conditionnelle ?
