Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Comment colorer les cellules contenant des formules

5 réponses
Avatar
AB
Bonsoir à tous,

Je voudrais pouvoir colorer automatiquement (peu importe la couleur) les
cellules contenant une formule. (Pas avec
Edition/Atteindre/Cellules/Formules, car je ne visualise plus les autres
cellules concernées dès que j'en sélectionne une).
Une idée ?
Si oui, merci. Sinon, merci aussi
AB

5 réponses

Avatar
FxM
Bonsoir André (bienpolitus),

Une solution parmi d'autres :
alt-f11 insertion -> module, ycopier ce qui suit :
Public Function formul(inp)
formul = Left(inp.Formula, 1) = "="
End Function

Cette fonction perso va renvoyer VRAI si le contenu de la cellule
démarre par '=' et FAUX dans le cas contraire.

Dans ta feuille de calcul :
sélectionne toutes les cellules en cliquant à gauche de la colonne A
format -> mise en forme conditionnelle
la formule est -> =formul(A1)=vrai
format -> choisir
valider par OK

Voilà, voilà

@+
FxM



Bonsoir à tous,

Je voudrais pouvoir colorer automatiquement (peu importe la couleur) les
cellules contenant une formule. (Pas avec
Edition/Atteindre/Cellules/Formules, car je ne visualise plus les autres
cellules concernées dès que j'en sélectionne une).
Une idée ?
Si oui, merci. Sinon, merci aussi
AB




Avatar
AB
Bonjour François-Xavier,

Bien essayé, mais...sans résultat.
J'ai copié la fonction personnalisée dans un module de perso.xls
Ensuite, j'ai copié la formule de MFC dans la zone adéquate de la feuille
concernée. Mais aucune réaction d'Excel.
J'ai du rater quelque chose...
Merci quand même (comme promis !)
A+
André

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

Bonsoir André (bienpolitus),

Une solution parmi d'autres :
alt-f11 insertion -> module, ycopier ce qui suit :
Public Function formul(inp)
formul = Left(inp.Formula, 1) = "="
End Function

Cette fonction perso va renvoyer VRAI si le contenu de la cellule démarre
par '=' et FAUX dans le cas contraire.

Dans ta feuille de calcul :
sélectionne toutes les cellules en cliquant à gauche de la colonne A
format -> mise en forme conditionnelle
la formule est -> =formul(A1)=vrai
format -> choisir
valider par OK

Voilà, voilà

@+
FxM



Bonsoir à tous,

Je voudrais pouvoir colorer automatiquement (peu importe la couleur) les
cellules contenant une formule. (Pas avec
Edition/Atteindre/Cellules/Formules, car je ne visualise plus les autres
cellules concernées dès que j'en sélectionne une).
Une idée ?
Si oui, merci. Sinon, merci aussi
AB





Avatar
Michel Gaboly
Bonjour,

Pourquoi dans Perso.xls ?

Insère un module dans le classeur concerné, ne serait-ce que pour que la fonction soit accessible si le fichier est
utilisé sur une autre machine.


Bonjour François-Xavier,

Bien essayé, mais...sans résultat.
J'ai copié la fonction personnalisée dans un module de perso.xls
Ensuite, j'ai copié la formule de MFC dans la zone adéquate de la f euille
concernée. Mais aucune réaction d'Excel.
J'ai du rater quelque chose...
Merci quand même (comme promis !)
A+
André

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

Bonsoir André (bienpolitus),

Une solution parmi d'autres :
alt-f11 insertion -> module, ycopier ce qui suit :
Public Function formul(inp)
formul = Left(inp.Formula, 1) = "="
End Function

Cette fonction perso va renvoyer VRAI si le contenu de la cellule dé marre
par '=' et FAUX dans le cas contraire.

Dans ta feuille de calcul :
sélectionne toutes les cellules en cliquant à gauche de la colonne A
format -> mise en forme conditionnelle
la formule est -> =formul(A1)=vrai
format -> choisir
valider par OK

Voilà, voilà

@+
FxM



Bonsoir à tous,

Je voudrais pouvoir colorer automatiquement (peu importe la couleur) les
cellules contenant une formule. (Pas avec
Edition/Atteindre/Cellules/Formules, car je ne visualise plus les aut res
cellules concernées dès que j'en sélectionne une).
Une idée ?
Si oui, merci. Sinon, merci aussi
AB







--
Cordialement,

Michel Gaboly
www.gaboly.com



Avatar
AB
Bonjour Michel,
C'est fait, et ça marche. En fait, je pense que j'avais simplement mal entré
la formule dans la zone de MFC.
Merci à vous deux. Bonne (fin) de journée.
André

"Michel Gaboly" a écrit dans le message de news:
%
Bonjour,

Pourquoi dans Perso.xls ?

Insère un module dans le classeur concerné, ne serait-ce que pour que la
fonction soit accessible si le fichier est
utilisé sur une autre machine.


Bonjour François-Xavier,

Bien essayé, mais...sans résultat.
J'ai copié la fonction personnalisée dans un module de perso.xls
Ensuite, j'ai copié la formule de MFC dans la zone adéquate de la feuille
concernée. Mais aucune réaction d'Excel.
J'ai du rater quelque chose...
Merci quand même (comme promis !)
A+
André

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

Bonsoir André (bienpolitus),

Une solution parmi d'autres :
alt-f11 insertion -> module, ycopier ce qui suit :
Public Function formul(inp)
formul = Left(inp.Formula, 1) = "="
End Function

Cette fonction perso va renvoyer VRAI si le contenu de la cellule démarre
par '=' et FAUX dans le cas contraire.

Dans ta feuille de calcul :
sélectionne toutes les cellules en cliquant à gauche de la colonne A
format -> mise en forme conditionnelle
la formule est -> =formul(A1)=vrai
format -> choisir
valider par OK

Voilà, voilà

@+
FxM



Bonsoir à tous,

Je voudrais pouvoir colorer automatiquement (peu importe la couleur) les
cellules contenant une formule. (Pas avec
Edition/Atteindre/Cellules/Formules, car je ne visualise plus les autres
cellules concernées dès que j'en sélectionne une).
Une idée ?
Si oui, merci. Sinon, merci aussi
AB







--
Cordialement,

Michel Gaboly
www.gaboly.com



Avatar
FxM
Bonjour André,

Comme Michel te l'a dit (merci Michel!), la fonction va dans un module
du classeur.

Tu pourrais la mettre dans perso.xls si tu définis la propriété IsAddin
du perso.xls à True. A défaut de isaddin = true, il faut mettre
=perso.xls!formul(...) au lieu de =formul(...)

@+
FxM



Bonjour François-Xavier,

Bien essayé, mais...sans résultat.
J'ai copié la fonction personnalisée dans un module de perso.xls
Ensuite, j'ai copié la formule de MFC dans la zone adéquate de la feuille
concernée. Mais aucune réaction d'Excel.
J'ai du rater quelque chose...
Merci quand même (comme promis !)
A+
André

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

Bonsoir André (bienpolitus),

Une solution parmi d'autres :
alt-f11 insertion -> module, ycopier ce qui suit :
Public Function formul(inp)
formul = Left(inp.Formula, 1) = "="
End Function

Cette fonction perso va renvoyer VRAI si le contenu de la cellule démarre
par '=' et FAUX dans le cas contraire.

Dans ta feuille de calcul :
sélectionne toutes les cellules en cliquant à gauche de la colonne A
format -> mise en forme conditionnelle
la formule est -> =formul(A1)=vrai
format -> choisir
valider par OK

Voilà, voilà

@+
FxM



Bonsoir à tous,

Je voudrais pouvoir colorer automatiquement (peu importe la couleur) les
cellules contenant une formule. (Pas avec
Edition/Atteindre/Cellules/Formules, car je ne visualise plus les autres
cellules concernées dès que j'en sélectionne une).
Une idée ?
Si oui, merci. Sinon, merci aussi
AB