XL 2013 Mise en forme conditionnelle

domburg

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

domburg

XLDnaute Nouveau
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
 

domburg

XLDnaute Nouveau
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
 

Pièces jointes

  • dombug_MFC_V1-2.xlsx
    9.6 KB · Affichages: 7

Nico_J

XLDnaute Junior
Bonjour à tous,
Quelque chose comme ça peut-être,
VB:
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
 

Pièces jointes

  • dombug_MFC_V1-2.xlsm
    15.2 KB · Affichages: 4

haonv

XLDnaute Occasionnel
Bonjour forum et bonne année à tous,

Peut-être avec :
VB:
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
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 897
Membres
101 833
dernier inscrit
sandra25