Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

macro pour remplacer les points par des espaces qui ne fonctionne pas

  • Initiateur de la discussion Initiateur de la discussion Melomie
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Melomie

XLDnaute Occasionnel
Bonjour à tous,

Je vous joint un fichier exemple (qui correspond à mon fichier mais en version "light"), vous verrez j'ai fais 2 macro : une pour remplacer les points "." par des espaces " ", et une pour fermer le fichier sans enregistrer.

Problème : ma macro ne remplace pas les points je ne sais pas pourquoi !

Petite précision : je suis débutante ^^
et j'utilise Excel 2003

merci !!
 

Pièces jointes

  • ED.xls
    ED.xls
    103.5 KB · Affichages: 75
  • ED.xls
    ED.xls
    103.5 KB · Affichages: 76
  • ED.xls
    ED.xls
    103.5 KB · Affichages: 83
Dernière édition:
Re : macro pour remplacer les points par des espaces qui ne fonctionne pas

ah oui mince... à la base les nombres de la colonne B sont tirés d'une extraction SAp ce qui donne des nombres du type : 74.418 ou 418.156
 
Re : macro pour remplacer les points par des espaces qui ne fonctionne pas

en fait il me faudrait une macro (enfin je pense) car mon objectif est de créer un bouton qui permette de remplacer les points par des espaces.
Je suis entrain de créer un fichier qui doit être le plus simplifié possible car ce n'est pas moi qui vais l'utiliser par la suite, le but est donc de leur "mâcher" le travail... Ces personnes vont extraire des données d'SAp et les coller dans mon tableau, le problème c'est que les extracts d'SAP contiennent des points, que je chercher donc à pouvoir supprimer d'un simple geste (grâce à un bouton)
 
Re : macro pour remplacer les points par des espaces qui ne fonctionne pas

ça a l'air de fonctionner, merci Pierro93 !

pour info voici mon code :
Code:
'pour convertir les données :
     Range("C3:C39").Select
    ActiveWindow.SmallScroll Down:=-30
    Selection.TextToColumns Destination:=Range("C3"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, FieldInfo _
        :=Array(1, 1), ThousandsSeparator:=".", TrailingMinusNumbers:=True

'pour mettre le séparateur de milliers :
    Range("C3:C39").Select
    Selection.NumberFormat = "#,##0"
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…