XL 2013 Mise en forme conditionnelle

[domburg]

Bonjour,
Est il possible de surligner la dernière ligne d'une cellule par une mise en forme conditionnelle ?
Cdt
Dominique

 

[Staple1600]

Bonjour le fil, domburg

=>domburg
Qu'entends-tu par la dernière ligne d'une cellule?
Son bord inférieur?
Ou tu parles de la dernière cellule non vide d'une colonne?

 

[R@chid]

Bonjour,
la dernière ligne d'une cellule 🤔 🤔
tu voulais dire la dernière cellule d'une ligne ?
ou la dernière ligne d'un tableau?
ou bien peut-être la dernière cellule d'une colonne ?

 

[domburg]

Bonjour le fil, domburg

=>domburg
Qu'entends-tu par la dernière ligne d'une cellule?
Son bord inférieur?
Ou tu parles de la dernière cellule non vide d'une colonne?

Bonjour Staple 1600.
Le bord inférieur.
Exemple :
La cellule suivante est composée de 3 lignes (saisie en utilisant ALT ENTREE)
xxx
yyy
zzz
Je voudrais surligner la 3 ème ligne (valeur = zzz)
cdt
Dominique

 

[R@chid]

Re,
Salut Staple1600


Alors là, tu parles d'une colonne et non pas une cellule, car une colonne se compose de milliers de cellules.




Cordialement

 

[JHA]

Bonjour et bonne année à tous,

Un essai sur fichier

JHA

 

[domburg]

Re,
Salut Staple1600


Alors là, tu parles d'une colonne et non pas une cellule, car une colonne se compose de milliers de cellules.




Cordialement

Re,

Non, c'est bien une seule cellule.
Regarde mon exemple en cellule B7 du fichier joint "dombug_MFC_V1-2.xlsx" :
le besoin est de surligner uniquement zzz (je l'ai mis en police rouge / gras manuellement pour l'illustrer)

Cordialement

 

[R@chid]

Re,
ok cela nécessite du VBA, Staple1600 ou une autre âme aussi charitable peuvent te venir en aide.


Cordialement

 

[domburg]

Re,
ok cela nécessite du VBA, Staple1600 ou une autre âme aussi charitable peuvent te venir en aide.


Cordialement

Merci R@chid,
Je pense effectivement que ce n'est pas possible par la fonctionnalité "mise en forme conditionnelle"
Cordialement
Dominique

​

 

[Staple1600]

Bonjour R@chid

Moi, je ne parle de rien 😉
j'essayais de voir clair dans l'esprit de domburg 😉
D'où mon questionnement en messag#2

Maintenant que la lumière est allumée, je sais que pas de MFC possible mais du VBA à mettre en pratique 😉

 

[Nicolas JACQUIN]

Bonjour à tous,
Quelque chose comme ça peut-être,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Derlign As Integer

Derlign = Range("A65536").End(xlUp).Row
Range("A1:A" & Derlign).Interior.ColorIndex = xlNone
Range("A65536").End(xlUp).Interior.ColorIndex = 6

End Sub

 

[haonv]

Bonjour forum et bonne année à tous,

Peut-être avec :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Deb As Integer, Fin As Integer

If Not Intersect(Target, Range("A:A")) Is Nothing And InStr(Target, Chr(10)) > 0 Then
    Target.Font.Underline = xlUnderlineStyleNone
    Deb = InStrRev(Target, Chr(10)) + 1
    Fin = Len(Target) - Deb + 1
    Target.Characters(Start:=Deb, Length:=Fin).Font.Underline = xlUnderlineStyleSingle
End If

End Sub

qui soulignera la dernière ligne de la cellule saisie, si elle se trouve en colonne A et comporte plusieurs lignes.
Cordialement