XL 2013 Mise en forme conditionnelle

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: 6

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: 3

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

Réponses
9
Affichages
218

Membres actuellement en ligne

Statistiques des forums

Discussions
286 547
Messages
1 877 057
Membres
160 560
dernier inscrit
jesaispas
Haut Bas