fomule pour numero de telephone

[hicham28]

bonjour a vous, et meci d'avance de votre aide

j'ai un macro ou j'ai mis la formule suivante pour la saisie de numero de telephone :

Tel.Value = Format(Tel.Value, "05"" ""00"" ""00"" ""00"" ""00")

mais le problmes que ca arrive que pour la meme zone de texte contients deux ou trois numeros de telephones et j'aimerai que l'ensemble de ces numeros respectent la meme formes.
merci de m'aider

 

[jp14]

Re : fomule pour numero de telephone

Bonsoir

Une piste

Utiliser la fonction split pour séparer les données ( séparateur différent de l'espace)
Ensuite à l'aide d'une boucle on formate chaque élément du tableau.
Puis on assemble les éléments du tableau pour l'écrire dans la feuille.

JP

 

[hicham28]

Re : fomule pour numero de telephone

merci de votre reponse, je suis juste un debiteur , pouvez vous faire un peu plus claire votre reponse svp
merci

 

[jp14]

Re : fomule pour numero de telephone

Bonsoir

Ci dessous un exemple

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
' séparateur une virgule
Dim tablo() As String
Dim i As Byte
With TextBox1
If .Value = "" Then Exit Sub
If InStr(.Value, ",") > 0 Then
    tablo = Split(.Value, ",")
    .Value = ""
    For i = LBound(tablo) To UBound(tablo)
        If .Value = "" Then
            .Value = Format(tablo(i), "05"" ""00"" ""00"" ""00"" ""00")
        Else
            .Value = .Value & "," & Format(tablo(i), , "05"" ""00"" ""00"" ""00"" ""00")
        End If
    Next i
    
Else
    .Value = Format(.Value, "05"" ""00"" ""00"" ""00"" ""00")
End If
End Sub

A tester

JP

 

[hicham28]

Re : fomule pour numero de telephone

merci c gentil , c trop gentil, merci

 

[hicham28]

Re : fomule pour numero de telephone

Merci de votre réponse, j'ai bien tester le code, mais j'ai encore deux problèmes et j'espère avoir votre aide :
Quand je fais la saisie du numéro de téléphone sous la forme par exemple 23241582 ça me donne le résultat espéré, mais si je fais la saisie du numéro de téléphone sous sa forme total par exemple 0523241582 ça m'ajoute une autre 5, et aussi a chaque fois que je me déplace par tabulation ça ajoute aussi un 5.
J’espère être claire pour ces deux problèmes. Merci de me lire et aussi de votre aide