condition excel

Tibo

XLDnaute Barbatruc

• 24 Août 2010

• #2

Re : condition excel

Bonjour,

Le plus simple pour t'aider aurait été de joindre un petit bout de fichier exemple.

Ca aurait notamment permis d'apporter une réponse appropriée.

En supposant tes données de A1 à Bxxx

Sélectionne les données de B1 à Bxxx, puis applique une Mise en Forme Conditionnelle :

La formule est : =$A3=""

+ Police Gras

Je te laisse essayer

@+

 

Vote positif 0 Vote négatif

N

namerif

Guest

• 24 Août 2010

• #3

Re : condition excel

Salut,

je ne sais pas comment on insère un fichier... voici en gros mon tableau :
F__|G__
123|1
___|23
123|564
34_|234
123|1
___|23
___|321
___|23
123|325 <- ça c'est ce que je veux !
___|23



Et ça n'a pas fonctionné le code que tu m'as donné...

 

Vote positif 0 Vote négatif

Tibo

XLDnaute Barbatruc

• 24 Août 2010

• #4

Re : condition excel

re,

Pour joindre un fichier :

Aller en mode avancé
Gérer les pièces jointes
Parcourir : sélectionner ton fichier
Envoyer
Fermer la fenêtre

Et envoyer le tout (message + fichier)

Sinon, en sélectionnant les données de la colonne G (de G1 à Gxxx), essaye cette formule pour ta MFC :

Code:

 =NB(F:F)-NB($F$1:F1)=0

+ Police Gras

@+

 

Vote positif 0 Vote négatif

N

namerif

Guest

• 24 Août 2010

• #5

Re : condition excel

cette formule ne semble pas fonctionner non plus. j'envoie un morceau (le morceau intéressant) de mon tableau...

 

Pièces jointes

• Classeur1.xls

  18.5 KB · Affichages: 47
• Classeur1.xls

  18.5 KB · Affichages: 55
• Classeur1.xls

  18.5 KB · Affichages: 38

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 24 Août 2010

• #6

Re : condition excel

Bonjour à tous

Une procédure évenementielle ferait-elle l'affaire ? Si oui, placez le code

Code:

[COLOR="DarkSlateGray"][B]Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column = 1 Then toto
End Sub

Sub toto()
Dim i&
   With Cells(1, 1).Resize(WorksheetFunction.Max(Cells(Rows.Count, 1).End(xlUp).Row, Cells(Rows.Count, 2).End(xlUp).Row), 2)
      .Offset(1, 1).Resize(, 1).Font.Bold = False
      For i = .Rows.Count To 2 Step -1
         If Not IsEmpty(.Cells(i, 1)) Then .Cells(i, 2).Font.Bold = True: Exit For
      Next i
   End With
End Sub[/B][/COLOR]

dans le module de la feuille Feuil1.​

ROGER2327
#4009

Samedi 14 Phalle 137 (Bataille de Morsang, ST)
7 Fructidor An CCXVIII
2010-W34-2T17:19:45Z

 

Vote positif 0 Vote négatif

Tibo

XLDnaute Barbatruc

• 24 Août 2010

• #7

Re : condition excel

re namerif, bonjour Roger,

Formule de la MFC pour la colonne B :

Code:

=ET($A1<>"";NBVAL($A:$A)=NBVAL($A$1:$A1))

voir le fichier joint

@+

 

Pièces jointes

• namerif.zip

  4.1 KB · Affichages: 22

Vote positif 0 Vote négatif

N

namerif

Guest

• 24 Août 2010

• #8

Re : condition excel

Excellent ! merci beaucoup !

 

Vote positif 0 Vote négatif