XL 2016 Recherche programme VBA pour remplacer un "." par "/"

sylvanu à dit:

Bonjour Douangxay,
Pourquoi un VBA ?
Aprés avoir sélectionné vos cellules, il suffit de faire Acceuil/Rechercher/Remplacer et mettre "." et "/".
Sinon en VBA cela donnerait ça :

Code:

Sub Remplacer()
For i = 1 To 100 ' Nb lignes'
    For j = 1 To 10 ' Nb colonnes'
        Cells(i, j) = Replace(Cells(i, j), ".", "/")
    Next j
Next i
End Sub

Qu'il faut adapter à votre plage.

Cliquez pour agrandir...

nikho6951 à dit:

Salut !
Si tu veux le faire une seule fois :
tu sélectionnes tes cellules, puis appuies sur ctrl + H
qui te permet de remplacer un ou plusieurs caractères par d'autres
Si tu veux automatiser :
Sub Remplacer()
For each cell in selection
cell.value = Replace(cell.value, ".", "/")
Next
End Sub
Si tu veux la valeur dans une nouvelle cellule :
=substitue(A1;".";"/")

Bonne journée !

Cliquez pour agrandir...

douangxay à dit:

Bonjour nikho6951,
Je vous remercie pour votre solution, je suis en train d'apprendre le VBA.
Bonne soirée.

Cliquez pour agrandir...