Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Dans ta situation, à l'évidence, tu ne parles pas
des erreurs générées par Excel.
Pour tester si une mise en forme conditionnelle est en
application sur la plage de cellules, tu dois tester chacune
des cellules de la plages de cellules affectées de cette mise
en forme conditionnelle pour vérifier si la condition stipulée
est effectivement vérifiée.
Exemple de code :
'-------------------------------------
Sub Test()
Dim C As Range, X As Integer
With Worksheets("Feuil1")
'Définir la plage
For Each C In .Range("A1:A50")
'Définir la ou les conditions de la MEFC
If C.Value <> C.Offset(, 1) Then
X = X + 1
End If
Next
End With
If X <> 0 Then
MsgBox X & " erreurs trouvées"
Else
MsgBox "Aucune erreur"
End If
End Sub
'-------------------------------------
"ThierryK" a écrit dans le message de
groupe de discussion
:
Bonjour michdenis
et merci de t'intéresser à mon problème
en effet je n'ai pas été assez précis,
En A1 je fais la somme de x cellules "=somme("toutes les cellules
concernés")
en B1 je fais la somme de x AUTRES cellules "=somme("toutes les cellules
AUTRES concernés")
Et si tout est bon, A1 = B1
mais s'il y a une faute de frappe (nombre incorrect) dans les cellules
qui composent le total affiché en A1 ou B1, je le contrôle par la MEFC
en MEFC j'ai mis pour A1 & B1 ¡<>B1 (avec motif rouge)
donc si A1 est différent de B1 le motif est rouge
et si A1 = B1 le motif est celui du format de la cellule (gris)
cette feuille est ensuite envoyée par mail,
mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas
de
cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
penses-tu que c'est possible?
@+
cordialement
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Dans ta situation, à l'évidence, tu ne parles pas
des erreurs générées par Excel.
Pour tester si une mise en forme conditionnelle est en
application sur la plage de cellules, tu dois tester chacune
des cellules de la plages de cellules affectées de cette mise
en forme conditionnelle pour vérifier si la condition stipulée
est effectivement vérifiée.
Exemple de code :
'-------------------------------------
Sub Test()
Dim C As Range, X As Integer
With Worksheets("Feuil1")
'Définir la plage
For Each C In .Range("A1:A50")
'Définir la ou les conditions de la MEFC
If C.Value <> C.Offset(, 1) Then
X = X + 1
End If
Next
End With
If X <> 0 Then
MsgBox X & " erreurs trouvées"
Else
MsgBox "Aucune erreur"
End If
End Sub
'-------------------------------------
"ThierryK" <thierryx.kolby@zlaposzte.nxet> a écrit dans le message de
groupe de discussion
: uAlSnh7iKHA.1420@TK2MSFTNGP05.phx.gbl...
Bonjour michdenis
et merci de t'intéresser à mon problème
en effet je n'ai pas été assez précis,
En A1 je fais la somme de x cellules "=somme("toutes les cellules
concernés")
en B1 je fais la somme de x AUTRES cellules "=somme("toutes les cellules
AUTRES concernés")
Et si tout est bon, A1 = B1
mais s'il y a une faute de frappe (nombre incorrect) dans les cellules
qui composent le total affiché en A1 ou B1, je le contrôle par la MEFC
en MEFC j'ai mis pour A1 & B1 ¡<>B1 (avec motif rouge)
donc si A1 est différent de B1 le motif est rouge
et si A1 = B1 le motif est celui du format de la cellule (gris)
cette feuille est ensuite envoyée par mail,
mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas
de
cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
penses-tu que c'est possible?
@+
cordialement
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Dans ta situation, à l'évidence, tu ne parles pas
des erreurs générées par Excel.
Pour tester si une mise en forme conditionnelle est en
application sur la plage de cellules, tu dois tester chacune
des cellules de la plages de cellules affectées de cette mise
en forme conditionnelle pour vérifier si la condition stipulée
est effectivement vérifiée.
Exemple de code :
'-------------------------------------
Sub Test()
Dim C As Range, X As Integer
With Worksheets("Feuil1")
'Définir la plage
For Each C In .Range("A1:A50")
'Définir la ou les conditions de la MEFC
If C.Value <> C.Offset(, 1) Then
X = X + 1
End If
Next
End With
If X <> 0 Then
MsgBox X & " erreurs trouvées"
Else
MsgBox "Aucune erreur"
End If
End Sub
'-------------------------------------
"ThierryK" a écrit dans le message de
groupe de discussion
:
Bonjour michdenis
et merci de t'intéresser à mon problème
en effet je n'ai pas été assez précis,
En A1 je fais la somme de x cellules "=somme("toutes les cellules
concernés")
en B1 je fais la somme de x AUTRES cellules "=somme("toutes les cellules
AUTRES concernés")
Et si tout est bon, A1 = B1
mais s'il y a une faute de frappe (nombre incorrect) dans les cellules
qui composent le total affiché en A1 ou B1, je le contrôle par la MEFC
en MEFC j'ai mis pour A1 & B1 ¡<>B1 (avec motif rouge)
donc si A1 est différent de B1 le motif est rouge
et si A1 = B1 le motif est celui du format de la cellule (gris)
cette feuille est ensuite envoyée par mail,
mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas
de
cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
penses-tu que c'est possible?
@+
cordialement
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas de
cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas de
cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas de
cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
Bonjour à toutes & à tous
et tous mes voux de santé, bonheur et prospérité pour cette nouvelle année
sur une feuille, j'ai de nombreuses Mise En Forme Conditionnelles (MEFC)
pour contrôler les erreurs:
exemple: MEFC pour les 2 cellules A1 & B1:
si A1<>B1 alors Format texte en gras et motif rouge
en théorie s'il n'y a pas d'erreur sur ma feuille, aucune MEFC ne
devrait s'appliquer.
mais comment vérifier qu'aucune MEFC n'est appliqué sur toute ma feuille?
en vous remerciant d'avance pour votre aide et vos conseils
ThierryK
Windows XP Pro SP3
Office 2003
"ThierryK" a écrit dans le message de
news:mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas
de cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
Pourquoi ne pas comparer la somme des 2 plages plutôt que de passer en
revue chacune des cellules pour avoir une alerte ?
If Application.Sum(Range("plage1")) <> Application.Sum(Range("plage2"))
Then
..............
Etc
"ThierryK" <thierryx.kolby@zlaposzte.nxet> a écrit dans le message de
news: uAlSnh7iKHA.1420@TK2MSFTNGP05.phx.gbl...
mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas
de cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
Pourquoi ne pas comparer la somme des 2 plages plutôt que de passer en
revue chacune des cellules pour avoir une alerte ?
If Application.Sum(Range("plage1")) <> Application.Sum(Range("plage2"))
Then
..............
Etc
"ThierryK" a écrit dans le message de
news:mais avant expédition, je souhaiterai m'assurer (par VBA) qu'il n'y a pas
de cellule avec le motif de la MEFC en rouge
et cela sur toute la feuille (environ 50 MEFC)
Pourquoi ne pas comparer la somme des 2 plages plutôt que de passer en
revue chacune des cellules pour avoir une alerte ?
If Application.Sum(Range("plage1")) <> Application.Sum(Range("plage2"))
Then
..............
Etc