Comparaison avec MFC qui donne des erreurs
Résolu/Fermé
capeo
Messages postés
181
Date d'inscription
samedi 16 août 2014
Statut
Membre
Dernière intervention
29 juin 2015
-
5 mars 2015 à 12:59
capeo Messages postés 181 Date d'inscription samedi 16 août 2014 Statut Membre Dernière intervention 29 juin 2015 - 5 mars 2015 à 18:02
capeo Messages postés 181 Date d'inscription samedi 16 août 2014 Statut Membre Dernière intervention 29 juin 2015 - 5 mars 2015 à 18:02
A voir également:
- Comparaison avec MFC qui donne des erreurs
- Comparaison prix amazon - Guide
- Dans la table des matières de ce document, le chapitre 6 et ses 2 sections n'apparaissent pas. trouvez l'erreur dans la structure du document et corrigez-la. mettez à jour la table des matières. quel est le mot formé par les lettres en majuscules de la table des matières après sa mise à jour ? - Forum Word
- Pour participer à un jeu, josé doit donner un nom de code à chacun des membres de son équipe. il veut utiliser le code binaire. il essaie avec seulement 3 bits. mais cela ne suffit pas. combien de membres n'auront pas de code ? ✓ - Forum Powerpoint
- J'ai donné mon numéro de téléphone a un inconnu - Forum Mobile
- L'url suivante, censée aboutir à un article, donne lieu à une redirection indiquant que la page n'a pas été trouvée. retrouvez la page recherchée. reportez le titre de l’article et son auteur. - Forum Microsoft Edge / Internet Explorer
2 réponses
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
523
5 mars 2015 à 13:42
5 mars 2015 à 13:42
Bonjour,
Comme tu pourras le constater, dans ma feuille il n'y a qu'une MFC alors que dans la tienne il y en avait ... un certain nombre.
https://www.cjoint.com/c/ECfnZqEfFUe
A+
Comme tu pourras le constater, dans ma feuille il n'y a qu'une MFC alors que dans la tienne il y en avait ... un certain nombre.
https://www.cjoint.com/c/ECfnZqEfFUe
A+
via55
Messages postés
14405
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
25 avril 2024
2 703
Modifié par via55 le 5/03/2015 à 13:42
Modifié par via55 le 5/03/2015 à 13:42
Bonjour
1) tu as plein de règles dans ta MFC, don certaines avec des refs non valables
2) les plages indiquées ne sont pas bonnes (A:A au lieu de B:B
Va dans Gérer les règles et supprimes toutes les règles puis tu en fais une seule avec la formule !
=si(NB.SI(B:B;A1)=0
et dans s'applique à : A:A
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
1) tu as plein de règles dans ta MFC, don certaines avec des refs non valables
2) les plages indiquées ne sont pas bonnes (A:A au lieu de B:B
Va dans Gérer les règles et supprimes toutes les règles puis tu en fais une seule avec la formule !
=si(NB.SI(B:B;A1)=0
et dans s'applique à : A:A
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
capeo
Messages postés
181
Date d'inscription
samedi 16 août 2014
Statut
Membre
Dernière intervention
29 juin 2015
Modifié par capeo le 5/03/2015 à 14:09
Modifié par capeo le 5/03/2015 à 14:09
Bonjour
Je ne sais plus ou j'ai la tête
Cette formule je l'applique assez souvent. Les références venant de deux endroits, les écritures sont différentes. L'une est entrée à courir, c'est à dire sans "-" et l'autres les intègre ce qui fait que j'ai des fausses erreurs.
Y aurait il une formule ou une macro qui permettrait de faire comme la MFC, mais au lieu de colorier les données, se serait de les placés dans une autre colonne et de m'enlever ces erreurs.
Peux-tu m'aider stp ?
Encore merci
Bonne journée
Je ne sais plus ou j'ai la tête
Cette formule je l'applique assez souvent. Les références venant de deux endroits, les écritures sont différentes. L'une est entrée à courir, c'est à dire sans "-" et l'autres les intègre ce qui fait que j'ai des fausses erreurs.
Y aurait il une formule ou une macro qui permettrait de faire comme la MFC, mais au lieu de colorier les données, se serait de les placés dans une autre colonne et de m'enlever ces erreurs.
Peux-tu m'aider stp ?
Encore merci
Bonne journée
via55
Messages postés
14405
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
25 avril 2024
2 703
>
capeo
Messages postés
181
Date d'inscription
samedi 16 août 2014
Statut
Membre
Dernière intervention
29 juin 2015
5 mars 2015 à 14:54
5 mars 2015 à 14:54
Re
Bien volontiers,
macro pour couper et copier en feuille 2 les refs de la colonne A non présentes dans la colonne B :
Bonne journée également
Bien volontiers,
macro pour couper et copier en feuille 2 les refs de la colonne A non présentes dans la colonne B :
Sub copier()
Application.ScreenUpdating = False
Dim ligne As Long
'dernière ligne remplie en colonne 1 de base
ligne = Sheets("Feuil1").Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row
' boucle sur les lignes
For n = 1 To ligne
si nb.si=0
If Application.WorksheetFunction.CountIf(Sheets("Feuil1").Range("B:B"), Sheets("Feuil1").Range("A" & n)) = 0 Then
' couper en A feuil1
Sheets("Feuil1").Select
Range("A" & n).Select
Selection.Cut
'incremente ligne en feuil2 et colle en feuil 2
x = x + 1
Sheets("Feuil2").Select
Range("A" & x).Select
ActiveSheet.Paste
End If
Next
Application.ScreenUpdating = True
End Sub
Bonne journée également
capeo
Messages postés
181
Date d'inscription
samedi 16 août 2014
Statut
Membre
Dernière intervention
29 juin 2015
5 mars 2015 à 15:23
5 mars 2015 à 15:23
via55
Messages postés
14405
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
25 avril 2024
2 703
>
capeo
Messages postés
181
Date d'inscription
samedi 16 août 2014
Statut
Membre
Dernière intervention
29 juin 2015
5 mars 2015 à 17:10
5 mars 2015 à 17:10
Dsl
j'ai oublié l'apostrophe devant la ligne de commentaire Si nb.si
Bonne macro :
j'ai oublié l'apostrophe devant la ligne de commentaire Si nb.si
Bonne macro :
Sub copier()
Application.ScreenUpdating = False
Dim ligne As Long
'dernière ligne remplie en colonne 1 de base
ligne = Sheets("Feuil1").Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row
' boucle sur les lignes
For n = 1 To ligne
'si nb.si = 0
If Application.WorksheetFunction.CountIf(Sheets("Feuil1").Range("B:B"), Sheets("Feuil1").Range("A" & n)) = 0 Then
' couper en A feuil1
Sheets("Feuil1").Select
Range("A" & n).Select
Selection.Cut
'incremente ligne en feuil2 et colle en feuil 2
x = x + 1
Sheets("Feuil2").Select
Range("A" & x).Select
ActiveSheet.Paste
End If
Next
Application.ScreenUpdating = True
End Sub
capeo
Messages postés
181
Date d'inscription
samedi 16 août 2014
Statut
Membre
Dernière intervention
29 juin 2015
5 mars 2015 à 18:02
5 mars 2015 à 18:02
Merci
cela fonctionne du tonnerre
merci via55
Cdlt
cela fonctionne du tonnerre
merci via55
Cdlt
5 mars 2015 à 13:54
merci pour ta formule
Bonne journée
Cdlt