RECHERCHER-REMPLACER "," par "." VBA
Bonjour,
J'ai besoin de votre aide.
j'ai un fichier excel pour le travail que je créé a partir d'un autre fichier via une maccro.
Ce fichier est un fichier d'import pour un logiciel. Cependant les virgules sont interdites dans ce fichier sous peine de rater l'import.
Bien sûr le "Rechercher-remplacer" manuel fonctionne parfaitement, mais bon on est la pour optimiser! Donc je voudrais à l'aide d'une ligne de code supplémentaire remplacer toutes les "," par des "." dans les colonnes ("A:AE").
Ca fait 10 jours que j'y suis et j'ai beau éplucher les forums et utiliser l'enregistreur de maccro, rien n'y fait. Je n'ai pas de bug dans les maccros que j'utilise, mais ca ne fonctionne pas, toutes les virgules restent.
J'ai éssayé au moins ces deux codes (les autres je les ais effacés)
Solution 1-
'Range("A:ae") = Replace(Range("A:ae"), ",", ".") * 1
Solution 2-
'D'abord mettre les colonnes en format texte
'Columns("a:ae").Select
'Selection.NumberFormat = "@"
'Columns("A:AE").Replace What:=",", Replacement:=".", LookAt:=xlPart, _
'SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
'ReplaceFormat:=False
Je vous met un fichier exemple très basique (mais pas le fichier original qui n'a pas de sens sans les autres données qui sont confidentielles
Pourriez-vous m'aider?
Merci d'avance.
Bonjour et bienvenue sur le forum
Un essai à tester. Te convient-il ?
Bye !
Bonsoir Ari29, gmb,
je te retourne ton fichier modifié :
Ctrl e ➯ travail effectué !
Alt F11 pour voir le code VBA, puis revenir sur Excel
si besoin, tu peux demander une adaptation.
merci de me dire si ça te convient.
dhany
Bonjour,
Simplement :
Sub Test()
Range("A1").CurrentRegion.FormulaLocal = Range("A1").CurrentRegion.Formula
End SubBonjour et bienvenue sur le forum
Un essai à tester. Te convient-il ?
Bye !
Bonjour à tous et merci pour vos réponses!
Ca fonctionne parfaitement @gmb, merci!
Pourrais-tu m'expliquer ce bout de code, que j'en apprenne un peu plus? J'aime bien comprendre pourquoi ca marche et la je ne comprends absolument rien
Merci!
Bonjour Ari29
As-tu essayé mon code, il est tellement plus simple et plus rapide !
Bonjour Patrice,
Bonjour Ari29
As-tu essayé mon code, il est tellement plus simple et plus rapide !
Pour code VBA sur forum.xlsm
Merci pour cette ligne bien pratique mais qui ne correspond pas tout à fait à mes besoin, j'ai tous types de données et besoin d'aucune virgule
Le même avec macro commentée.
Bye !
Merci pour les explications!
Bonne continuation à tous, à bientôt sur le forum