Vérif de cellule à l'ouverture ?

  • Initiateur de la discussion Mimi
  • Date de début
M

Mimi

Guest
Bonsoir, est-il possible de vérifier à l'ouverture d'excel le contenue de cellule (A4:Axxx) et

SI la donné dans la cellule vérifiée est X ALORS mettre la ligne en gris END


Merci d'avance
 

excalibur

XLDnaute Impliqué
bonjour mimi le forum tu peus faire comme cela Option Explicit
Private Sub Workbook_Open()
Sheets(1).Activate
If Range('a4') = 'x' Or Range('a4') = 'X' Then
Rows('4:4').Select
With Selection.Interior
.ColorIndex = 15
End With
End If
End Sub'salutations je suppose que tu ouvres ton classeur sur la feuille 1
 

ccpapy

XLDnaute Impliqué
bonjour à tous,
je me permets une précision :unsure:
il faudrait peut-être rajouter les lignes remettant la couleur d'origine si la valeur est differente de X ou x (avant end sub)=:

If Range('a4') inf sup 'x' Or Range('a4') inf sup 'X' Then
Rows('4:4').Select
With Selection.Interior
.ColorIndex = 2
End With
End If
voilà bon dimanche...
remplacer inf et sup par leur symbole respectif
 

Dan

XLDnaute Barbatruc
Bonjour,

Tibo, il ne faut surtout pas appliquer cela à toutes les lignes. Cela alourdit le fichier inutilement.
Le mieux est de l'appliquer sur la plage contenant les valeurs.
Si d'autres valeurs sont ajoutées, il suffit de les insérer dans le tableau existant pour la MFC soit appliquée automatiquement.

Bon ap à tous.

:)

Message édité par: Dan, à: 13/03/2006 13:21
 

Discussions similaires

Réponses
2
Affichages
160
Réponses
4
Affichages
192
Réponses
10
Affichages
254

Statistiques des forums

Discussions
312 489
Messages
2 088 852
Membres
103 974
dernier inscrit
chmikha