Pointage de valeurs

Bonjour,

Clic droit onglet/Visualiser le code/ WorkSheet dans menu puis
Double_click:
:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Target.Interior.ColorIndex = 36
Cancel = True
End Sub



Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
If Target.Interior.ColorIndex = 36 Then
Target.Interior.ColorIndex = xlNone
Else
Target.Interior.ColorIndex = 36
End If
Cancel = True
End Sub

Cordialement JB

Bonsoir,
Y a-t-il un autre indicateur que la couleur de la cellule qui permette de
dire heures payées ou impayées ?
Le but est de faire apparaître cet état ?
Si oui, une MEFC (mise en forme conditionnelle devrait faire l'affaire , non
?

Exemple:
Heures en colonne A
Indicateur en colonne B P si payé , rien si non payé
menu Format/mise en forme conditionnelle
choisir "la formule est"
saisir la formule suivante =$B1="P"
choisir le format ( police, motif, etc)
valider

et ça doit faire

Bonne soirée


--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

"Philippe M" <ph.martourey@ouanadoo.fr> a écrit dans le message de news:
enUo4b1IGHA.2668@tk2msftngp13.phx.gbl...

Bonjour à tous,

Je voudrais pouvoir "marquer" certaines cellules de façon simple pour
l'utilisateur. L'objectif est de repérer dans un tableau récapitulatif
quelles heures ont été payées et lesquelles restent à payer.

Je pensais procéder en changeant la couleur des cellules ainsi pointées.

Étant nul sous Excel et VBA j'ai besoin d'aide pour savoir comment
effectuer une telle action par exemple avec un Dble clic sur la cellule
concernée.

Merci de toutes le informations que vous pourrez me communiquer.

PhM

Merci à JB et Pounet95.
Je vais essayer les deux méthodes

Bon W.E.

PJ http://cjoint.com/?bBuphYlCqG

JB