Formater une ligne si OUI "barré"

Boby71C · 11 Mars 2010

Bonjour à tous
A nouveau besoin de votre précieuse aide.
Je réussis à formater les lignes qui comportent un NON en colonne Y.
Certaines lignes ont un OUI, donc je les laisse au format initial mais lorsque le OUI est "Barré" je désir que cette ligne passe au format hauteur de ligne 30.
Je vous joint mon petit fichier exemple qui sera certainnement plus compréhenssible.

Merci pour votre aide.

@+

BOISGONTIER · 11 Mars 2010

Re : Formater une ligne si OUI "barré"

Bonjour,

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Application.ScreenUpdating = False
 For Each c In Range("Y3", [y65000].End(xlUp))
     If c.Value = "OUI" Then
        c.EntireRow.RowHeight = IIf(c.Font.Strikethrough, 30, 15)
     End If
 Next
End Sub

JB

Boby71C · 11 Mars 2010

Re : Formater une ligne si OUI "barré"

Bonjour JB
Merci beaucoup pour ton code qui fonctionne très bien.
Pour ne pas mourir bête, je pense que le OUI est représenté par le petit c dans le code !!

Je n'avais pas testé comme il faut, les OUI non barrés se formatent également à la même hauteur de ligne !!

@+

Formater une ligne si OUI "barré"

Boby71C

XLDnaute Impliqué

Pièces jointes

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

Boby71C

XLDnaute Impliqué

Discussions similaires

Formater une ligne si OUI "barré"

Boby71C

XLDnaute Impliqué

Pièces jointes

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

Boby71C

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency