Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Comment récupérer la formule d'un format conditionnel

Comment récupérer la formule d'un format conditionnel

23 réponses
Avatar
luck82
Bonsoir;
Lsteph n'a passé il y a pas longtemps un classeur qui contenait un format
conditionnel (sur X valeur identique; le format conditionnel appliqué une
police blanche sur X-1 valeur et noire sur la dernière valeur).

Je voudrai récupérer la formule qui me fait ça mais dans l'onglet
format/mise en forme conditionnel, je ne vois rien.
Comment récupérer cette formule?

merci par avance.
Signaler un problème avec ce contenu

3 réponses

Supprimer
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
1 2 3
Avatar
jps
eh ben! tu vois que tu peux bien faire, geedee, dès l'instant où on te
secoue un peu les méninges
j'ai juste remis 2/3 accents afin que ceux qui recopient ta proc est
quelquechose de zouli zouli
jps

"Modeste" a écrit dans le message de news:

Bonsour® jps avec ferveur ;o))) vous nous disiez :

hello GeeDee
chez moi, ta proc bogue


tssss....
pourtant tu t'en doutais bien,
tu as baissé ta garde mon bon Jean-Paul ;o)))

c'est que que m'a signalé Filochard (l'autre pas l'originaLL)

ce que faisait remarquer Lsteph : c'est galère ....
il manque le détails des bordures, le motif(trame), le style de police, le
soulignement
et la condition active lors du test

Sub LECTURE_MEFC()
FCope = Array(" ", "Comprise entre", "Non comprise entre", "Egale à",
"Différente de", "Supérieure à", "Inférieure à", "Supérieure ou égale à",
"Inférieure ou égale à")
FCtyp = Array(" ", "La valeur de la cellule est ", "La formule est ")
If ActiveCell.FormatConditions.Count > 0 Then

For Ndx = 1 To ActiveCell.FormatConditions.Count
Set FC = ActiveCell.FormatConditions(Ndx)
If FC.Type = 1 Then
If FC.Operator < 3 Then
MsgBox "Condition " & Ndx _
& Chr(10) & FCtyp(FC.Type) _
& Chr(10) & FCope(FC.Operator) _
& Chr(10) & FC.Formula1 _
& chr(10) & " et " _
& Chr(10) & FC.Formula2 _
& Chr(10) & "Interieur Idx Couleur : " & FC.Interior.ColorIndex _
& Chr(10) & "Police idx Couleur : " & FC.Font.ColorIndex, _
vbInformation, _
"MEFC Cellule : " & ActiveCell.Address '
Else
MsgBox "Condition " & Ndx _
& Chr(10) & FCtyp(FC.Type) _
& Chr(10) & FCope(FC.Operator) _
& Chr(10) & FC.Formula1 _
& Chr(10) & "Interieur Idx Couleur : " & FC.Interior.ColorIndex _
& Chr(10) & "Police idx Couleur : " & FC.Font.ColorIndex, _
vbInformation, _
"MEFC Cellule : " & ActiveCell.Address '
End If

Else
MsgBox "Condition " & Ndx _
& Chr(10) & FCtyp(FC.Type) _
& Chr(10) & FC.Formula1 _
& Chr(10) & "Interieur Idx Couleur : " & FC.Interior.ColorIndex _
& Chr(10) & "Police idx Couleur : " & FC.Font.ColorIndex, _
vbInformation, _
"MEFC Cellule : " & ActiveCell.Address
End If
Next
Set FC = Nothing
Else
MsgBox "Pas de MEFC", vbExclamation, "MEFC Cellule : " &
ActiveCell.Address
End If
End Sub



@+
;o)))





Avatar
Modeste
Bonsour® jps avec ferveur ;o))) vous nous disiez :

eh ben! tu vois que tu peux bien faire, geedee, dès l'instant où on te
secoue un peu les méninges
j'ai juste remis 2/3 accents afin que ceux qui recopient ta proc est
quelquechose de zouli zouli
jps


Arghhhh !!!
... aient quelque chose ... !!!!
Put...!!! C...g !!!
Ouppssss..., ça c'est de la ponctuation avé l'assent ;o)))

Ah les accents... ,
C'est une lacune qui date de l'école primaire, déja au BEPC j'ai failli etre
boulé parce que je mettais les accents à la verticale ou à l'horizontale ;o)))
ça a continué ensuite au niveau professionnel, accents interdits !!! dans les
langages de programmation d'origine US (Cobol, PL1, APL etc...)

@+
;o)))

Avatar
jps
merdum de merdum
à l'inverse de denis, moi j'écris plus vite que je ne pense et comme je
pense peu....
pas une raison de m'insulter dans la langue de Sitting Hoax :-)
jps

"Modeste" a écrit dans le message de news:
e$
Bonsour® jps avec ferveur ;o))) vous nous disiez :

eh ben! tu vois que tu peux bien faire, geedee, dès l'instant où on te
secoue un peu les méninges
j'ai juste remis 2/3 accents afin que ceux qui recopient ta proc est
quelquechose de zouli zouli
jps


Arghhhh !!!
... aient quelque chose ... !!!!
Put...!!! C...g !!!
Ouppssss..., ça c'est de la ponctuation avé l'assent ;o)))

Ah les accents... ,
C'est une lacune qui date de l'école primaire, déja au BEPC j'ai failli
etre boulé parce que je mettais les accents à la verticale ou à
l'horizontale ;o)))
ça a continué ensuite au niveau professionnel, accents interdits !!! dans
les langages de programmation d'origine US (Cobol, PL1, APL etc...)

@+
;o)))





1 2 3