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 :

Replace - 999999,999


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Rédacteur technique
    Inscrit en
    Mars 2015
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Rédacteur technique

    Informations forums :
    Inscription : Mars 2015
    Messages : 13
    Par défaut Replace - 999999,999
    Bonjour à tous,
    Sur un fichier xlsm,
    J'ai un petit soucis pour remplacer la valeur -999999,999 par, ""
    En utilisant une sub.... sélection. Replace What:="-999999,999", Replacement:="",.....celle ci ne fonctionne pas même en changeant le format cellule en texte.
    Quelqu'un peut il m'aider à comprendre pourquoi ?

  2. #2
    Expert confirmé
    Avatar de MarcelG
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2009
    Messages
    3 449
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Maine et Loire (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2009
    Messages : 3 449
    Billets dans le blog
    7
    Par défaut
    Bonjour Yomasaab, et bienvenu sur le Forum,

    Plutôt que de remplacer la valeur, teste-la et change la.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    With c
        If .Value = -9999 Then .Value = ""
    End With

  3. #3
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par YOMASAAB Voir le message
    En utilisant une sub.... sélection. Replace What:="-999999,999", Replacement:="",.....celle ci ne fonctionne pas même en changeant le format cellule en texte.
    Essaye
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Selection.Replace What:=-999999.999, Replacement:=""
    Reste à savoir aussi ce que contient "Selection" (qui, d'ailleurs, est vraisemblablement inutile).

    Il faudrait aussi savoir si la valeur à remplacée est la valeur réelle contenue par la cellule ou celle affichée en utilisant un format.

  4. #4
    Expert confirmé
    Avatar de MarcelG
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juillet 2009
    Messages
    3 449
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Maine et Loire (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2009
    Messages : 3 449
    Billets dans le blog
    7
    Par défaut
    Dis-moi si je me trompe.
    L'argument LookAt (comme d'autres) de la méthode Replace est le dernier enregistré d'où cette obligation, à défaut "précaution", de déclarer cet argument.
    Moi-même, le premier, n'y pensant pas toujours, je préfère tester sur la valeur.
    L'inconvénient, je le reconnais, est l'obligation de balayer cellule par cellule

  5. #5
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par MarcelG Voir le message
    L'argument LookAt (comme d'autres) de la méthode Replace est le dernier enregistré d'où cette obligation, à défaut "précaution", de déclarer cet argument.
    Je n'ai pas fais le test (et je peux donc me tromper) mais j'ai l'impression que l'argument LooAt de Replace est plutôt fait pour les chaines de caractères. Perso, j'aurais des réticences à utiliser xlPart pour une valeur numérique.

  6. #6
    Membre averti
    Homme Profil pro
    Rédacteur technique
    Inscrit en
    Mars 2015
    Messages
    13
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Rédacteur technique

    Informations forums :
    Inscription : Mars 2015
    Messages : 13
    Par défaut
    Merci pour votre aide, sélection concernait plusieurs colonnes Q à W, et un nombre aléatoire de valeurs à remplacer. (dans mon cas 3500). J'étais resté bloqué sur une macro enregistré... 🙄

  7. #7
    Rédacteur/Modérateur


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    Novembre 2003
    Messages
    19 125
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : Novembre 2003
    Messages : 19 125
    Billets dans le blog
    131
    Par défaut
    Salut.

    Les méthodes FIND et REPLACE singent l'utilisation de la fenêtre RECHERCHER/REMPLACER d'Excel, en conservant les options précédemment utilisées qui ne sont pas précisées dans le code VBA. Il est donc conseillé de préciser LookIn et LookAt à chaque utilisation de FIND/REPLACE.

    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

  8. #8
    Expert confirmé Avatar de BENNASR
    Homme Profil pro
    Responsable comptable & financier
    Inscrit en
    Décembre 2013
    Messages
    2 974
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Responsable comptable & financier
    Secteur : Finance

    Informations forums :
    Inscription : Décembre 2013
    Messages : 2 974
    Par défaut
    Bonjour à tous
    sans VBA (penser Excel avant de penser VBA )
    Sélectionner la colonne appropriée
    Ctrl+H
    Selectionner ce "-999999.999"
    Coller dans RECHERCHER
    rien dans REMPLCER
    cliquer sur remplacer tout

Discussions similaires

  1. [ODBC] Fonction Replace en ODBC
    Par Alexandre T dans le forum Access
    Réponses: 4
    Dernier message: 10/01/2007, 12h02
  2. problème avec "replace"
    Par lilipuce83 dans le forum ASP
    Réponses: 3
    Dernier message: 26/05/2004, 17h42
  3. [C#] Methode Replace
    Par pc152 dans le forum ASP.NET
    Réponses: 2
    Dernier message: 22/05/2004, 18h17
  4. Prob d'execution de REPLACE *** INTO
    Par Mystman dans le forum Langage SQL
    Réponses: 6
    Dernier message: 26/04/2004, 17h41
  5. Cherche Fonction du style replace...
    Par sdchamplas dans le forum Langage SQL
    Réponses: 4
    Dernier message: 31/03/2003, 14h54

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