Je commence à apprendre comment utiliser VBA, et je voulais mettre en place une formule dans un fichier ( pour l'instant vierge). le but de la formule sera de remplacer les "." par des ",". j'ai essayé d'utiliser la formule replace(variable,".",","), mais à chaque fois que je rajoute des chiffres au fichier et j'essaye d'exécuter la macro je reçois un message d'erreur de compilation disant numéro de ligne ou étiquette ou instruction ou fin d'instruction. Est ce que quelqu'un içi pourra m'aider à resoudre ce problème svp ?
'Ici on contrôle la colonne B <== à adapter si c'est pour une autre colonne
Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("B:B")) Is Nothing Then 'A adapter ==> Range("B:B)
[B:B].Replace ".", ".", xlPart 'A adapter ==> [B:B]
End If
End Sub
il y a la fonction replace VBA issue de VB et la fonction replace pour les cellules mais le code ne s'ecrit pas pareil
----------------------------------------------------------------------------------------------------------------- replacer un string
formulation:
=replace( [la chaîne à examiner] , [le caractère à remplacer] , [le caratere de remplacement]
exemple
VB:
toto="15.45"
toto=replace(toto,".",",")
msgbox toto
replacer dans une/des cellules
la formulation je la trouve très similaire au language Js) objectRange.replace( [carateres à remplacer] , [caractere de remplacement] )
Merci à tous pour vos réponses mais j'ai toujours le mm problème, à chaque fois que j'ai + de 2 chiffres après la virgule (100.464 par exemple) après exécution du code, j'obtiens 100464 et pas 100,464, pourtant pour 2 chiffres ou moins après la virgule j'obtiens les résultats désirés.
Quelqu'un aura une idée de la cause ?