MEFC caractère Italique

[filiph79]

Bonjour le forum,

est il possible en utilisant la mise en forme conditionnelle d'appliquer une couleur sur les cellules si elles ne contienneent pas de caractères en italique.

Merci

 

[James007]

Re : MEFC caractère Italique

Bonjour,

Comme toujours avec Excel ... la réponse est oui ...
Avec une simple UDF ...

A +

 

[James007]

Re : MEFC caractère Italique

...du genre ...

Function IsItalic(rng As Range)
    If rng.Font.Italic Then
        IsItalic = True
    Else
        IsItalic = False
    End If
End Function

a +

 

[C@thy]

Re : MEFC caractère Italique

Opus! James007, moi j'arrive pas à le faire marcher correctement!!!😕

C@thy

 

[C@thy]

Re : MEFC caractère Italique

James007, je pense que je n'ai pas utilisé correctement ton idée...

P. S. excuse mon ignorance, c'est quoi UDF, à part un ancien parti politique?

C@thy

 

[Guest]

Re : MEFC caractère Italique

Bonjour le fil,

@Cathy tout d'abord un grand Salut😀
Il faut que tu appuies sur la touche F9 car les changements de format ne sont pas calculés automatiquement.

En recaculant, ça marche.

rajoute la ligne: Application.Volatile
Juste après la déclaration de la fonction

Fonction IsItalic(rng as range)
Application.Volatile
 
'....
End Function

tu seras sûre que la fonction sera recalculée à chaque calcule de la feuille

A+

 

[vbacrumble]

Re : MEFC caractère Italique

Bonjour

Pour Cathy
UDF= User Defined Function

ou fonction VBA personnalisée en français.

A+

 

[PascalXLD]

Re : MEFC caractère Italique

Bonjour

je me permets juste d'intervenir non seulement pour faire une bise à Cathy
mais aussi pour préciser que la fonction renverra Vrai que si la cellule est en italique

Alors que je lis

si elles ne contienneent pas de caractères en italique.

Ce qui laisse supposer que une cellule peut avoir des caractères italiques et des non italiques. Et dans ce cas là la formule renverra faux alors qu'il y en a en italique
Dons je pense qu'il faudrait faire une boucle sur tous les caractères

 

[Guest]

Re : MEFC caractère Italique

Re le Fil,

Un grand salut à l'ami Pascal😀

avec lequel je suis tout à fait d'accord, j'avais pas bien lu.

La function serait donc quelque chose comme ceci:

Function IsItalic(rng As Range)
    Dim i As Integer
    Application.Volatile
    If rng.Cells.Count > 1 Then Exit Function
    For i = 1 To Len(rng.Text)
        IsItalic = rng.Characters(i, 1).Font.Italic
        If IsItalic Then Exit For
    Next i
End Function

Mais attention au temps de traitement sur les cellules ayant un grand nombre de caratères.

A+

 

[PascalXLD]

Re : MEFC caractère Italique

RE

Juste pour saluer Gé

Re le Fil,

Un grand salut à l'ami Pascal😀

avec lequel je suis tout à fait d'accord, j'avais pas bien lu.

j'eusse préféré

Re le Fil,

Un grand salut à l'ami Pascal😀

je plussoie, j'avais pas bien lu.

😀 😀 😀 😀

 

[Guest]

Re : MEFC caractère Italique

re,

Je me tords de plussoyer

J'en suis toujours à me demander si on en fait un verbe transitif ou intransitif?

Je plussoie à ce que dis Pascal
Ou
Je plussoie ce que dis Pascal

??? Là est la question😀😀😀

 

[vbacrumble]

Re : MEFC caractère Italique

Bonour tous


Pour Pascal et Hasco 😉
Le Conjugueur - Conjugaison et synonyme du verbe plussoyer

A+

 

[C@thy]

Re : MEFC caractère Italique

Merci Hasco, ça marche mieux en réactualisant, c'est vrai!...

Merci Pascal pour la bise (smack) et pour le plussoiement, j'avais pas bien lu non plus... t'es pas modo pour rien!...🙂

Pourquoi dire UDF alors qu'on peut dire fonction personnalisée? (ça je comprends!)...
ben en fait, ça fait plus chic, ça en jette... merci vbarumble de me sortir de mon ignorance... maintenant je dirai : j'ai écrit une UDF... 😎

Bibises à tous

C@thy

 

[filiph79]

Re : MEFC caractère Italique

Merci a tous pour ces leçons d'excel et de con jugaison.

effectivement la question était "caractères pas en italique".

j'ai en fait utilisée la solution de james007 et ensuite adaptè la formule dans la mise ne forme conditionnelle en faisant:

=isitalic(A1)=faux

Merci a vous tous