XL 2013 Mise en forme conditionnelle

Staple1600

XLDnaute Barbatruc

• 1 Janvier 2021

• #2

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?

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

• 1 Janvier 2021

• #3

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 ?

 

Vote positif 0 Vote négatif

D

domburg

XLDnaute Nouveau

• 1 Janvier 2021

• #4

Staple1600 à dit:

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?

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

• 1 Janvier 2021

• #5

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

 

Pièces jointes

• dombug_MFC_V1.xlsx

  9.5 KB · Affichages: 13

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 1 Janvier 2021

• #6

Bonjour et bonne année à tous,

Un essai sur fichier

JHA

 

Pièces jointes

• Classeur MFC Domburg.xlsx

  8.6 KB · Affichages: 4

Vote positif 0 Vote négatif

D

domburg

XLDnaute Nouveau

• 1 Janvier 2021

• #7

R@chid à dit:

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

Cliquez pour agrandir...

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

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

• 1 Janvier 2021

• #8

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


Cordialement

 

Vote positif 0 Vote négatif

D

domburg

XLDnaute Nouveau

• 1 Janvier 2021

• #9

R@chid à dit:

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


Cordialement

Cliquez pour agrandir...

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

​

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 1 Janvier 2021

• #10

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

 

Vote positif 0 Vote négatif

Nico_J

XLDnaute Occasionnel

Supporter XLD

• 1 Janvier 2021

• #11

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

Vote positif 0 Vote négatif

H

haonv

XLDnaute Occasionnel

• 1 Janvier 2021

• #12

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

 

Vote positif 0 Vote négatif