Aide Macro

medamine

XLDnaute Nouveau
bonsoir les Amis,

j'ai besoin de votre aide pour me facilité le travail, je veux une macro qui me permet d'avoir un format de numéro de tel toute attaché sans une séparation.
le format actuel est de cette façon exp 01.xx.xx.xx.xx avec un point qui sépare deux chiffres et je veux avoir ce format exp 01xxxxxxxx
veuillez trouver ci-joint un fichier explicatif

merci d'avance

Cordialement,
 

Pièces jointes

  • demande.zip
    276 bytes · Affichages: 45
  • demande.zip
    276 bytes · Affichages: 19
  • demande.zip
    276 bytes · Affichages: 22

Robert

XLDnaute Barbatruc
Repose en paix
Re : Aide Macro

Bonsoir le fil, bonsoir le forum,

Je te propose la macro ci-dessous :
Code:
Sub Macro1()
For Each cel In Range("A2:A" & Range("A65536").End(xlUp).Row)
    cel.Value = Replace(cel.Value, ".", "")
Next cel
End Sub
 

Discussions similaires

  • Question
Microsoft 365 TEXTBOX
Réponses
7
Affichages
406
Réponses
12
Affichages
305

Statistiques des forums

Discussions
312 595
Messages
2 090 093
Membres
104 374
dernier inscrit
cheick.coulibaly@dcsmali.