Comment peut-on détecter la couleur affectées à une cellule par mise en
forme conditionnelle ?
Je cherche à inscrire un "F" dans chaque cellule de ma sélection ayant une
couleur de fond (affectée par mise en forme conditionnelle) autre que le
blanc/rien.
Le code suivant ne détecte rien.
Une piste ?
-----------------------------------------------------------
Sub JoursFériés()
Dim Cellule As Range
For Each Cellule In Selection
If Cellule.Interior.ColorIndex <> xlColorIndexNone Then
Cellule.Value = "F"
End If
Next Cellule
End Sub
-----------------------------------------------------------
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
patrick.lyon
il suffit d'utiliser la formule qui se trouve dans la mfc
"Christophe CAMPAIN" a couché sur son écran :
Bonjour à tous,
Comment peut-on détecter la couleur affectées à une cellule par mise en forme conditionnelle ? Je cherche à inscrire un "F" dans chaque cellule de ma sélection ayant une couleur de fond (affectée par mise en forme conditionnelle) autre que le blanc/rien. Le code suivant ne détecte rien.
Une piste ? ----------------------------------------------------------- Sub JoursFériés() Dim Cellule As Range
For Each Cellule In Selection If Cellule.Interior.ColorIndex <> xlColorIndexNone Then Cellule.Value = "F" End If Next Cellule End Sub -----------------------------------------------------------
Par avance merçi,
Kristof
-- Ceci est une signature automatique de MesNews. Site : http://mesnews.no-ip.com
il suffit d'utiliser la formule qui se trouve dans la mfc
"Christophe CAMPAIN" a couché sur son écran :
Bonjour à tous,
Comment peut-on détecter la couleur affectées à une cellule par mise en
forme conditionnelle ?
Je cherche à inscrire un "F" dans chaque cellule de ma sélection ayant une
couleur de fond (affectée par mise en forme conditionnelle) autre que le
blanc/rien.
Le code suivant ne détecte rien.
Une piste ?
-----------------------------------------------------------
Sub JoursFériés()
Dim Cellule As Range
For Each Cellule In Selection
If Cellule.Interior.ColorIndex <> xlColorIndexNone Then
Cellule.Value = "F"
End If
Next Cellule
End Sub
-----------------------------------------------------------
Par avance merçi,
Kristof
--
Ceci est une signature automatique de MesNews.
Site : http://mesnews.no-ip.com
il suffit d'utiliser la formule qui se trouve dans la mfc
"Christophe CAMPAIN" a couché sur son écran :
Bonjour à tous,
Comment peut-on détecter la couleur affectées à une cellule par mise en forme conditionnelle ? Je cherche à inscrire un "F" dans chaque cellule de ma sélection ayant une couleur de fond (affectée par mise en forme conditionnelle) autre que le blanc/rien. Le code suivant ne détecte rien.
Une piste ? ----------------------------------------------------------- Sub JoursFériés() Dim Cellule As Range
For Each Cellule In Selection If Cellule.Interior.ColorIndex <> xlColorIndexNone Then Cellule.Value = "F" End If Next Cellule End Sub -----------------------------------------------------------
Par avance merçi,
Kristof
-- Ceci est une signature automatique de MesNews. Site : http://mesnews.no-ip.com
Christophe CAMPAIN
Merci,
Ca roule !
@+ kristof "Christophe CAMPAIN" a écrit dans le message de news:
Bonjour à tous,
Comment peut-on détecter la couleur affectées à une cellule par mise en forme conditionnelle ? Je cherche à inscrire un "F" dans chaque cellule de ma sélection ayant une couleur de fond (affectée par mise en forme conditionnelle) autre que le blanc/rien. Le code suivant ne détecte rien.
Une piste ? ----------------------------------------------------------- Sub JoursFériés() Dim Cellule As Range
For Each Cellule In Selection If Cellule.Interior.ColorIndex <> xlColorIndexNone Then Cellule.Value = "F" End If Next Cellule End Sub -----------------------------------------------------------
Par avance merçi,
Kristof
Merci,
Ca roule !
@+
kristof
"Christophe CAMPAIN" <campain.christophe_PasDePub@libertysurf.fr> a écrit
dans le message de news: uWYmpzHxDHA.2520@TK2MSFTNGP10.phx.gbl...
Bonjour à tous,
Comment peut-on détecter la couleur affectées à une cellule par mise en
forme conditionnelle ?
Je cherche à inscrire un "F" dans chaque cellule de ma sélection ayant une
couleur de fond (affectée par mise en forme conditionnelle) autre que le
blanc/rien.
Le code suivant ne détecte rien.
Une piste ?
-----------------------------------------------------------
Sub JoursFériés()
Dim Cellule As Range
For Each Cellule In Selection
If Cellule.Interior.ColorIndex <> xlColorIndexNone Then
Cellule.Value = "F"
End If
Next Cellule
End Sub
-----------------------------------------------------------
@+ kristof "Christophe CAMPAIN" a écrit dans le message de news:
Bonjour à tous,
Comment peut-on détecter la couleur affectées à une cellule par mise en forme conditionnelle ? Je cherche à inscrire un "F" dans chaque cellule de ma sélection ayant une couleur de fond (affectée par mise en forme conditionnelle) autre que le blanc/rien. Le code suivant ne détecte rien.
Une piste ? ----------------------------------------------------------- Sub JoursFériés() Dim Cellule As Range
For Each Cellule In Selection If Cellule.Interior.ColorIndex <> xlColorIndexNone Then Cellule.Value = "F" End If Next Cellule End Sub -----------------------------------------------------------
