Bonjour, je vous montre mon probleme. Je possede une liste comme ça:
 
fax 02.97.76.22.76
fax 02.97.87.05.79
fax 02.97.64.17.67
fax 02.97.64.19.85
fax 02.97.83.64.75
fax 02.97.64.40.23
fax 02.97.84.22.86
fax 02.97.82.19.18
 
 
 
Avec quel logiciel dois-je procéder pour qu'il me modifi le fichier texte pour que j'obtienne ça, car j'en ai des millier a faire
 
0297762276
0297870579
0297641767
etc...
 
Merci de m'aider

Bonjour droyze,
 
Pour ton petit problème, je peux te proposer Excel avec la procédure ci-dessous.
 
Pour l'employer, tu inscris tes numéros dans la colonne A d'une feuille Excel.
Dans VBA, dans la feuille que tu utilises, tu copies cette procédure.
 
Tu exécutes la procédure et tu récupère dans la colonne B, les numéros débarrassés des points et de "FAX ".
 
' Voici la procédure =====================================
 
'Transforme un texte "FAX 12.34.56.78.90" en nombre 1234567890
Dim I, J, K, L, M
Dim Li, Col
 
I = 0
J = 0
Li = 1
Col = 1
K = ""
 
For Li = 1 To 65535 'Lire toutes les ligne de la feuille active
    'Si on a une cellule vide dans la colonne, on arrête le travail
    'puisqu'on est arrivé à la fin de la liste.
    If IsEmpty(ActiveSheet.Cells(Li, Col)) Then
        Exit For
    Else
        'On récupère les 10 chiffres avec leurs points de séparations
        I = Right(ActiveSheet.Cells(Li, Col), Len(ActiveSheet.Cells(Li, Col)) - 4)
        K = ""
    End If
     
    'On va supprimer les points pour ne conserver que les chiffres
    'à la suite les uns des autres pour chaque cellule visitée
    For J = 1 To Len(I)
        If Left(I, 1) <> "." Then
            K = K & Left(I, 1)
            I = Right(I, Len(I) - 1)
        Else
            I = Right(I, Len(I) - 1)
        End If
    Next J
    'On récupère le numéro dans la colonne B
    ActiveSheet.Cells(Li, Col + 1).Value = K
 
Next Li
 
End Sub
 
' Fin de la procédure ====================================
 
J'espère t'avoir aidé.
A+

Merci je te tient au courant

Sans VBA et avec un simple bloc-notes, avec le fonction "Remplacer", c'est faisable en quelques secondes.

 
 
+1

oaui la fonction remplacer marche bien mais 1 par 1

 
 
en 2 remplacés, j ai nettoyé ton exemple

"Remplacer Tout", ca existe.
Si c'est pas directement dans notepad, ca doit y etre dans word.
 
Edit: c'est bien dans le bloc-note de windows aussi.
Remplacer.
Premiere case: .
Deuxieme case:  
Et ensuite, bouton "remplacer tout", ca traite l'integralité du document.

 
Le notepad est par contre super-lent pour faire ça, s'il a des milliers de ligne Word (ou n'importe quel editeur de texte digne de ce nom) ira beaucoup plus vite.

une ligne de commande sed et le tour est jouer

Merci Word le fait super bien, merci a tous

Yep. En cela, Wordpad doit être plus rapide que le bloc-notes (pour ceux qui n'ont pas Office)