IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Eliminer les "0" d'une feuille excel


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Homme Profil pro
    Architecte matériel
    Inscrit en
    Août 2014
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Algérie

    Informations professionnelles :
    Activité : Architecte matériel

    Informations forums :
    Inscription : Août 2014
    Messages : 7
    Par défaut Eliminer les "0" d'une feuille excel
    bonjour
    je veux une macros qui eface touts les "0" zero de ma feuille excel


    salutation

  2. #2
    Membre Expert Avatar de QuestVba
    Homme Profil pro
    Enseignant
    Inscrit en
    Juillet 2012
    Messages
    2 475
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Belgique

    Informations professionnelles :
    Activité : Enseignant
    Secteur : Service public

    Informations forums :
    Inscription : Juillet 2012
    Messages : 2 475
    Par défaut
    Bonjour,

    Sans macro

    Faire un "CTRL+H" et remplacer les '0' par du vide

    Avec macro

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Sub Supprimer_Zero()
     
    Selection.SpecialCells(xlCellTypeConstants, 1).Select
       For Each cellule In Selection
          If cellule.Value = 0 Then cellule.Clear
       Next
     
    End Sub

  3. #3
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 169
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Ou encore pour la plage A2:J31
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("A2:J31").Replace What:=0, Replacement:="", LookAt:=xlWhole
    L'équivalent du Rechercher/Remplacer (Ctrl+H)
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

  4. #4
    Expert éminent

    Profil pro
    Conseil, Formation, Développement - Indépendant
    Inscrit en
    Février 2010
    Messages
    8 562
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations professionnelles :
    Activité : Conseil, Formation, Développement - Indépendant

    Informations forums :
    Inscription : Février 2010
    Messages : 8 562
    Par défaut
    Bonjour

    On peut aussi les masquer sans les effacer (notamment s'ils résultent de formules) :
    • soit par l'option qui permet de ne pas afficher les 0 dans un onglet
    • soit par un format de nombre approprié
    • soit par une mise en forme conditionnelle

  5. #5
    Membre du Club
    Homme Profil pro
    Architecte matériel
    Inscrit en
    Août 2014
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Algérie

    Informations professionnelles :
    Activité : Architecte matériel

    Informations forums :
    Inscription : Août 2014
    Messages : 7
    Par défaut eliminer les "0" dans une feuille
    bonjour

    merci pour votre reponce et support ,il ya un petit problème je ne veux éliminer que les zéro qui sont seul , pas les zéros dans une chaine de caractère , par exemple si je trouve le 0 je l’élimine , mais pas 1950


    merci

  6. #6
    Membre Expert
    Homme Profil pro
    Chef de projet en SSII
    Inscrit en
    Novembre 2011
    Messages
    1 503
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Irlande

    Informations professionnelles :
    Activité : Chef de projet en SSII

    Informations forums :
    Inscription : Novembre 2011
    Messages : 1 503
    Par défaut
    Salut magicien74,

    Excel te propose ceci :

    http://office.microsoft.com/fr-fr/ex...010070461.aspx

    Cordialement,
    Kimy

  7. #7
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 169
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    merci pour votre reponce et support ,il ya un petit problème je ne veux éliminer que les zéro qui sont seul , pas les zéros dans une chaine de caractère , par exemple si je trouve le 0 je l’élimine , mais pas 1950
    Dans la solution en VBA que je t'ai proposée, c'est ce qui se passe. As-tu fais un test ?
    Si tu le fais manuellement, il ne faut pas oublier de cocher l'option Totalité du contenu de la cellule. C'est l'argument nommé LookAt dont la valeur est la constante xlWhole
    Cependant, pour garder une cohérence dans la liste de données je suis partisan de l'option d'affichage de la feuille. Solution que t'a suggéré Chris.
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

  8. #8
    Membre du Club
    Homme Profil pro
    Architecte matériel
    Inscrit en
    Août 2014
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Algérie

    Informations professionnelles :
    Activité : Architecte matériel

    Informations forums :
    Inscription : Août 2014
    Messages : 7
    Par défaut
    bonjour
    non ca ne marche pas

    merci

  9. #9
    Membre extrêmement actif
    Avatar de NVCfrm
    Homme Profil pro
    Administrateur Système/Réseaux - Developpeur - Consultant
    Inscrit en
    Décembre 2012
    Messages
    1 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations professionnelles :
    Activité : Administrateur Système/Réseaux - Developpeur - Consultant
    Secteur : High Tech - Produits et services télécom et Internet

    Informations forums :
    Inscription : Décembre 2012
    Messages : 1 037
    Billets dans le blog
    5
    Par défaut
    bonjour,
    par quelle magie, voudrais-tu qu'on sache ce qui ne marches pas ?

    Il te suffit de creuser un petit peu...

  10. #10
    Membre Expert
    Homme Profil pro
    Chef de projet en SSII
    Inscrit en
    Novembre 2011
    Messages
    1 503
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Irlande

    Informations professionnelles :
    Activité : Chef de projet en SSII

    Informations forums :
    Inscription : Novembre 2011
    Messages : 1 503
    Par défaut WTF ?
    Citation Envoyé par magicien74 Voir le message
    bonjour
    non ca ne marche pas

    merci

  11. #11
    Inactif  

    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2012
    Messages
    4 903
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Finance

    Informations forums :
    Inscription : Janvier 2012
    Messages : 4 903
    Billets dans le blog
    36
    Par défaut
    Cela a déjà été invoqué, mais la maqie n'a visiblement pas suffisamment fonctionné.
    Ma magie me fait regarder dans Excel 2010, parce que je n'en ai pas d'autre:

    1) Prononcer au moins une fois : Abracadabri, Abracadabra;

    2) Ouvrir les options

    3) Ouvrir les Options avancées

    4) Dans la colonne de droite, trouver la Section "Afficher les options pour cette feuille de calcul :"

    5) Descendre jusqu'à la Case : Afficher un zéro dans les cases qui ont une valeur nulle.

    6) Enligner le pointeur de souris sur la petite case au début de la ligne

    7) Cliquer avec le bouton gauche de la souris, si la souris est configurée pour les droitiers.

    7 a) Si la souris est configurée pour les gauchers, la magie va fonctionner à la condition de cliquer avec le bouton droit.

    8) Cliquer sur OK

    Une autre magie, c'est de mettre les cellules valant zéro, sur une ou des lignes dédiées et masquer la ligne.

    Si aucune de l'ensemble des magies proposées ne convient, il reste la magie ultime de mettre du liquide correcteur ou du ruban gommé opaque aux bons endroits sur l'écran.

    Fin de la magie sarcastique, du moins pour l'instant.

    "Nul n'est tenu à l'impossible"

  12. #12
    Membre Expert
    Homme Profil pro
    Chef de projet en SSII
    Inscrit en
    Novembre 2011
    Messages
    1 503
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Irlande

    Informations professionnelles :
    Activité : Chef de projet en SSII

    Informations forums :
    Inscription : Novembre 2011
    Messages : 1 503
    Par défaut
    Citation Envoyé par clementmarcotte Voir le message
    Prononcer au moins une fois : Abracadabri, Abracadabra;

    [...]

    Si aucune de l'ensemble des magies proposées ne convient, il reste la magie ultime de mettre du liquide correcteur ou du ruban gommé opaque aux bons endroits sur l'écran.

    Fin de la magie sarcastique, du moins pour l'instant.

    "Nul n'est tenu à l'impossible"
    J'adore !!!

    Si, avec tes explications, notre ami ne s'en sort pas, surtout avec cette partie, c'est vraiment que ne nous sommes pas tous égaux et que la magie est parfois inopérante chez certains... malheureusement...

    Vive les "Abracadabri" !

  13. #13
    Membre du Club
    Homme Profil pro
    Architecte matériel
    Inscrit en
    Août 2014
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Algérie

    Informations professionnelles :
    Activité : Architecte matériel

    Informations forums :
    Inscription : Août 2014
    Messages : 7
    Par défaut
    bonjour
    j'ai essayer cette option( c'est plus facile et plus général) , ca marche tres bien , mais mon soucci et de savoir si j'envoi mon fichier a mon amis est ce que ca marche ou pas ?

  14. #14
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 169
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    j'ai essayer cette option( c'est plus facile et plus général) , ca marche tres bien
    Non seulement c'est plus simple masi c'est plus cohérent. Dans une liste de données contenant des valeurs il faut privilégier les valeurs nulles aux cellules vides. D'où l'intérêt de les masquer
    , mais mon soucci et de savoir si j'envoi mon fichier a mon amis est ce que ca marche ou pas ?
    Bien entendu, cette option est liée à la feuille (cette une propriété de la feuille) et elle accompagne le classeur. De même si on copie cette feuille vers un autre classeur, la propriété suit.
    Donc dans un classeur on peut avoir des feuilles affichant les valeurs nulles et d'autres pas.
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

  15. #15
    Expert éminent

    Profil pro
    Conseil, Formation, Développement - Indépendant
    Inscrit en
    Février 2010
    Messages
    8 562
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations professionnelles :
    Activité : Conseil, Formation, Développement - Indépendant

    Informations forums :
    Inscription : Février 2010
    Messages : 8 562
    Par défaut
    Bonjour

    Ce n'est plus de la magie, c'est le miracle de la multiplication des posts !

    10 posts de plus pour finalement opter pour la 1ère solution proposée au post 4, certes sans entrer dans les détails, mais ceux-ci on été proposés au post 6 puis repris au post 11.

    Le magicien devrait enlever le bandeau : c'est mieux pour lire !

  16. #16
    Membre Expert
    Avatar de Igloobel
    Homme Profil pro
    Développeur ERP - VBA et Formateur bureautique
    Inscrit en
    Septembre 2005
    Messages
    1 871
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loiret (Centre)

    Informations professionnelles :
    Activité : Développeur ERP - VBA et Formateur bureautique
    Secteur : Industrie

    Informations forums :
    Inscription : Septembre 2005
    Messages : 1 871
    Billets dans le blog
    1
    Par défaut
    Bonjour à tous,

    Personellement pour répondre à la question de départ
    je veux une macros qui eface touts les "0" zero de ma feuille excel
    pour cela pas besoin de macro pour le faire :

    Format de cellule - Nombre - Personnalisée et dans type je tape : #

    et c'est tout

    Est-ce que cela te convient ? tu Dis

    A bientôt

Discussions similaires

  1. Réponses: 0
    Dernier message: 29/12/2011, 09h53
  2. [XL-2003] Enregistrer les données des textbox dans une feuille excel
    Par monichou86 dans le forum Macros et VBA Excel
    Réponses: 16
    Dernier message: 06/01/2010, 15h24
  3. comment récupérer les données dans contact sur une feuille excel?
    Par Granfred dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 15/01/2009, 15h02

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo